LetterContent-Objekt (Word)

Stellt die Elemente eines Briefs dar, der vom Brief-Assistenten erstellt wurde.

HinwBemerkungeneise

Verwenden Sie die GetLetterContent - oder CreateLetterContent-Methode , um ein LetterContent-Objekt zurückzugeben. Im folgenden Beispiel wird der Name des Empfängers für den Brief aus dem aktiven Dokument abgerufen und angezeigt.

Set myLetterContent = ActiveDocument.GetLetterContent 
MsgBox myLetterContent.RecipientName

Im folgenden Beispiel wird mit der CreateLetterContent-Methode ein neues LetterContent-Objekt erstellt, das anschließend mit der RunLetterWizard-Methode verwendet wird.

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

Die CreateLetterContent-Methode erstellt ein LetterContent-Objekt . es gibt jedoch zahlreiche erforderliche Argumente. Wenn Sie nur wenige Eigenschaften festlegen möchten, verwenden Sie das Schlüsselwort New , um ein neues, eigenständiges LetterContent-Objekt zu erstellen. Im folgenden Beispiel wird ein LetterContent-Objekt erstellt, einige eigenschaften festgelegt und dann das LetterContent-Objekt mit der RunLetterWizard-Methode verwendet, um den Brief-Assistenten auszuführen, wobei die voreingestellten Werte als Standardeinstellungen verwendet werden.

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

Sie können ein LetterContent-Objekt mit der Duplicate-Eigenschaft duplizieren . Im folgenden Beispiel werden die Buchstabenelemente im aktiven Dokument abgerufen und eine Kopie erstellt. Im Beispiel wird das Duplikat aLetter zugewiesen und der Name und die Adresse des Empfängers auf leere Zeichenfolgen zurückgesetzt. Die RunLetterWizard-Methode wird zum Ausführen des Brief-Assistenten verwendet, wobei die Werte im überarbeiteten LetterContent-Objekt ( aLetter ) als Standardeinstellungen verwendet werden.

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

Die SetLetterContent-Methode fügt den Inhalt des angegebenen LetterContent-Objekts in ein Dokument ein. Im folgenden Beispiel werden die Briefelemente aus dem aktiven Dokument abgerufen, die Zeile "Zu Händen von" geändert und anschließend mit der SetLetterContent-Methode das aktive Dokument durch Übernahme der Änderungen aktualisiert.

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

Siehe auch

Referenz zum Word-Objektmodell

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.