ConnectorFormat.BeginConnectionSite Property (Excel)
Published: July 16, 2012
Returns an integer that specifies the connection site that the beginning of a connector is connected to. Read-only Long.
This example assumes that myDocument already contains two shapes attached by a connector named "Conn1To2." The code adds a rectangle and a connector to myDocument. The beginning of the new connector will be attached to the same connection site as the beginning of the connector named "Conn1To2," and the end of the new connector will be attached to connection site one on the new rectangle.
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