Partager via


PageNumbers.Add, méthode (Word)

Renvoie un objet PageNumber qui représente les numéros de page ajoutés aux en-têtes ou aux pieds de page d'une section.

Syntaxe

expression. Add (PageNumberAlignment, FirstPage)

expression Obligatoire. Variable qui représente un objet PageNumbers .

Parameters

Nom Requis/Facultatif Type de données Description
PageNumberAlignment Facultatif Variant Il peut s'agir d'une des constantes WdPageNumberAlignment suivantes.
FirstPage Facultatif Variant False : l'en-tête et le pied de page de la première page sont différents de ceux situés sur les autres pages du document. Si PemièrePage a la valeur False, la première page n'est pas numérotée. Si cet argument est omis, le paramètre est contrôlé par la propriété DifferentFirstPageHeaderFooter.

Remarques

Si la propriété LinkToPrevious appliquée à l'objet HeaderFooter a la valeur True, la numérotation des pages se poursuivra en ordre séquentiel d'une section à la suivante, tout au long du document.

Exemple

Cet exemple montre comment ajouter un numéro de page dans le pied de page principal de la première section du document actif.

With ActiveDocument.Sections(1) 
 .Footers(wdHeaderFooterPrimary).PageNumbers.Add _ 
 PageNumberAlignment:=wdAlignPageNumberLeft, _ 
 FirstPage:=True 
End With

Cet exemple montre comment créer et mettre en forme des numéros de page dans les en-têtes du document actif.

Set myPgNum = ActiveDocument.Sections(1) _ 
 .Headers(wdHeaderFooterPrimary) _ 
 .PageNumbers.Add(PageNumberAlignment:= _ 
 wdAlignPageNumberCenter, FirstPage:= True) 
myPgNum.Select 
With Selection.Range 
 .Italic = True 
 .Bold = True 
End With

Voir aussi

PageNumbers, Collection d'objets

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.