VBA关闭工作簿与退出Excel 代码|萝卜系统

Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具，再加上成功的市场营销，使Excel成为最流行的个人计算机数据处理软件。

要用VBA来关闭工作簿，用Workbook.Close 方法即可，而要退出Excel，则用Application.Quit 方法。下面是一些代码示例：

关闭活动工作簿，如果工作簿有更改，提示是否保存：

Sub CloseWorkbook()
ActiveWorkbook.Close
End Sub

如果要避免出现提示，可添加“SaveChanges”参数，如直接保存并关闭工作簿：

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

Excel整体界面趋于平面化，显得清新简洁。流畅的动画和平滑的过渡，带来不同以往的使用体验。

……