Share via

MailMergeAfterMerge Event [Publisher 2003 VBA Language Reference]

  • Article

Occurs after all records in a mail merge have merged successfully.

Private Subobject**_MailMergeAfterMerge**(ByVal Doc As Document)

object A variable which references an object of type Application declared with events in a class module.

Doc Required. The mail merge main document.

Remarks

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 Publisher Application object, see Using Events with the Application Object .

Example

This example displays a message stating that all records in the specified document are finished merging.

Private Sub MailMergeApp_MailMergeAfterMerge(ByVal Doc As Document)

    MsgBox "Your mail merge on " & _
        ActiveDocument.Name & " is now finished."

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.

Private WithEvents MailMergeApp As Application

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

Applies to | Application Object