Shapes.AddConnector 方法 (Excel)

创建一个连接符。 返回一个 Shape 对象，该对象表示新的连接器。 添加一个连接符时，它没有连接到任何对象。 在 BeginConnect 和 EndConnect 方法用于附加到文档中的其他形状的开头和结尾的连接器。

语法

表达式。AddConnector (Type、 BeginX、 BeginY、 EndX、 EndY)

expression：一个表示 Shapes 对象的变量。

参数

名称	必需/可选	数据类型	说明
Type	必需	MsoConnectorType	要添加的连接符类型。
BeginX	必需	Single	) 连接符起点相对于文档左上角的水平 位置 (磅 。
BeginY	必需	Single	连接符的起点相对于文档左上角的垂直位置（以磅为单位）。
EndX	必需	Single	连接符的终点相对于文档左上角的水平位置（以磅为单位）。
EndY	必需	Single	连接符端点相对于文档左上角) 垂直位置 (磅。

返回值

Shape

备注

将一个连接符连接到某个形状时，如果必要，该连接符的长度和位置会自动调整。 因此，如果要将连接符附加到其他形状，则添加连接符时指定的位置和尺寸是不相关的。

示例

下例将曲线连接符添加到新建工作表的画布上。

Sub AddCanvasConnector() 
 
    Dim wksNew As Worksheet 
    Dim shpCanvas As Shape 
 
    Set wksNew = Worksheets.Add 
 
    'Add drawing canvas to new worksheet 
    Set shpCanvas = wksNew.Shapes.AddCanvas( _ 
        Left:=150, Top:=150, Width:=200, Height:=300) 
 
    'Add connector to the drawing canvas 
    shpCanvas.CanvasItems.AddConnector _ 
        Type:=msoConnectorStraight, BeginX:=150, _ 
        BeginY:=150, EndX:=200, EndY:=200 
 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。