Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Dupliziert ein Objekt.
Syntax
Ausdruck. Doppelte
Ausdruck Eine Variable, die ein Shape-Objekt darstellt.
Rückgabewert
Form
Bemerkungen
Mit der Duplicate-Methode wird das angegebene Objekt oder die angegebene Auswahl dupliziert und dem Zeichenblatt, auf dem sich auch das Original befindet, eine Kopie hinzugefügt. Das Verwenden der Duplicate-Methode entspricht dem Klicken auf Duplizieren im Menü Einfügen auf der Registerkarte Start.
Bei Verwendung mit einem Shape-Objekt dupliziert die Duplicate-Methode das Shape.
Bei Verwendung mit einem Selection-Objekt dupliziert die Duplicate-Methode die Auswahl.
Beispiel
Mit dem folgenden Beispiel wird gezeigt, wie Shape-Objekte dupliziert werden. Der Code kann auch für Selection-Objekte verwendet werden.
Bevor Sie dieses Makro ausführen, sollten Sie sicherstellen, dass im Microsoft Visio-Fenster ein Zeichenblatt aktiv ist.
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
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.