Share via


Duplicate Method [Visio 2003 SDK Documentation]

Duplicates an object or selection.

object**.Duplicate**

object     Required. An expression that returns a Selection or Shape object.

Version added

2.0

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.

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  

Applies to | Selection object | Shape object

See Also | Copy method | Cut method | Paste method