创建并返回一个 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 是必需的。 一个代表 Document 对象的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| DateFormat | 必需 | String | 信函的日期。 |
| IncludeHeaderFooter | 必需 | Boolean | 真 要包括页眉和页脚与页面设计模板。 |
| PageDesign | 必需 | String | 附加到文档的模板的名称。 |
| LetterStyle | 必需 | WdLetterStyle | 文档版式。 |
| Letterhead | 必需 | Boolean | 真 为预先打印的信头保留空间。 |
| LetterheadLocation | 必需 | WdLetterheadLocation | 预先打印信头的位置。 |
| LetterheadSize | 必需 | Single | 为预先打印的信头保留的空间(以磅为单位)。 |
| RecipientName | 必需 | String | 收信人的姓名。 |
| RecipientAddress | 必需 | String | 收信人的地址。 |
| Salutation | 必需 | String | 信函的称呼文本。 |
| SalutationType | 必需 | WdSalutationType | 信函称呼的类型。 |
| 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 | 此参数可能不可用,这取决于您所选择或安装的语言支持 (例如美国英语)。 |
返回值
LetterContent
示例
下面的示例使用 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
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。