Word VBA教程:CreateLetterContent方法

生成并返回基于指定信函上的 LetterContent 对象。LetterContent对象。

expression.CreateLetterContent(DateFormat, IncludeHeaderFooter, PageDesign, LetterStyle, Letterhead, LetterheadLocation, LetterheadSize, RecipientName, RecipientAddress, Salutation, SalutationType, RecipientReference, MailingInstructions, AttentionLine, Subject, CCList, ReturnAddress, SenderName, Closing, SenderCompany, SenderJobTitle, SenderInitials, EnclosureNumber, InfoBlock, RecipientCode, RecipientGender, ReturnAddressShortForm, SenderCity, SenderCode, SenderGender, SenderReference)

expression   必需。该表达式返回“应用于”列表中的一个对象。

DateFormat  String 类型,必需。 信函的日期。

IncludeHeaderFooter  Boolean 类型,必需。如果为 True,页面设计模板中将包括页眉和页脚。

PageDesign  String 类型,必需。文档所选用的模板名称。

LetterStyle  WdLetterStyle,必需。 文档版式。

WdLetterStyle 可以是下列 WdLetterStyle 常量之一:
wdFullBlock
wdModifiedBlock
wdSemiBlock

Letterhead  Boolean 类型,必需。如果该值为 True,则为预先打印的信头保留空间。

LetterheadLocation  WdLetterheadLocation,必需。预先打印信头的位置。

WdLetterheadLocation 可以是下列 WdLetterheadLocation 常量之一:
wdLetterBottom
wdLetterLeft
wdLetterRight
wdLetterTop

LetterheadSize  Single 类型,必需。为预先打印的信头保留的空间(以磅为单位)。

RecipientName  String 类型,必需。收信人的姓名。

RecipientAddress  String 类型,必需。收信人的地址。

Salutation  String 类型,必需。信函的称呼文本。

SalutationType  WdSalutationType,必需。信函称呼的类型。

WdSalutationType 可以是下列 WdSalutationType 常量之一:
wdSalutationFormal
wdSalutationOther
wdSalutationBusiness
wdSalutationInformal

RecipientReference  String 类型,必需。信函的参考词组(例如,“In reply to”;)。

MailingInstructions  String 类型,必需。信函邮寄格式(例如,“Certified Mail”)。

AttentionLine  String 类型,必需。信函注意用语(例如,“Attention”;)。

Subject  String 类型 必需。指定信函的主题文本。

CCList  String 类型,必需。 信函副本收件人的姓名(转寄人)。

ReturnAddress  String 类型,必需。回信的通讯地址。

SenderName  String 类型,必需。发信人姓名。

Closing  String 类型,必需。信函的结束语。

SenderCompany  String 类型,必需。写信人所在公司的名称。

SenderJobTitle  String 类型,必需。写信人的职务。

SenderInitials  String 类型,必需。写信人的姓名缩写。

EnclosureNumber  Long 类型,必需。信函的附件数。

InfoBlock  Variant 类型,可选。视用户选择安装的支持语言(例如美国英语)不同,该参数可能无法使用。

RecipientCode  Variant 类型,可选。视用户选择安装的支持语言(例如美国英语)不同,该参数可能无法使用。

RecipientGender  Variant 类型,可选。视用户选择安装的支持语言(例如美国英语)不同,该参数可能无法使用。

ReturnAddressShortForm  Variant 类型,可选。视用户选择安装的支持语言(例如美国英语)不同,该参数可能无法使用。

SenderCity  Variant 类型,可选。视用户选择安装的支持语言(例如美国英语)不同,该参数可能无法使用。

SenderCode  Variant 类型,可选。视用户选择安装的支持语言(例如美国英语)不同,该参数可能无法使用。

SenderGender  Variant 类型,可选。视用户选择安装的支持语言(例如美国英语)不同,该参数可能无法使用。

SenderReference  Variant 类型,可选。视用户选择安装的支持语言(例如美国英语)不同,该参数可能无法使用。

VBA示例

本示例实现的功能是:利用 CreateLetterContent方法在活动文档中新建 LetterContent对象,然后用 RunLetterWizard方法使用该对象。


Set myLetter = ActiveDocument _
    .CreateLetterContent(DateFormat:="July 31, 1996", _
    IncludeHeaderFooter:=False, PageDesign:="", _
    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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号