Shape.RerouteConnections メソッド (Excel)
図形に接続されたすべてのコネクタを再接続します。図形がコネクタの場合、そのコネクタを再接続します。
構文
式。RerouteConnections
式Shape オブジェクトを表す変数。
注釈
RerouteConnections メソッドは、図形間を結ぶ線 (コネクタ) の経路が最短になるように、そのコネクタを再接続します。 そのため、コネクタの端点をいったん切り離し、図形の別の結合点に接続し直すことがあります。
RerouteConnections メソッドをコネクタに適用すると、そのコネクタの経路だけが再作成されます。 このメソッドを結合した図形に適用すると、その図形のすべてのコネクタの経路が再作成されます。
例
次の使用例は、myDocument に 2 つの四角形を追加してそれらを曲線のコネクタで接続し、コネクタの経路が最短になるように再接続します。
RerouteConnections メソッドはコネクタのサイズと位置を調整し、接続する接続サイトを決定するため、BeginConnect メソッドと EndConnect メソッドで使用される ConnectionSite 引数に最初に指定した値は関係ありません。
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 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 のサポートおよびフィードバックを参照してください。