ShapeRange.PickUp Method
Copies the formatting of the specified shape. Use the Apply method to apply the copied formatting to another shape.
Namespace: Microsoft.Office.Interop.PowerPoint
Assembly: Microsoft.Office.Interop.PowerPoint (in Microsoft.Office.Interop.PowerPoint.dll)
Syntax
'Declaration
Sub PickUp
'Usage
Dim instance As ShapeRange
instance.PickUp()
void PickUp()
Examples
This example copies the formatting of shape one on myDocument and then applies the copied formatting to shape two.
Set myDocument = ActivePresentation.Slides(1)
With myDocument
.Shapes(1).PickUp.Shapes(2).Apply
End With