MailMerge.Destination (Word)

Returns or sets the destination of the mail merge results. Possible return values are wdSendToEmail - Send results to email recipient, wdSendToFax - Send results to fax recipient, wdSendToNewDocument - Send results to a new Word document, wdSendToPrinter - Send results to a printer.

Dim mmTemp As MailMerge 
 
Set mmTemp = ActiveDocument.MailMerge 
 
If mmTemp.State = wdMainAndDataSource Then 
 mmTemp.Destination = wdSendToNewDocument 
 mmTemp.Execute 
End If