Shape.Duplicate Method (Excel)
Duplicates the object and returns a reference to the new copy.
Syntax
식 .Duplicate
식 A variable that represents a Shape object.
Return Value
Shape
Example
This example duplicates embedded chart one on Sheet1 and then selects the copy.
Set dChart = Worksheets("Sheet1").ChartObjects(1).Duplicate
dChart.Select