オートフィルタを一括解除するマクロ｜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マクロの基本技ともいっていいものですので、標準で用意されていないような、すべてのシートに対する処理を行う機会が多いという方は、是非マスターされることをおすすめします。

>文書作成代行
>パソコン企業研修
>パソコン教室
>パソコン教室久喜市　
>パソコンの家庭教師BEST