質問: showalldataのエラーを回避したい excelでオートフィルタを使った後に、データを全て表示させる為のコマンドボタンを作りました。 問題なのは、フィルタがかかっている状態でこのボタンを押すとデータが全表示されるのですが、全表示されている状態で押すと以下のエラーになってしまいます。 実行時エラー'1004': worksheetクラスのshowalldataメソッドが失敗しました。 コマンドボタンのプログラムは以下のとおりです。 private sub commandbutton2_click() activesheet.showalldata end sub 不勉強なのは承知ですが、回避方法を教えて頂けないでしょうか。
回答: filtermode プロパティが true のときに showalldata メソッドを発行すればよいのでは? 非表示になっている行があれば全行表示する。 private sub commandbutton1_click() if activesheet.filtermode then _ activesheet.showalldata end sub