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