Редагувати

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


ConnectorFormat.EndConnectionSite property (Excel)

Returns an integer that specifies the connection site that the end of a connector is connected to. Read-only Long.

Syntax

expression.EndConnectionSite

expression A variable that represents a ConnectorFormat object.

Remarks

If the end of the specified connector isn't attached to a shape, this property generates an error.

Example

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 end of the new connector will be attached to the same connection site as the end of the connector named Conn1To2, and the beginning 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, _ 
 100, 420, 200, 100) 
 With .Item("Conn1To2").ConnectorFormat 
 endConnSite1 = .EndConnectionSite 
 Set endConnShape1 = .EndConnectedShape 
 End With 
 With .AddConnector(msoConnectorCurve, _ 
 0, 0, 10, 10).ConnectorFormat 
 .BeginConnect r3, 1 
 .EndConnect endConnShape1, endConnSite1 
 End With 
End With

Support and feedback

Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.