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.