ボタンの下に次のコードがあります。クリックすると、現在の Excel シートだけが閉じられますが、Excel アプリケーション全体は閉じられません。
Application.DisplayAlerts = False
ThisWorkbook.Save
Application.DisplayAlerts = True
Application.Quit
注:他のシートは開いていません。
次のウィンドウは引き続き表示されます。
私はこの問題を抱えていたので、次のものを入れて解決しましたWorkbook_BeforeClose()
:
ThisWorkbook.saved = true
Application.DisplayAlerts = True
ルーチンから削除します。
のヘルプからApplication.Quit Method
:
この方法を使用するときに未保存のブックが開いている場合、変更を保存するかどうかを確認するダイアログ ボックスが Microsoft Excel に表示されます。これを防ぐには、 Quitメソッドを使用する前にすべてのブックを保存するか、 DisplayAlertsプロパティをFalseに設定します。このプロパティがFalseの場合、ブックを保存せずに終了しても、Microsoft Excel はダイアログ ボックスを表示しません。それらを保存せずに終了します。
これにより、(おそらく非表示の) プロンプトが Excel の完全な終了を停止するのを回避できます。