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

ExcelVBA-オートフィルタ日付-_アイキャッチ ExcelVBA

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

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

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

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


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

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

End Sub

 

マクロ実行後

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

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

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


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

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

 

「Excel自動化[最強]時短仕事術」
自動化の基礎と時短に役立つテクニック解説書
毎日の定型業務を手際良く行え、大幅な業務効率化を実現!