关闭指定的一个或多个文档。
expression.Close(SaveChanges, OriginalFormat, RouteDocument)
expression 必需。该表达式返回以上的一个对象。
SaveChanges Variant 类型,可选。指定保存文档的操作。可以是下列 WdSaveOptions 常量之一:wdDoNotSaveChanges、wdPromptToSaveChanges 或 wdSaveChanges。
OriginalFormat Variant 类型,可选。指定保存文档的格式。可以是下列 WdOriginalFormat 常量之一:wdOriginalDocumentFormat、wdPromptUser 或 wdWordDocument。
RouteDocument Variant 类型,可选。如果该属性值为 True,则将文档发送给下一个收件人。如果文档没有附加传送名单,则忽略该参数。
应用于 MailMergeDataSource、Pane 和 Task对象的 Close方法。
关闭指定的邮件合并数据源、窗格或任务。
expression.Close
expression 必需。该表达式返回以上的一个对象。
应用于 Window对象的 Close方法。
关闭指定的窗口。
expression.Close(SaveChanges, RouteDocument)
expression 必需。该表达式返回以上的一个对象。
SaveChanges Variant 类型,可选。指定保存文档的操作。可以是下列 WdSaveOptions 常量之一:wdDoNotSaveChanges、wdPromptToSaveChanges 或 wdSaveChanges。
RouteDocument Variant 类型,可选。如果该属性值为 True,则将文档发送给下一个收件人。如果文档没有附加传送名单,则忽略该参数。
VBA示例
当应用于 Document对象时。
本示例在关闭活动文档前提示用户保存该文档。如果用户单击“取消”,则捕获错误 4198(命令失败)并显示一条信息。
On Error GoTo errorHandlerActiveDocument.Close _ SaveChanges:=wdPromptToSaveChanges, _ OriginalFormat:=wdPromptUsererrorHandler:If Err = 4198 Then MsgBox "Document was not closed"
当应用于 Pane对象时。
本示例在拆分活动窗口时关闭活动窗格。
If ActiveDocument.ActiveWindow.Panes.Count >= 2 Then _ ActiveDocument.ActiveWindow.ActivePane.Close
当应用于 Task对象时。
本示例先激活 Microsoft Excel,然后将其关闭。
For Each myTask In Tasks If InStr(myTask.Name, "Microsoft Excel") > 0 Then myTask.Activate myTask.Close End IfNext myTask
当应用于 Window对象时。
本示例关闭活动文档的活动窗口并保存文档。
ActiveDocument.ActiveWindow.Close SaveChanges:=wdSaveChanges