Shapes.AddConnector Method (Publisher)

Adds a new Shape object representing a connector to the specified Shapes collection.

Syntax

expression .AddConnector(Type, BeginX, BeginY, EndX, EndY)

expression A variable that represents a Shapes object.

Parameters

Name	Required/Optional	Data Type	Description
Type	Required	MsoConnectorType	The type of connector to add.
BeginX	Required	Variant	The x-coordinate of the beginning point of the connector.
BeginY	Required	Variant	The y-coordinate of the beginning point of the connector.
EndX	Required	Variant	The x-coordinate of the ending point of the connector.
EndY	Required	Variant	The y-coordinate of the ending point of the connector.

Return Value

Shape

Remarks

For the BeginX, BeginY, EndX, and EndY parameters, numeric values are evaluated in points; strings can be in any units supported by Microsoft Publisher (for example, "2.5 in").

The new connector isn't connected to any other shape; use the BeginConnect and EndConnect methods to connect the new connector to another shape.

The Type parameter can be one of these MsoConnectorType constants.

msoConnectorCurve	Adds a curved connector.
msoConnectorElbow	Adds an elbow-shaped connector.
msoConnectorStraight	Adds a straight-line connector.
msoConnectorTypeMixed	Not used with this method.

Example

The following example adds a new straight-line connector to the first page of the active publication.

Dim shpConnect As Shape 
 
Set shpConnect = ActiveDocument.Pages(1).Shapes.AddConnector _ 
 (Type:=msoConnectorStraight, _ 
 BeginX:=144, BeginY:=144, _ 
 EndX:=180, EndY:=72)