Leer en inglés

Compartir a través de


Propiedad ConnectorFormat.EndConnectionSite (Excel)

Devuelve un entero que especifica el sitio de conexión al que está unido el final del conector. Long de sólo lectura.

Sintaxis

expresión. EndConnectionSite

Expresión Variable que representa un objeto ConnectorFormat .

Comentarios

Si el final del conector especificado no está unido a una forma, la propiedad genera un error.

Ejemplo:

En este ejemplo se supone que myDocument ya contiene dos formas adjuntas por un conector denominado Conn1To2. El código agrega un rectángulo y un conector a myDocument. El final del nuevo conector se unirá al mismo sitio de conexión que el final del conector Conn1To2, y el principio del nuevo conector se unirá al sitio de conexión uno del nuevo rectá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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.