Partager via

Propriété HeaderFooter.IsHeader (Publisher)

  • Article

True si l’objet HeaderFooter spécifié est un en-tête ; False s’il s’agit d’un pied de page. Boolean (en lecture seule).

Syntaxe

expression. IsHeader

Expression Variable qui représente un objet HeaderFooter .

Valeur renvoyée

Booléen

Exemple

L’exemple suivant crée une collection et la remplit avec l’en-tête et le pied de page de chaque page maître. La collection est ensuite itérée et un test est effectué pour déterminer si l’objet HeaderFooter est un en-tête ou un pied de page, puis le texte approprié est écrit dans l’en-tête ou le pied de page.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.