Propriété Page.PageType (Publisher)

Article
04/07/2023

Renvoie une constante PbPageType qui représente le type de page. En lecture seule.

Syntaxe

expression. PageType

Expression Variable qui représente un objet Page .

Valeur renvoyée

PbPageType

Remarques

La valeur de la propriété PageType peut être l’une des constantes PbPageType déclarées dans la bibliothèque de type Microsoft Publisher.

Exemple

Cet exemple ajoute une forme à gauche ou à droite, selon que chaque page de la composition active est paire ou impaire.

Sub GetPageType() 
 Dim pgCount As Page 
 For Each pgCount In ActiveDocument.Pages 
 If pgCount.PageType = pbPageLeftPage Then 
 pgCount.Shapes.AddShape Type:=msoShapeOval, _ 
 Left:=50, Top:=50, Width:=50, Height:=50 
 ElseIf pgCount.PageType = pbPageRightPage Then 
 pgCount.Shapes.AddShape Type:=msoShapeOval, _ 
 Left:=512, Top:=50, Width:=50, Height:=50 
 End If 
 Next 
End Sub

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.

Partager via