View Single Post
 
Old 06-16-2010, 08:08 AM
Kimberly Kimberly is offline Windows 7 Office 2010 (Version 14.0)
Expert
 
Join Date: May 2010
Posts: 517
Kimberly is on a distinguished road
Default

Oh yeah, I forgot you are also having a problem with .Destination, so change the macro to this instead:

Code:
 
Sub MergePetition()
 
Documents.Add Template:= _
"C:\Bergemann\Forfeiture\WordMailMerge\Petition.dot" _
, NewTemplate:=False, DocumentType:=0
With ActiveDocument.MailMerge
.Destination = 0
.SuppressBlankLines = True
With .DataSource
.FirstRecord = wdDefaultFirstRecord
.LastRecord = wdDefaultLastRecord
End With
.Execute Pause:=False
End With
With ActiveDocument
.AttachedTemplate = "C:\YourPathToTheNormalTemplate\Normal.dot"
End With
End Sub
AND, I believe it will work fine with actually changing the fake path to Normal.dot to the real path. (We just want to unattach the Petition template.)

Last edited by Kimberly; 06-16-2010 at 08:10 AM. Reason: clarification
Reply With Quote