Метод Selection.Move (Visio)
Перемещает выделение на указанное расстояние.
Синтаксис
выражение. Move
( _dx_
, _dy_
, _UnitsNameOrCode_
)
Выражение Переменная, представляющая объект Selection .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
dx | Обязательный | Double | Указывает сумму для перемещения в направлении x. |
Dy | Обязательный | Double | Указывает сумму для перемещения в направлении Y. |
UnitsNameOrCode | Необязательный | Variant | Указывает единицы измерения, используемые для dx и dy. Возможные значения см. в разделе Примечания. Значение по умолчанию — дюймы. |
Возвращаемое значение
Отсутствует
Примечания
Вы можете указать UnitsNameOrCode как целое число (член VisUnitCodes) или строковое значение, например "inches". Если строка недопустимая или код единицы неуместен (нетекстовый), возникает ошибка.
Полный список допустимых строк единиц измерения вместе с соответствующими константами службы автоматизации (целыми значениями) см. в разделе Сведения о единицах измерения.
Пример
В этом макросе Microsoft Visual Basic для приложений (VBA) показано, как использовать метод Move для перемещения выделенного фрагмента на указанную сумму.
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
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.