Поделиться через

Свойство ConnectorFormat.BeginConnectionSite (Excel)

  • Статья

Возвращает целое число, указывающее сайт подключения, к которому подключено начало соединителя. Только для чтения, Long.

Синтаксис

expression. BeginConnectionSite

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

Замечания

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

Пример

В этом примере предполагается, что myDocument уже содержит две фигуры, присоединенные соединителем с именем Conn1To2. Код добавляет прямоугольник и соединитель в myDocument. Начало нового соединителя будет присоединено к тому же сайту подключения, что и начало соединителя с именем Conn1To2, а конец нового соединителя будет присоединен к сайту подключения в новом прямоугольнике.

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

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

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