Application.WorkbookBeforeSave 事件 (Excel)

在保存任一打开工作簿之前发生此事件。

注意

在Office 365中，Excel 支持自动保存，这样用户编辑内容就可以自动连续保存。 有关详细信息，请参阅 自动保存如何影响加载项和宏 ，以确保运行代码以响应 WorkbookBeforeSave 事件在启用自动保存时按预期运行。

语法

表达式。WorkbookBeforeSave (Wb、 SaveAsUI、 Cancel)

expression：表示 Application 对象的变量。

参数

名称	必需/可选	数据类型	说明
Wb	必需	Workbook	工作簿。
SaveAsUI	必需	Boolean	如果由于要将所做的更改保存在工作簿中而要显示“另存为”对话框，则为“True”。
Cancel	必需	Boolean	当事件发生时为 False 。 如果该事件过程将此参数设置为 True ，则该过程完成后将不保存工作簿。

返回值

无

示例

本示例在保存工作簿之前询问用户是否保存。

Private Sub App_WorkbookBeforeSave(ByVal Wb As Workbook, _ 
 ByVal SaveAsUI As Boolean, Cancel as Boolean) 
 a = MsgBox("Do you really want to save the workbook?", vbYesNo) 
 If a = vbNo Then Cancel = True 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。