【エクセルマクロ】オートフィルタで今日を抽出：コピペで使えるコード

エクセルマクロで、オートフィルタで今日（本日）を抽出するVBAコードをご紹介します。

このページのマクロコードは、コピペで使えます。
ぜひ、お試しください。

オートフィルタで今日を抽出

以下のマクロを実行すると、オートフィルタで本日のデータを抽出します。

Sub オートフィルタで今日を表示()

    ActiveSheet.Range("A1").CurrentRegion.AutoFilter _
            Field:=2, _
            Criteria1:=xlFilterToday, Operator:=xlFilterDynamic

End Sub

マクロ実行後

B列を「本日の日付」でフィルタ抽出します。

※下図は、本日が「2021/11/27」の場合の動作結果です

[Field:2] で、条件対象となる列番号を指定します。
（B列の列番号は ”2” ）

 
 
この記事がお役に立ちますと幸いです。
 
・【エクセルマクロ】オートフィルタ処理を自動化する使用例まとめ
 

【エクセルマクロ】オートフィルタ処理を自動化：超便利28選

...

kirinote.com

2022.11.12