EXCEL2000のVBAでオートフィルタの条件について

いつもお世話になります。

ＶＢＡでオートフィルタの条件を、４／１～４／３０まで指定する時に、

AutoFilter Field:=1, Criteria1:=">=2003/4/1", _
Operator:=xlAnd, Criteria2:="<=2003/4/30"

というような式になると思うのですが、この日付の条件「>=2003/4/1」と「<=2003/4/30」をあらかじめシートのＡ１とＢ１セルに入力しておき、

AutoFilter Field:=1, Criteria1:="A1", _
Operator:=xlAnd, Criteria2:="B1"

としたいのですが、このままでは、当然検索条件自体が「A1」「B1」となってしまいますよね。。。
セルを指定することって、できますでしょうか？

宜しくお願いします。

No.2 ベストアンサー 回答者： maruru01 回答日時： 2003/05/19 16:53

こんにちは。

maruru01です。

AutoFilter Field:=1, Criteria1:=Range("A1").Value, _
Operator:=xlAnd, Criteria2:=Range("B1").Value

または、

AutoFilter Field:=1, Criteria1:=Cells(1, 1).Value, _
Operator:=xlAnd, Criteria2:=Cells(1, 2).Value

です。

この回答へのお礼

早い回答ありがとうございます。
単純なことやったんですね。
また、よろしくお願いします。

お礼日時：2003/05/19 17:17

No.1 回答者： tbobi 回答日時： 2003/05/19 16:52

・・・, Criteria1:=Range("A1").Value

としたらどうですか？

この回答へのお礼

早い回答ありがとうございます。
メチャ単純なことやったんですね・・・
ごめんなさい。

お礼日時：2003/05/19 17:15