Shape.Duplicate Method

  • Article
Visio Automation Reference

Duplicates an object.

Version Information
 Version Added:  Visio 2.0

Syntax

expression.Duplicate

expression   A variable that represents a Shape object.

Return Value
Shape

Remarks

The Duplicate method duplicates the specified object or selection and adds a copy to the same page as the original. Using the Duplicate method is equivalent to clicking Duplicate on the Edit menu.

When used with a Shape object, the Duplicate method duplicates the shape.

When used with a Selection object, the Duplicate method duplicates the selection.

Example

The following example shows how to duplicate Shape objects. The code also works for Selection objects.

Before running this macro, make sure a drawing page is active in the Microsoft Office Visio window.

Visual Basic for Applications 
  
Public Sub Duplicate_Example()
  
    Dim vsoOriginalShape As Visio.Shape 
    Dim vsoDuplicateShape As Visio.Shape
 
    Set vsoOriginalShape = ActivePage.DrawLine(1, 1, 5, 5) 
    
    Set vsoDuplicateShape = vsoOriginalShape.Duplicate 
    vsoDuplicateShape.Cells("BeginY") = "2" 

End Sub

See Also