企業研修講師派遣のBESTグループ
出張パソコン教室ITスクール
webコンサルティングスクール
パソコンの家庭教師BEST

Home Excel(エクセル) オートフィルタを一括解除するマクロ|Excel(エクセル)マクロ・VBA

VBA(Visual Basic for Applications)で、簡単にマクロを作成することができます。

▼すべてのオートフィルタを一括解除するマクロ
Sub RemoveFiltersAllWorksheets()

 Dim objWorkSheet As Worksheet

 For Each objWorkSheet In Worksheets
  objWorkSheet.AutoFilterMode = False
 Next

End Sub

AutoFilterModeプロパティをFalseにしてやれば、オートフィルタは解除できますから、すべてのワークシートに対して、AutoFilterModeプロパティをFalseにする処理を行ってやれば、オートフィルタを一括解除するマクロになります。

上記のマクロではFor Each Nextループの中で、AutoFilterModeプロパティをFalseにしています。

For Each Nextループの中でワークシートに対して何らかの処理を行うのは、Excelマクロの基本技ともいっていいものですので、標準で用意されていないような、すべてのシートに対する処理を行う機会が多いという方は、是非マスターされることをおすすめします。
 

ご質問や感想は上記からコメントをお願い致します

返信を残す