ShapeRange.PickUp Method (Publisher)
Copies formatting from a shape or shape range so that it can be copied to another shape or shape range using the Apply method.
Syntax
expression .PickUp
expression A variable that represents a ShapeRange object.
Remarks
You must use the PickUp method to copy the formatting from a shape or shape range before using the Apply method; otherwise, 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