Duplicate Method [Excel 2003 VBA Language Reference]

Duplicates the object and returns a reference to the new copy.

expression**.Duplicate**

expression Required. An expression that returns an object in the Applies To list.

Example

This example duplicates embedded chart one on Sheet1 and then selects the copy.

Set dChart = Worksheets("Sheet1").ChartObjects(1).Duplicate
dChart.Select

Applies to | ChartObject Object | ChartObjects Collection Object | OLEObject Object | OLEObjects Collection Object | Shape Object | ShapeRange Collection