ShapeRange.RerouteConnections method (Excel)
This method reroutes all connectors attached to the specified shape; if the specified shape is a connector, it's rerouted.
expression A variable that represents a ShapeRange object.
Reroutes connectors so that they take the shortest possible path between the shapes they connect. To do this, the RerouteConnections method may detach the ends of a connector and reattach them to different connecting sites on the connected shapes.
If this method is applied to a connector, only that connector will be rerouted. If this method is applied to a connected shape, all connectors to that shape will be rerouted.
This example adds two rectangles to myDocument, connects them with a curved connector, and then reroutes the connector so that it takes the shortest possible path between the two rectangles.
Note that the RerouteConnections method adjusts the size and position of the connector and determines which connecting sites it attaches to, so the values that you initially specify for the ConnectionSite arguments used with the BeginConnect and EndConnect methods are irrelevant.
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
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.