Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna um objeto Shape que representa a forma à qual a extremidade do conector especificado está vinculada. Somente leitura.
Sintaxe
expression. EndConnectedShape
expressão Uma variável que representa um objeto ConnectorFormat .
Valor de retorno
Forma
Comentários
Se a extremidade do conector especificado não estiver vinculada a uma forma, esta propriedade irá gerar um erro.
Exemplo
Este exemplo pressupõe que o primeiro diapositivo na apresentação ativa já contém duas formas anexadas por uma conexão denominada "Conn1To2". O código adiciona um retângulo e um conector ao primeiro diapositivo. O final do novo conector será conectado ao mesmo site de conexão que o final do conector chamado "Conn1To2", e o início do novo conector será conectado ao site de conexão um do novo retângulo.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
Set r3 = .AddShape(msoShapeRectangle, 100, 420, 200, 100)
.AddConnector(msoConnectorCurve, 0, 0, 10, 10) _
.Name = "Conn1To3"
With .Item("Conn1To2").ConnectorFormat
endConnSite1 = .EndConnectionSite
Set endConnShape1 = .EndConnectedShape
End With
With .Item("Conn1To3").ConnectorFormat
.BeginConnect r3, 1
.EndConnect endConnShape1, endConnSite1
End With
End With
Confira também
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.