通过

Application.MailMergeAfterMerge 事件 (Word)

  • 项目

在邮件合并中的所有记录合并成功后发生。

语法

表达式。MailMergeAfterMerge (DocResult)

expression：表示 Application 对象的变量。

有关对 Application 对象使用事件的信息，请参阅 将事件与 Application 对象配合使用。

参数

名称 必需/可选 数据类型 说明
Doc 必需 Document 邮件合并主文档。
DocResult 必需 Document 邮件合并生成的文档。

示例

以下示例显示一条消息，说明指定文档中的所有记录已完成合并。 如果已将文档合并到另一个文档，则消息中包含新文档的名称。 该示例假定在一般声明中声明了一个名为 MailMergeApp 的应用程序变量，并将 Word Application 对象赋给该变量。

Private Sub MailMergeApp_MailMergeAfterMerge(ByVal Doc As Document, _ 
 ByVal DocResult As Document) 
 If DocResult Is Nothing Then 
 MsgBox "Your mail merge on " & _ 
 Doc.Name & " is now finished." 
 
 Else 
 MsgBox "Your mail merge on " & _ 
 Doc.Name & " is now finished and " & _ 
 DocResult.Name & " has been created." 
 End If 
End Sub

另请参阅

Application 对象

支持和反馈

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