エクセル終了時ソートを強制解除したい。

質問

エクセル終了時にオートフィルタで
ソートしたまま上書き保存できないように
できるマクロはありますか？
強制解除でもメッセージボックスで警告でも
いいのですがどなたかご教授お願いします。
Ｖｅｒはエクセル２００３です。

回答No.1

Alpha-j

以下をVBA Project の ThisWorkbook に設定してください
Bookを開くたびにこのマクロが動き膳シートのフィルタを解除します

Private Sub Workbook_Open()
For i=1 to Worksheets.Count
Worksheets(i).AutoFilterMode = False
Next i
End Sub