Edit

ShapeRange.Duplicate method (Word)

  • Article

Creates a duplicate of the specified ShapeRange object, adds the new range of shapes to the Shapes collection at a standard offset from the original shapes, and then returns a Shape object.

Syntax

expression.Duplicate

expression Required. A variable that represents a ShapeRange object.

Example

This example creates a duplicate of shape one on the active document and then changes the fill for the new shape.

Set newShape = ActiveDocument.Shapes(1).Duplicate 
With newShape 
 .Fill.PresetGradient msoGradientVertical, 1, msoGradientGold 
End With

See also

ShapeRange Collection Object

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.