Shape.RerouteConnections 方法 (PowerPoint)

  • 项目

重置连接符，使它们可以采用最短的路径连接的形状。 若要执行此操作， RerouteConnections 方法可能会分离接头两端并将它们重新连接到已连接的形状上的不同连接站点。

语法

表达式。RerouteConnections

表达 一个代表 Shape 对象的变量。

备注

此方法将重排连接在指定形状上的所有连接符；如果指定的形状是连接符，会重排该连接符。

如果此方法应用于连接器，则只会重新路由该连接器。 如果此方法应用于已连接的形状，则将重新路由到该形状的所有连接线。

示例

本示例将两个矩形添加到 myDocument，用曲线连接符连接两个矩形，然后重排连接符使两个矩形间采用最短的路径。 注意 RerouteConnections 方法调整大小和位置，并确定哪个连接它附着，因此最初指定值 ConnectionSite 参数中使用的 BeginConnect 和 EndConnect 的方法是不相关的网站。

Set myDocument = ActivePresentation.Slides(1)

Set s = myDocument.Shapes

Set firstRect = s.AddShape(msoShapeRectangle, 100, 50, 200, 100)

Set secondRect = s.AddShape(msoShapeRectangle, 300, 300, 200, 100)

Set newConnector = s _
    .AddConnector(msoConnectorCurve, 0, 0, 100, 100)

With newConnector.ConnectorFormat

    .BeginConnect firstRect, 1
    .EndConnect secondRect, 1

End With

newConnector.RerouteConnections

另请参阅

形状对象

支持和反馈

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