Propiedad ConnectorFormat.BeginConnectionSite (Excel)
Devuelve un entero que especifica el sitio de conexión al que está unido el principio del conector. Long de sólo lectura.
Sintaxis
expresión. BeginConnectionSite
Expresión Variable que representa un objeto ConnectorFormat .
Comentarios
Si el principio del conector especificado no está unido a la forma, esta 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 principio del nuevo conector se unirá al mismo sitio de conexión que el principio del conector Conn1To2, y el final 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, 450, 190, 200, 100)
.AddConnector(msoConnectorCurve, 0, 0, 10, 10).Name = _
"Conn1To3"
With .Item("Conn1To2").ConnectorFormat
beginConnSite1 = .BeginConnectionSite
Set beginConnShape1 = .BeginConnectedShape
End With
With .Item("Conn1To3").ConnectorFormat
.BeginConnect beginConnShape1, beginConnSite1
.EndConnect r3, 1
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.