Partager via


Page.Duplicate, méthode (Publisher)

Crée une copie de l'objet Page spécifié et renvoie ce nouvel objet Page.

Syntaxe

expression. Double

Expression Variable qui représente un objet Page .

Valeur renvoyée

Page

Exemple

L'exemple suivant duplique la première page de la composition puis définit les propriétés de la copie. Une forme est ensuite ajoutée à la nouvelle page et des propriétés sont définies pour cette forme.

Dim objPage As Page 
Set objPage = ActiveDocument.Pages(1).Duplicate 
With objPage 
 .Background.Fill.ForeColor.SchemeColor = pbSchemeColorAccent1 
 .Shapes.AddShape msoShapeRectangle, 150, 250, 310, 275 
 With .Shapes(1) 
 .Fill.ForeColor.SchemeColor = pbSchemeColorAccent3 
 End With 
End With 

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.