Свойство ShapeRange.ConnectorFormat (Excel)
Возвращает объект ConnectorFormat , содержащий свойства форматирования соединителя. Применяется к объектам ShapeRange , представляющим соединители. Только для чтения.
Синтаксис
expression. ConnectorFormat
Выражение Выражение, возвращающее объект ShapeRange .
Пример
В этом примере два прямоугольника добавляются в myDocument, присоединяются к ним с помощью соединителя, автоматически перенаправляют соединитель по кратчайшему пути, а затем отсоединяют соединитель от прямоугольников.
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 c = s.AddConnector(msoConnectorCurve, 0, 0, 0, 0)
with c.ConnectorFormat
.BeginConnect firstRect, 1
.EndConnect secondRect, 1
c.RerouteConnections
.BeginDisconnect
.EndDisconnect
End With
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.