Propriété HeaderFooter.Index (Word)

Renvoie une constante WdHeaderFooterIndex qui représente l'en-tête spécifié ou le pied de page dans un document ou une section. En lecture seule.

Syntaxe

expression. Index

expression Obligatoire. Variable qui représente un objet « HeaderFooter ».

Exemple

Cet exemple montre comment ajouter une forme à l'en-tête de la première page du document actif si la variable spécifiée fait référence à l'en-tête de la première page.

Sub ChangeFirstPageFooter() 
 Dim hdrFirstPage As HeaderFooter 
 
 Set hdrFirstPage = ActiveDocument.Sections(1).Headers(wdHeaderFooterFirstPage) 
 
 If hdrFirstPage.Index = wdHeaderFooterFirstPage Then 
 With hdrFirstPage.Shapes.AddShape(Type:=msoShapeHeart, _ 
 Left:=36, Top:=36, Width:=36, Height:=36) 
 .Fill.ForeColor.RGB = RGB(Red:=255, Green:=0, Blue:=0) 
 End With 
 End If 
 
End Sub

Voir aussi

Objet HeaderFooter

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.