要用VBA來關閉工作簿，用Workbook.Close 方法即可，而要退出Excel，則用Application.Quit 方法。下面是一些代碼示例：
關閉活動工作簿，如果工作簿有更改，提示是否保存：
Sub CloseWorkbook()
ActiveWorkbook.Close
End Sub
如果要避免出現(xiàn)提示，可添加“SaveChanges”參數(shù)，如直接保存并關閉工作簿：
Sub ClostAndSaveWorkbook()
ActiveWorkbook.Close Savechanges:=True
End Sub
將上述代碼中的“True”改為“False”，則直接關閉工作簿而不保存。
關閉所有打開的工作簿，并提示是否保存：
Sub CloseAllWorkbooks()
On Error Resume Next
Workbooks.Close
End Sub
退出Excel，并提示對有更改的工作簿進行保存：
Sub QuitExcel()
Application.Quit
End Sub
保存活動工作簿并退出Excel：
Sub SaveActiveWorkAndQuit()
ActiveWorkbook.Save
Application.Quit
End Sub
下面的代碼在退出Excel時都不會提示是否保存工作簿。
保存所有打開的工作簿并退出Excel：
Sub SaveAllAndQuit()
For Each wbk In Workbooks
wbk.Save
Next
Application.Quit
End Sub
退出Excel，所有的改動都不保存：
Sub QutiAndNoAlerts()
Application.DisplayAlerts = False
Application.Quit
End Sub
