RunLetterWizard Method
Collapse the table of content
Expand the table of content

Document.RunLetterWizard Method (Word)


Contribute to this content

Use GitHub to suggest and submit changes. See our guidelines for contributing to VBA documentation.

Runs the Letter Wizard on the specified document.

expression .RunLetterWizard(LetterContent, WizardMode)

expression Required. A variable that represents a Document object.




Data Type





A LetterContent object. Any filled properties in the LetterContent object show up as prefilled elements in the Letter Wizard dialog boxes. If this argument is omitted, the GetLetterContent method is automatically used to get a LetterContent object from the specified document.




True to display the Letter Wizard dialog box as a series of steps with a Next, Back, and Finish button. False to display the Letter Wizard dialog box as if it were opened from the Tools menu (a properties dialog box with an OK button and a Cancel button). The default value is True.

Use the CreateLetterContent method to return a LetterContent object, given various letter element properties. Use the GetLetterContent method to return a LetterContent object based on the contents of the specified document. You can use the resulting LetterContent object with the RunLetterWizard method to preset elements in the Letter Wizard dialog box.

This example creates a new LetterContent object, sets several properties for it, and then runs the Letter Wizard by using the RunLetterWizard method.

Set myContent = New LetterContent 
With myContent 
 .Salutation ="Hello" 
 .SalutationType = wdSalutationOther 
 .SenderName = Application.UserName 
 .SenderInitials =Application.UserInitials 
End With 
Documents.Add.RunLetterWizard _ 
 LetterContent:=myContent, WizardMode:=True

The following example uses the CreateLetterContent method to create a new LetterContent object in the active document, and then it uses this object with the RunLetterWizard method.

Set myLetter = ActiveDocument _ 
 .CreateLetterContent(DateFormat:="July 31, 1999", _ 
 IncludeHeaderFooter:=False, _ 
 PageDesign:="C:\MSOffice\Templates" _ 
 & "\Letters & Faxes\Contemporary", _ 
 LetterStyle:=wdFullBlock, Letterhead:=True, _ 
 LetterheadLocation:=wdLetterTop, _ 
 LetterheadSize:=InchesToPoints(1.5), _ 
 RecipientName:="Dave Edson", _ 
 RecipientAddress:="436 SE Main St." _ 
 & vbCr & "Bellevue, WA 98004", _ 
 Salutation:="Dear Dave,", _ 
 SalutationType:=wdSalutationInformal, _ 
 RecipientReference:="", MailingInstructions:="", _ 
 AttentionLine:="", Subject:="End of year report", _ 
 CCList:="", ReturnAddress:="", SenderName:="", _ 
 Closing:="Sincerely yours,", SenderCompany:="", _ 
 SenderJobTitle:="", SenderInitials:="", _ 
ActiveDocument.RunLetterWizard LetterContent:=myLetter
© 2015 Microsoft