Share via


ShapeRange.ConnectorFormat Property

Publisher Developer Reference

Returns a ConnectorFormat object that contains connector formatting properties. Applies to Shape or ShapeRange objects that represent connectors.

Syntax

expression.ConnectorFormat

expression   A variable that represents a ShapeRange object.

Example

This example adds two rectangles to the first page in the active publication and connects them with a curved connector.

Visual Basic for Applications
  Dim shpRect1 As Shape
Dim shpRect2 As Shape

With ActiveDocument.Pages(1).Shapes

' Add two new rectangles.
Set shpRect1 = .AddShape(Type:=msoShapeRectangle, _
    Left:=100, Top:=50, Width:=200, Height:=100)
Set shpRect2 = .AddShape(Type:=msoShapeRectangle, _
    Left:=300, Top:=300, Width:=200, Height:=100)

' Add a new curved connector.
With .AddConnector(Type:=msoConnectorCurve, _
        BeginX:=0, BeginY:=0, EndX:=100, EndY:=100) _
        .<strong class="bterm">ConnectorFormat</strong>

    ' Connect the new connector to the two rectangles.
    .BeginConnect ConnectedShape:=shpRect1, ConnectionSite:=1
    .EndConnect ConnectedShape:=shpRect2, ConnectionSite:=1

    ' Reroute the connector to create the shortest path.
    .Parent.RerouteConnections
End With

End With

See Also