Поделиться через


Метод Selection.ConnectShapes (Visio)

Соединяет две или более выбранных фигур с помощью динамического соединителя. Возвращает значение Nothing.

Синтаксис

выражение. ConnectShapes

Выражение Переменная, представляющая объект Selection .

Возвращаемое значение

Отсутствует

Пример

В этом макросе Microsoft Visual Basic для приложений (VBA) показано, как использовать метод ConnectShapes для соединения двух фигур.

Public Sub ConnectShapes_Example() 
 
 Dim vsoShape1 As Visio.Shape 
 Dim vsoShape2 As Visio.Shape 
 
 Set vsoShape1 = Application.ActiveWindow.Page.DrawRectangle(2, 9, 4, 7) 
 Set vsoShape2 = Application.ActiveWindow.Page.DrawRectangle(5, 6, 7, 3) 
 
 ActiveWindow.DeselectAll 
 ActiveWindow.Select vsoShape1, visSelect 
 ActiveWindow.Select vsoShape2, visSelect 
 Application.ActiveWindow.Selection.ConnectShapes 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.