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