Freigeben über

HeaderFooter.IsHeader-Eigenschaft (Publisher)

  • Artikel

True , wenn das angegebene HeaderFooter-Objekt ein Header ist; False , wenn es sich um eine Fußzeile handelt. Schreibgeschützter boolescher Wert.

Syntax

Ausdruck. IsHeader

Ausdruck Eine Variable, die ein HeaderFooter-Objekt darstellt.

Rückgabewert

Boolesch

Beispiel

Im folgenden Beispiel wird eine neue Auflistung erstellt und mit der Kopf- und Fußzeile jeder Gestaltungsvorlage gefüllt. Die Auflistung wird dann durchlaufen, und ein Test wird durchgeführt, um zu bestimmen, ob das HeaderFooter-Objekt eine Kopf- oder Fußzeile ist, und dann wird geeigneter Text in die Kopf- oder Fußzeile geschrieben.

Dim objHeadersFooters As Collection 
Dim objMasterPage As page 
Dim objHeadFoot As HeaderFooter 
 
Set objHeadersFooters = New Collection 
For Each objMasterPage In ActiveDocument.masterPages 
 objHeadersFooters.Add objMasterPage.Header 
 objHeadersFooters.Add objMasterPage.Footer 
Next objMasterPage 
 
For Each objHeadFoot In objHeadersFooters 
 If objHeadFoot.IsHeader = True Then 
 objHeadFoot.TextRange.Text = "Header Text" 
 ElseIf objHeadFoot.IsHeader = False Then 
 objHeadFoot.TextRange.Text = "Footer Text" 
 End If 
Next

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.