Klasse HeadersFooters (Word VBA)

Eine Sammlung von HeaderFooter-Objekten, die die Kopf- oder Fußzeilen im angegebenen Abschnitt eines Dokuments darstellen. Um eine HeadersFooters -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim hfs as HeadersFooters
Set hfs = ActiveDocument.Range.Sections(1).Headers

Count

Gibt eine lange , die die Anzahl der Kopf-und/oder Fußzeilen in der Auflistung darstellt.

Dim lngCount As Long
lngCount = ActiveDocument.Range.Sections(1).Headers.Count

Item

Gibt ein HeaderFooter -Objekt zurück, das eine Kopf-oder Fußzeile in einem Bereich oder Abschnitt darstellt.

Item (Index)

Index: Eine Konstante, die die Kopf- oder Fußzeile im Bereich oder Abschnitt angibt.

Sub HeadFootItem() 
 ActiveDocument.PageSetup.DifferentFirstPageHeaderFooter = True 
 With ActiveDocument.Sections(1).Headers _ 
 .Item(wdHeaderFooterFirstPage).Range 
 .InsertBefore "Sales Report" 
 With .Font 
 .Bold = True 
 .Size = "15" 
 .Color = wdColorBlue 
 End With 
 .Paragraphs.Alignment = wdAlignParagraphCenter 
 End With 
End Sub