ShapeRange.Apply method (Publisher)
Applies formatting copied from another shape or shape range by using the PickUp method.
Syntax
expression.Apply
expression A variable that represents a ShapeRange object.
Return value
Nothing
Remarks
If you don't first use the PickUp method to copy the formatting from another shape, an error occurs.
Example
The following example copies the formatting from the first shape of the active publication to the second shape of the active publication.
With ActiveDocument.Pages(1)
.Shapes(1).PickUp
.Shapes(2).Apply
End With
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.