BeginConnected Property
Applies To
ConnectorFormat object.
Description
True if the beginning of the specified connector is connected to a shape. Read-only Long.
Example
If shape three on myDocument is a connector whose beginning is connected to a shape, this example stores the connection site number in the variable oldBeginConnSite, stores a reference to the connected shape in the object variable oldBeginConnShape, and then disconnects the beginning of the connector from the shape.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(3)
If .Connector Then
With .ConnectorFormat
If .BeginConnected Then
oldBeginConnSite = .BeginConnectionSite
Set oldBeginConnShape = .BeginConnectedShape
.BeginDisconnect
End If
End With
End If
End With