Duplicate Method

Applies To

ChartObject object, ChartObjects collection object, OLEObject object, OLEObjects collection object, Shape object, ShapeRange collection object.

Description

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

Syntax

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