EndDisconnect 方法

使指定的连接符的终点与其所连接的图形脱离。本方法并不更改连接符的尺寸和位置：连接符的终点仍保留在原来所连接的连接站点的位置，但与该连接站点之间不再有连接。可用 BeginDisconnect 方法使连接符的起点与某一图形脱离。

expression  必需。该表达式返回一个 ConnectorFormat 对象。

示例

本示例向 myDocument 中添加了两个矩形，用连接符将这两个矩形连接起来，并自动沿着最短路径选择连接符，然后又断开连接符与矩形的连接。

Set myDocument = Worksheets(1)
Set s = myDocument.Shapes
Set firstRect = s.AddShape(msoShapeRectangle, 100, 50, 200, 100)
Set secondRect = s.AddShape(msoShapeRectangle, 300, 300, 200, 100)
set c = s.AddConnector(msoConnectorCurve, 0, 0, 0, 0)
with c.ConnectorFormat
    .BeginConnect firstRect, 1
    .EndConnect secondRect, 1
    c.RerouteConnections
    .BeginDisconnect
    .EndDisconnect
End With