This documentation is archived and is not being maintained.

Apply Method [Excel 2003 VBA Language Reference]

Office 2003

Applies to the specified shape formatting that's been copied by using the PickUp method.

expression.Apply

expression Required. An expression that returns a Shape or ShapeRange object.

Example

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
		




Show: