ShapeRange.PickUp method (Word)
Copies the formatting of the specified shape.
expression Required. A variable that represents a ShapeRange object.
Use the Apply method to apply the copied formatting to another shape.
This example copies the formatting of shape one on myDocument and then applies the copied formatting to shape two.
Set myDocument = ActiveDocument With myDocument .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.