This example executes a mail merge if the active document is a main document with an attached data source.
Set myMerge = ActiveDocument.MailMerge
If myMerge.State = wdMainAndDataSource Then myMerge.Execute
This example merges the main document with data records 1 through 4 and sends the merge documents to the printer.
With ActiveDocument.MailMerge
.DataSource.FirstRecord = 1
.DataSource.LastRecord = 4
.Destination = wdSendToPrinter
.SuppressBlankLines = True
.Execute
End With