Propriedade ConnectorFormat.EndConnectionSite (PowerPoint)
Retorna um número inteiro especificando o site de conexão ao qual o final de um conector está conectado. Somente leitura.
Sintaxe
expression. EndConnectionSite
Expressão Uma variável que representa um objeto ConnectorFormat .
Valor de retorno
Long
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 slide na apresentação ativa já contém duas formas anexadas por um conector chamado "Conn1To2". O código adiciona um retângulo e um conector ao primeiro slide. 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.
Comentários
https://aka.ms/ContentUserFeedback.
Em breve: Ao longo de 2024, eliminaremos os problemas do GitHub como o mecanismo de comentários para conteúdo e o substituiremos por um novo sistema de comentários. Para obter mais informações, consulteEnviar e exibir comentários de