Document.RunLetterWizard 方法 (Word)

对指定的文档运行英文信函向导。

语法

expressionRunLetterWizard( _LetterContent_ , _WizardMode_ )

expression 是必需的。 一个代表 Document 对象的变量。

参数

名称 必需/可选 数据类型 说明
LetterContent 可选 Variant 一个 LetterContent 对象。 LetterContent 对象中的任何填充的属性将显示为英文信函向导对话框中的预填充元素。 如果省略此参数,则自动使用 GetLetterContent 方法获取指定的文档从一个 LetterContent 对象。
WizardMode 可选 Variant 要为一系列步骤的 一步、 上一 ,和 完成按钮以显示 英文信函向导对话框。 以显示 英文信函向导对话框中,如果从 工具菜单 ( 确定按钮和 取消按钮的属性对话框中) 中打开。 默认值为 True

备注

使用 CreateLetterContent 方法来返回一个 LetterContent 对象,给出各种信函元素属性。 使用 GetLetterContent 方法来返回一个 LetterContent 对象,该对象指定文档的内容。 将生成的 LetterContent 对象与 RunLetterWizard 方法结合使用,以预设 “信函向导 ”对话框中的元素。

示例

本示例创建一个新的 LetterContent 对象,设置多个属性,并使用 RunLetterWizard 方法,然后运行英文信函向导。

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

下面的示例使用 CreateLetterContent 方法来创建一个新的 LetterContent 对象在活动文档中,然后使用 RunLetterWizard 方法使用此对象。

Set myLetter = ActiveDocument _ 
 .CreateLetterContent(DateFormat:="July 31, 1999", _ 
 IncludeHeaderFooter:=False, _ 
 PageDesign:="C:\MSOffice\Templates" _ 
 & "\Letters & Faxes\Contemporary Letter.dot", _ 
 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:="", _ 
 EnclosureNumber:=0) 
ActiveDocument.RunLetterWizard LetterContent:=myLetter

另请参阅

Document 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。