Shape.Duplicate (Excel)

Dupliziert das Objekt und gibt einen Bezug auf die neue Kopie zurück.

Dim shp As Shape: Set shp = 
Dim shpDuplicate As Shape
Set shpDuplicate = shp.Duplicate()