Propriété HeaderFooter.IsHeader (Publisher)
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.
Commentaires
https://aka.ms/ContentUserFeedback.
Bientôt disponible : Tout au long de 2024, nous allons supprimer progressivement GitHub Issues comme mécanisme de commentaires pour le contenu et le remplacer par un nouveau système de commentaires. Pour plus d’informations, consultezEnvoyer et afficher des commentaires pour