More than 5 years have passed since last update.

Excel2007 終了処理 VBA

Last updated at 2012-12-26Posted at 2012-02-27

VBAから終了させます。

１行目は、他のシートが開いていた場合は
Bookを終了しますが、Excelは終了しません。

２行目は、他のシートが開いていない場合です。
Excelと共に終了します。
ただし、変更があってもなくても問合せのダイアログボックスを
表示しないオプションがついていますので、変更する可能性がある場合は、
SaveChanges:=True（省略可）として下さい。

終了処理

private Sub exitThisExcel()
    If Workbooks.count <= 1 Then Application.Quit
    ThisWorkbook.Close SaveChanges:=False
End Sub