Skip to main content

ConnectorFormat.EndConnectedShape property

Table of contents
  1. Syntax
  2. Remarks
  3. Example

Returns a Shape object that represents the shape that the end of the specified connector is attached to. Read-only.

Syntax

expression.EndConnectedShape

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

Leave a comment

Your email address will not be published. Required fields are marked *

Format your code: <pre><code class="language-vba">place your code here</code></pre>