Partager via

Objet Page (Éditeur)

  • Article

Représente une page dans une composition. La collection Pages contient tous les objets Page dans une composition.

Remarques

Utilisez Pages (index) pour renvoyer un seul objet Page .

Utilisez la propriété FindByPageID de l’objet Pages pour localiser un objet Page à l’aide de l’ID de page attribué par l’application.

Utilisez la méthode Add pour créer une page et l’ajouter à la composition.

Exemple

L'exemple suivant ajoute un nouveau texte à la première forme sur la première page de la composition active.

Sub AddPageNumberField() 
 With ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange 
 .InsertAfter " This text is added after the existing text." 
 .Font.Size = 15 
 End With 
End Sub

L’exemple suivant ajoute une nouvelle page à la composition active, puis recherche cette page à l’aide de l’ID de page.

Sub FindPage() 
 Dim lngPageID As Long 
 
 'Get page ID 
 lngPageID = ActiveDocument.Pages.Add(Count:=1, After:=1).PageID 
 
 'Use page ID to add a new shape to the page 
 ActiveDocument.Pages.FindByPageID(PageID:=lngPageID) _ 
 .Shapes.AddShape Type:=msoShape5pointStar, _ 
 Left:=200, Top:=72, Width:=50, Height:=50 
 
End Sub

Méthodes

Propriétés

Voir aussi

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.