エクセルで閉じるを押したときの保存確認を表示させないようにするには？ (ID:141459)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 > Choice = MsgBox("変更を保存して終了しますか？" & vbLf & _ この部分を見直した方が良いとおもいます。 変更が無ければ、このメッセージは不要なのですから、メッセージを 表示する必要があるかどうかを、 If Not ThisWorkbooks.Saved Then メッセージ処理 End If のようにチェックすべきかと。 > Application.DisplayAlert=False ←ここはわかりましたが… DisplayAlert ではなく、 DisplayAlerts ですよね。 で、保存確認を抑制したいだけならば、DisplayAlerts を切り替えるのではなく、 ThisWorkbook.Saved = True だけで良い気がします。 Workbook.Saved を使わず、Application.DisplayAlerts だけでも同じように動作するのですが、下記のような理由から、ScreenUpdating や ScreenUpdating は、終了直前に True に戻すことが推奨されています。 (そして今回は True に戻すわけには行かないので、Saved の方が安全かと) http://support.microsoft.com/kb/213606/ja http://support.microsoft.com/kb/905208/en-us http://www.relief.jp/itnote/archives/001936.php 》 DisplayAlertsプロパティの規定値は「True」で、プロシージャの実行が 》 終了すると自動的に「True」に戻るはずなのですが、バージョンによっては 》 バグがあって自動的に「True」にならないことあり、上記のように明示的に 》 「Application.DisplayAlerts = True」としておくことがお行儀のいい 》 コーディングとされています。 > Application.Quit ブックは1つだけなので、Quit は不要です。 Cancel しなければ、勝手に閉じてくれますから。 また、Quit を記述してしまうと、当初の > ブックの閉じるボタンじゃなく、エクセルの閉じるボタンを押したときのイベント に反してしまうと思います。 Excel を閉じずに、ブックだけを閉じようとした場合にも、 Excel ごと閉じられてしまいますから。