Compartilhar via


Método Selection.ConnectShapes (Visio)

Conecta duas ou mais formas selecionadas a um conector dinâmico. Retornará Nothing.

Sintaxe

expression. ConnectShapes

Expressão Uma variável que representa um objeto Selection .

Valor de retorno

Nada

Exemplo

Esta macro do Microsoft Visual Basic for Applications (VBA) mostra como usar o método ConnectShapes para conectar duas formas.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.