エクセルでファイル保存時に複数シートのオートフィルタを全て解除したい

エクセルで複数枚あるシートの全ての５行目にオートフィルターが設定されています。
不特定多数で使用するのでファイルを閉じる時に自動でオートフィルタを解除して再度オートフィルタ（▼）を設定して保存しておきたいのですが、
残念ながらマクロの記録ではオートフィルターは複数シートで設定できなくなってしまいます。
あまり需要が無い用途なのかNETでも見つかりませんので、どなたか宜しくお願い致します。

ちなみに対象シートはBookにより３枚から１０枚ですが、出来ればシート数に限らず全シート選択で動くのがありがたいです。

質問者からの補足コメント

• 

  ご回答も記事の内容も至れり尽くせりで感心しました。

  No.1の回答に寄せられた補足コメントです。 補足日時：2023/05/10 14:26

No.1 ベストアンサー 回答者： enunokokoro 回答日時： 2023/05/10 14:14

こちら↓のサイトを参考にしてはいかが。

https://somuchan.hatenablog.com/entry/2020/07/08 …

【オートフィルタは保持したまますべてのシートで行を表示】が
希望しているマクロだと思いますよ。
Worksheet.ShowAllData メソッドなら、すべてのデータを表示
した状態でフィルター機能だけは維持しますので。
https://learn.microsoft.com/ja-jp/office/vba/api …

このマクロをブックを閉じるときに実行させるだけなので。
https://excel-ubara.com/excelvba4/EXCEL240.html

この回答へのお礼

早々のご回答ありがとうございます。

ズバリの内容だと思われたので、
保存時実行マクロにコピペして早速試してみたら、バッチリ期待通りの動きでした。

記事の内容も至れり尽くせりで参考になりました。

お礼日時：2023/05/10 14:25