在保存打开的文档之前发生。
语法
表达式。DocumentBeforeSave (DocAs 文档**， SaveAsUIAs 布尔值， CancelAs 布尔值)
表达式 一个变量，表示使用类模块中的事件声明的“Application”对象。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| Doc | 必需 | Document | 即将被保存的文档。 |
| SaveAsUI | 必需 | Boolean | True 则显示 另存为对话框中，如果是否要保存新文档，以响应 保存命令;或在 另存为命令;或者在 SaveAs或 SaveAs2方法的响应。 |
| Cancel | 必需 | Boolean | 假 的事件发生时。 如果该事件过程将此参数设置为 True ，则过程完成时不保存文档。 |
备注
有关将事件与 Application 对象配合使用的详细信息，请参阅 将事件与 Application 对象配合使用。
示例
此示例在保存任何文档之前提示用户回答“是”或“否”。 此代码必须放置在类模块中，并且必须正确初始化类的实例才能看到此示例工作;有关如何完成此操作的说明，请参阅将 事件与 Application 对象一起使用 。
Public WithEvents appWord as Word.Application
Private Sub appWord_DocumentBeforeSave _
(ByVal Doc As Document, _
SaveAsUI As Boolean, _
Cancel As Boolean)
Dim intResponse As Integer
intResponse = MsgBox("Do you really want to " _
& "save the document?", _
vbYesNo)
If intResponse = vbNo Then Cancel = True
End Sub
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。