Свойство ConnectorFormat.BeginConnected (Publisher)
Возвращает константу MsoTriState , указывающую, подключено ли начало указанного соединителя к фигуре. Только для чтения.
Синтаксис
expression. BeginConnected
Выражение Переменная, представляющая объект ConnectorFormat .
Возвращаемое значение
MsoTriState
Замечания
Значение свойства BeginConnected может быть одной из констант MsoTriState , объявленных в библиотеке типов Microsoft Office.
Используйте свойство EndConnected , чтобы определить, подключен ли конец соединителя к фигуре.
Пример
Если третья фигура на первой странице активной публикации является соединителем, начало которого соединено с фигурой, в этом примере сохраняется номер сайта подключения, сохраняется ссылка на подключенную фигуру, а затем отсоединяется начало соединителя от фигуры.
Dim intSite As Integer
Dim shpConnected As Shape
With ActiveDocument.Pages(1).Shapes(3)
' Test whether shape is a connector.
If .Connector Then
With .ConnectorFormat
' Test whether connector is connected to another shape.
If .BeginConnected Then
' Store connection site number.
intSite = .BeginConnectionSite
' Set reference to connected shape.
Set shpConnected = .BeginConnectedShape
' Disconnect connector and shape.
.BeginDisconnect
End If
End With
End If
End With
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.