Comparteix a través de


Método Shape.RerouteConnections (Excel)

Este método redirige todos los conectores conectados a la forma especificada; si la forma especificada es un conector, se vuelve a enrutar.

Sintaxis

expresión. RerouteConnections

expresión Variable que representa un objeto Shape.

Observaciones

Redistribuye los conectores para que tomen la ruta más corta posible entre las formas que conectan. Para ello, el método RerouteConnections puede separar los finales de un conector y volver a conectarlos a sitios de conexión diferentes en las formas conectadas.

Si este método se aplica a un conector, sólo se volverá a redistribuir dicho conector. Si este método se aplica a una forma conectada, se volverán a redistribuir todos los conectores a dicha forma.

Ejemplo

En este ejemplo se agregan dos rectángulos a myDocument, se adjuntan a un conector curvado y, a continuación, se cambia la ruta del conector para que tome la ruta más corta posible entre los dos rectángulos.

Tenga en cuenta que el método RerouteConnections ajusta el tamaño y la posición del conector y determina a qué sitios de conexión se asocia, por lo que los valores que especifique inicialmente para los argumentos ConnectionSite usados con los métodos BeginConnect y EndConnect son irrelevantes.

Set myDocument = Worksheets(1) 
Set s = myDocument.Shapes 
Set firstRect = s.AddShape(msoShapeRectangle, _ 
 100, 50, 200, 100) 
Set secondRect = s.AddShape(msoShapeRectangle, _ 
 300, 300, 200, 100) 
Set newConnector = s.AddConnector(msoConnectorCurve, _ 
 0, 0, 100, 100) 
With newConnector.ConnectorFormat 
 .BeginConnect firstRect, 1 
 .EndConnect secondRect, 1 
End With 
newConnector.RerouteConnections

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.