VBA・Excel たった1行でオートフィルターをクリアにするコード

vba-tips

 

どうもmMmです。

前置き不要のExcel VBAコードになります!

コードちょっと忘れちゃったからなんだっけ?

 

基本的な書き方とか知ってるからサクッとコードだけ教えてほしい・・・

そんなアナタと私のための記事です。

 

 

スポンサーリンク

オートフィルタをクリアするコード

 

.ShowAllDataでクリアにできます。

ただし、フィルターで絞り込みしていない状態で実行するとエラーになります。

実際、使う際は絞込状態を判断して実行するような↓のコードが有効です。

 

 

フィルターしている時だけ、解除するコード

 

この1行で絞込状態をクリアします。

 

If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData

 

コメント