|
Jakaさん こんにちは
お返事が遅くなりました。すみません。
>標準モジュール
>
>Sub qqqq()
> Application.ScreenUpdating = False
> Application.DisplayAlerts = False
> Application.Quit
> ThisWorkbook.Close (False)
> Application.ScreenUpdating = True
>End Sub
>
>Sub clcl()
> i = MsgBox("yesで保存して終了、noで保存しないで終了", vbYesNo)
> If i = vbNo Then
> Application.DisplayAlerts = False
> DoEvents
> Application.OnTime Now(), "qqqq"
> ThisWorkbook.Close (False)
> Else
> Application.OnTime Now(), "qqqq"
> ThisWorkbook.Close (True)
> End If
>End Sub
>
>シート上のコントロールボタンで試しました。
>Private Sub CommandButton1_Click()
> clcl
>End Sub
実行してみました。
やっぱり、「マクロの確認」ダイアログが出てきますね(T_T)
しかたないので、
やはり、セルの初期化処理は、
Workbook_BeforeCloseと、Worksbook.Closeの前と
両方に設定して対応してみます。
ありがとうございました。
しかし、なんかわからん、バグ(仕様?)が多いなあ〜
|
|