エクセル ブック（マクロを含む）を保存してとじると、また開きます。
ブックに保護をかけた状態で保存してあります。
共有状態にあり、マクロを有効にしてもらいたいので、
(1)開くときに保護解除
(2)保存のときに、保護をかけて保存後、（まだ閉じるとは限らないので）保護解除
ということをやろうとし、以下のように書きました。
エクセルごとではなく、このファイルのみ終了しようとすると、
開いた後と上書保存後に保護を解除する為、
ファイルを終了する時には必ず「変更を保存しますか？」と訊かれ、
その時に「はい」を選択すると、一度はそのファイルが終了するのですが、
すぐに マクロを含むファイルを開くときに出るメッセージ「セキュリティ警告マクロ マクロ有効 マクロ無効 詳細」が出て、また開こうとします。
保存「いいえ」を選択すると、普通に終了します。
エクセルごとを終了すれば保存「はい」にしても、普通に終了します。
このファイルのみ終了する時、保存の確認で、「はい」を選び、普通に終了するには、何を直したらよいでしょうか？
その前に、根本的に間違ってたりしますでしょうか・・・。
よろしくお願いします。
ThisWorkbookに、
Private Sub Workbook_Open()
ActiveSheet.Unprotect Password:="（パスワード）"
End Sub
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ActiveSheet.Protect Password:="（パスワード）"
Application.OnTime Now, "保護解除"
End Sub
標準モジュールに、
Sub 保護解除()
ActiveSheet.Unprotect Password:="（パスワード）"
End Sub
お礼
ありがとうございます。早速やってみます。