Compartir a través de


Método Page.Duplicate (Publisher)

Crea un duplicado del objeto Page especificado y, a continuación, devuelve el nuevo objeto Page .

Sintaxis

expresión. Duplicado

expresión Variable que representa un objeto Page .

Valor devuelto

Page

Ejemplo

En el ejemplo siguiente se duplica la primera página de la publicación y, a continuación, se establecen las propiedades del duplicado. A continuación, se agrega una forma a la nueva página y las propiedades se establecen para la forma.

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 

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.