Application.MailMergeAfterRecordMerge Event (Word)
Occurs after each record in the data source successfully merges in a mail merge.
Syntax
expression .Private Sub object_MailMergeAfterRecordMerge(ByVal Doc As Document)
expression A variable that represents an Application object that has been declared with events in a class module. For information about using events with the Application object, see Using Events with the Application Object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
Doc |
Required |
Document |
The mail merge main document. |
Example
This example displays a message with the value of the first and second fields in the record that has just finished merging. This example assumes that you have declared an application variable called MailMergeApp in your general declarations and have set the variable equal to the Word Application object.
Private Sub MailMergeApp_MailMergeAfterRecordMerge(ByVal Doc As Document)
With Doc.MailMerge.DataSource
MsgBox .DataFields(1).Value & " " & _
.DataFields(2).Value & " is finished merging."
End With
End Sub