Selection.Move-Methode (Visio)

Verschiebt eine Auswahl um einen angegebenen Abstand.

Syntax

Ausdruck. Move( _dx_ , _dy_ , _UnitsNameOrCode_ )

Ausdruck Eine Variable, die ein Selection-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Dx	Erforderlich	Double	Gibt die Verschiebung in Richtung der X-Achse an.
Dy	Erforderlich	Double	Gibt die Verschiebung in Richtung der Y-Achse an.
UnitsNameOrCode	Optional	Variant	Gibt die Einheiten an, die für dx und dy verwendet werden sollen. Mögliche Werte finden Sie in den Hinweisen. Der Standardwert ist mm.

Rückgabewert

Nichts

Bemerkungen

Sie können UnitsNameOrCode als ganze Zahl (ein Element von VisUnitCodes) oder als Zeichenfolgenwert wie z. B. "cm" angeben. Wenn die Zeichenfolge ungültig oder der Einheitencode unzulässig ist (kein Text), wird ein Fehler generiert.

Eine vollständige Liste der gültigen Einheitenzeichenfolgen und der entsprechenden Automatisierungskonstanten (Werte für ganze Zahl) finden Sie unter Informationen zu Maßeinheiten.

Beispiel

Mit diesem VBA-Makro (Microsoft Visual Basic für Applikationen) wird gezeigt, wie die Move-Methode verwendet wird, um eine Auswahl um eine angegebene Zahl zu verschieben.

Public Sub Move_Example() 
 
 Dim vsoShape1 As Visio.Shape 
 Dim vsoShape2 As Visio.Shape 
 
 Set vsoShape1 = Application.ActiveWindow.Page.DrawRectangle(1, 9, 3, 7) 
 Set vsoShape2 = Application.ActiveWindow.Page.DrawRectangle(3, 6, 5, 5) 
 
 ActiveWindow.DeselectAll 
 
 ActiveWindow.Select vsoShape1, visSelect 
 ActiveWindow.Select vsoShape2, visSelect 
 Application.ActiveWindow.Selection.Move 2, 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.