ConnectorFormat.BeginConnect メソッド (Excel)
指定されたコネクタの始点を指定された図形に接続します。 別の図形とコネクタの始点との間の接続が既に存在して、その接続は解除されます。
コネクタの始点を指定した結合点に位置していない場合、このメソッドは、コネクタの始点を結合点に移動し、サイズとコネクタの位置を調整します。
EndConnect メソッドを使用すると、コネクタの終点を図形に接続します。
構文
式。BeginConnect (ConnectedShape、 ConnectionSite)
式ConnectorFormat オブジェクトを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
ConnectedShape | 必須 | Shape | コネクタの始点を接続する図形を指定します。 指定した Shape オブジェクトは、コネクタと同じ Shapes コレクション内にある必要があります。 |
ConnectionSite | 必須 | Long | ConnectedShape で指定された図形上の接続サイト。 1 と指定した図形の ConnectionSiteCount プロパティによって返される整数の整数である必要があります。 コネクタが接続する 2 つの図形間の最短パスを自動的に検索する場合は、この引数に有効な整数を指定し、コネクタが両端の図形にアタッチされた後に 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 c = s.AddConnector(msoConnectorCurve, 0, 0, 100, 100)
with c.ConnectorFormat
.BeginConnect ConnectedShape:=firstRect, ConnectionSite:=1
.EndConnect ConnectedShape:=secondRect, ConnectionSite:=1
c.RerouteConnections
End With
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。