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

名前

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

本文 環境：Windows XP(SP2)，エクセルVB6 です。 たびたびすみません。 エクセルで１つのブックを開いています。 ブックの閉じるボタンじゃなく、エクセルの閉じるボタンを押したときのイベントを記述しています。 このブックに対し、何か編集をかけて閉じるボタンを押したとき、 Workbook_BeforeCloseイベントが発生しますので、Cancelを選択すると、 そのあとでさらに編集を保存するか確認してきます。 この2回目の保存確認を消したいのですがどうしたらいいのでしょうか？ 初歩的な質問で申し訳ないですが、よろしくお願いします。 ----------------------------------------------------------------- Private Sub Workbook_BeforeClose(Cancel As Boolean) Dim Choice As Integer '閉じるボタンが押された場合 Choice = MsgBox("変更を保存して終了しますか？" & vbLf & _ "" & vbLf & _ "「いいえ」を選択すると保存せずに終了します。", vbYesNoCancel, "保存確認") Select Case Choice Case vbYes '保存してから閉じる ThisWorkbook.Save Application.Quit Case vbNo '保存せずに閉じる Application.Quit Case Cancel '閉じるをキャンセル Cancel = True End Select End Sub -------------------------------------------------------------------