共用方式為

Word) (LetterContent 物件

  • 發行項

代表 [信件精靈] 所建立之信件中的元件。

註解

使用 GetLetterContent 或 CreateLetterContent 方法可傳回 LetterContent 物件。 下列範例會擷取並顯示使用中文件的字母收件者的名稱。

Set myLetterContent = ActiveDocument.GetLetterContent 
MsgBox myLetterContent.RecipientName

下列範例會使用 CreateLetterContent 方法建立新的 LetterContent 物件，然後與 RunLetterWizard 方法搭配使用。

Set myLetter = ActiveDocument _ 
 .CreateLetterContent(DateFormat:="July 11, 1996", _ 
 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:="100 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, WizardMode:=True

CreateLetterContent 方法建立 LetterContent 物件 ；但是，有許多必要的引數。 如果您想要設定僅一些屬性，請使用 New 關鍵字來建立新的獨立 LetterContent 物件。 下列範例會建立 LetterContent 物件、 設定其部分屬性，並再使用 LetterContent 物件搭配 RunLetterWizard 方法來執行 [信件精靈] 的預設設定為使用預設的值。

Set myLetter = New LetterContent 
With myLetter 
 .AttentionLine = "Read this" 
 .EnclosureNumber = 1 
 .Letterhead = True 
 .LetterheadLocation = wdLetterTop 
 .LetterheadSize = InchesToPoints(2) 
End With 
Documents.Add.RunLetterWizard LetterContent:=myLetter, _ 
 WizardMode:=True

您可以使用 重複 屬性複製 LetterContent 物件。 下列範例會擷取在使用中文件的字母項目，並建立的重複複本。 此範例會將重複的複本指派給 aLetter ，並將收件者的名稱和位址重設為空字串。 RunLetterWizard方法是用來執行 [信件精靈]，使用修訂的LetterContent物件中的值 ( aLetter ) 做為預設設定。

Set aLetter = ActiveDocument.GetLetterContent.Duplicate 
With aLetter 
 .RecipientName = "" 
 .RecipientAddress = "" 
End With 
Documents.Add.RunLetterWizard LetterContent:=aLetter, _ 
 WizardMode:=True

SetLetterContent 方法會將指定 LetterContent 物件的內容插入文件中。 下列範例會從使用中文件擷取信件元件、 變更指定受文行，然後使用 SetLetterContent 方法來更新使用中文件以反映變更。

Set myLetterContent = ActiveDocument.GetLetterContent 
myLetterContent.AttentionLine = "Greetings" 
ActiveDocument.SetLetterContent LetterContent:=myLetterContent

請參閱

Word 物件模型參考資料

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。