新規会員登録における電話番号登録必須化のお知らせ

いつもお世話になっております(ぺこり
毎度初歩的な質問でお恥ずかしいですが、

エクセルのオートフィルターで一昨日を抽出したいのですがやりかたがわかりません;

Sub 一昨日の抽出()
'
' 一昨日の抽出 Macro
'

'
ActiveSheet.ListObjects("テーブル1").Range.AutoFilter Field:=2, Criteria1:= _
xlFilter(“d”, -2, Date), Operator:=xlFilterDynamic
End Sub

とかを試したりしています。

どうしたらいいでしょうか;;

教えて!goo グレード

A 回答 (1件)

こんにちは。



以下、Format 関数の "yyyy/m/d" の部分の書式をシートと合わせればよいと思います。Operator:=xlFilterDynamic というのは何だった思い出せませんが、二つの条件がない場合で、この条件ならいらないと思います。

Sub Table_AutoFilter()
 With ActiveSheet
  .ListObjects("テーブル1").Range.AutoFilter _
  Field:=2, _
  Criteria1:="=" & Format(Date - 3, "yyyy/m/d")
 End With
End Sub
    • good
    • 1
この回答へのお礼

ありがとうございますーーm(_ _)m^^
無事一昨日の抽出が出来ました。
助かります!!

お礼日時:2017/04/11 15:30

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

教えて!goo グレード

人気Q&Aランキング