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.
expresión. EndConnectionSite
Expresión Variable que representa un objeto ConnectorFormat .
Si el final del conector especificado no está unido a una forma, la propiedad genera un error.
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
¿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.