Compartilhar via


Propriedade ConnectorFormat.EndConnectionSite (Excel)

Retorna um número inteiro especificando o site de conexão ao qual o final de um conector está conectado. Long somente leitura.

Sintaxe

expressão. EndConnectionSite

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

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 myDocument já contém duas formas anexadas por um conector chamado Conn1To2. O código adiciona um retângulo e um conector a myDocument. O final do novo conector será vinculado ao mesmo site de conexão como o final do conector chamado Conn1To2, e o início do novo conector será vinculado ao site de conexão um novo retângulo.

Set myDocument = Worksheets(1) 
With myDocument.Shapes 
 Set r3 = .AddShape(msoShapeRectangle, _ 
 100, 420, 200, 100) 
 With .Item("Conn1To2").ConnectorFormat 
 endConnSite1 = .EndConnectionSite 
 Set endConnShape1 = .EndConnectedShape 
 End With 
 With .AddConnector(msoConnectorCurve, _ 
 0, 0, 10, 10).ConnectorFormat 
 .BeginConnect r3, 1 
 .EndConnect endConnShape1, endConnSite1 
 End With 
End With

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.