HeaderFooter-Objekt (Word)
Stellt eine einzelne Kopf- oder Fußzeile dar. Das HeaderFooter-Objekt ist ein Element der HeadersFooters-Auflistung . Die HeadersFooters-Auflistung enthält alle Kopf- und Fußzeilen im angegebenen Dokumentabschnitt.
Hinweise
Verwenden Sie Headers (Index) oder Footers (Index), wobei index eine der WdHeaderFooterIndex-Konstanten (wdHeaderFooterEvenPages, wdHeaderFooterFirstPage oder wdHeaderFooterPrimary) ist, um ein einzelnes HeaderFooter-Objekt zurückzugeben. Im folgenden Beispiel wird der Text der primären Kopfzeile und der primären Fußzeile im ersten Abschnitt des aktiven Dokuments geändert.
With ActiveDocument.Sections(1)
.Headers(wdHeaderFooterPrimary).Range.Text = "Header text"
.Footers(wdHeaderFooterPrimary).Range.Text = "Footer text"
End With
Sie können auch ein einzelnes HeaderFooter-Objekt zurückgeben, indem Sie die HeaderFooter-Eigenschaft mit einem Selection-Objekt verwenden.
Hinweis
Sie können der HeadersFooters-Auflistung keine HeaderFooter-Objekte hinzufügen.
Verwenden Sie die DifferentFirstPageHeaderFooter-Eigenschaft mit dem PageSetup-Objekt , um eine andere erste Seite anzugeben. Im folgenden Beispiel wird in die Fußzeile der ersten Seite des aktiven Dokuments Text eingefügt.
With ActiveDocument
.PageSetup.DifferentFirstPageHeaderFooter = True
.Sections(1).Footers(wdHeaderFooterFirstPage) _
.Range.InsertBefore _
"Written by Joe Smith"
End With
Verwenden Sie die OddAndEvenPagesHeaderFooter-Eigenschaft mit dem PageSetup-Objekt , um verschiedene kopf- und gerade Seitenkopfzeilen und -fußzeilen anzugeben. Wenn die OddAndEvenPagesHeaderFooter-EigenschaftTrue ist, können Sie mithilfe von wdHeaderFooterPrimary eine ungerade Kopf- oder Fußzeile zurückgeben, und Sie können eine gerade Kopf- oder Fußzeile mithilfe von wdHeaderFooterEvenPages zurückgeben.
Verwenden Sie die Add-Methode mit dem PageNumbers-Objekt , um einer Kopf- oder Fußzeile eine Seitenzahl hinzuzufügen. Im folgenden Beispiel werden Seitenzahlen zur ersten Fußzeile im ersten Abschnitt des aktiven Dokuments hinzugefügt.
With ActiveDocument.Sections(1)
.Footers(wdHeaderFooterPrimary).PageNumbers.Add
End With
Eigenschaften
Name |
---|
Application |
Creator |
Exists |
Index |
IsHeader |
LinkToPrevious |
PageNumbers |
Parent |
Range |
Shapes |
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.