エントリーの編集
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
Excelで、ブック中すべてのシートのオートフィルタ解除
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
Excelで、ブック中すべてのシートのオートフィルタ解除
オートフィルタ自体は解除せず、フィルタの絞り込みを解除するマクロです。コードの整理ができていない... オートフィルタ自体は解除せず、フィルタの絞り込みを解除するマクロです。コードの整理ができていないので冗長ですが、とりあえず動作はしました。 このマクロをBOOKの標準モジュールにペーストして実行して下さい Sub 絞り込み解除() Dim idxSheet, idxField , cntField As Integer Dim curSheet, curADRS As String Application.ScreenUpdating = False curSheet = ActiveSheet.Name curADRS = Selection.Address For idxSheet = 1 To ActiveWorkbook.Worksheets.Count If Worksheets(idxSheet).AutoFilterMode Then cntField = Workshee