Export (0) Print
Expand All

Application.MailMergeAfterRecordMerge Event

Office 2007
Occurs after each record in the data source successfully merges in a mail merge.



expression   A variable that represents an Application object.


NameRequired/OptionalData TypeDescription
DocRequiredDocumentThe mail merge main document.


If you maintain a customer management database, you can use the MailMergeAfterRecordMerge event to update the database for each merged record.

To access the Application object events, declare an Application object variable in the General Declarations section of a code module. Then set the variable equal to the Application object for which you want to access events. For information about using events with the Microsoft Office Publisher Application object, see Using Events with the Application Object.


This example displays a message with the value of the first and second fields in the record that has just finished merging.

Visual Basic for Applications
Private Sub MailMergeApp_MailMergeAfterRecordMerge(ByVal Doc As Document)

    With ActiveDocument.MailMerge.DataSource
        MsgBox .DataFields.Item(3).Value & " " & _
            .DataFields.Item(2).Value & " is finished merging."
    End With

End Sub

For this event to occur, you must place the following line of code in the General Declarations section of your module and run the following initialization routine.

Visual Basic for Applications
Private WithEvents MailMergeApp As Application

Sub InitializeMailMergeApp()
    Set MailMergeApp = Publisher.Application
End Sub

Community Additions

© 2014 Microsoft