Метод Shape.RerouteConnections (Excel)

Этот метод перенаправляет все соединители, присоединенные к указанной фигуре; Если указанная фигура является соединителем, она перенаправляется.

Синтаксис

expression. RerouteConnections

выражение Переменная, представляющая объект Фигура.

Замечания

Перенаправляет соединители так, чтобы они пробирали кратчайший путь между фигурами, которые они подключают. Для этого метод RerouteConnections может отсоединить концы соединителя и повторно подключить их к разным соединительным сайтам на подключенных фигурах.

Если этот метод применяется к соединителю, перенаправляется только этот соединитель. Если этот метод применяется к подключенной фигуре, все соединители к ней будут перенаправляется.

Пример

В этом примере два прямоугольника добавляются в myDocument, они соединяются с помощью изогнутого соединителя, а затем перенаправляет соединитель так, чтобы он протянул кратчайший путь между двумя прямоугольниками.

Обратите внимание, что метод RerouteConnections изменяет размер и положение соединителя и определяет, к каким соединительным сайтам он присоединяется, поэтому значения, изначально заданные для аргументов ConnectionSite , используемых с методами BeginConnect и EndConnect , не имеют значения.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.