次の方法で共有


Shapes.AddConnector メソッド (Excel)

コネクタを作成します。 新しいコネクタを表す Shape オブジェクトを返します。 コネクタを追加しても、すべてのものに接続されるわけではありません。 他の文書の図形にコネクタの始点と終点を接続させるには、 BeginConnect メソッドと EndConnect メソッドを使用します。

構文

AddConnector (TypeBeginXBeginYEndXEndY)

表現Shapes オブジェクトを表す変数です。

パラメーター

名前 必須 / オプション データ型 説明
必須 MsoConnectorType 追加するコネクタの種類を指定します。
BeginX 必須 Single ドキュメントの左上隅を基準としたコネクタの始点の水平方向の位置 ( ポイント単位)。
BeginY 必須 単精度浮動小数点型 (Single) 文書の左上隅を基準にしてコネクタの始点の垂直位置をポイント単位で指定します。
EndX 必須 単精度浮動小数点型 (Single) 文書の左上隅を基準にしてコネクタの終点の水平位置をポイント単位で指定します。
EndY 必須 Single ドキュメントの左上隅を基準としたコネクタの終点の垂直位置 (ポイント単位)。

戻り値

図形

注釈

コネクタを図形につなげる場合、コネクタの大きさと位置は、必要に応じて自動的に調整されます。 そのため、コネクタを他の図形にアタッチする場合、コネクタを追加するときに指定する位置と寸法は関係ありません。

次の使用例は、新しいワークシートの描画キャンバスに曲線のコネクタを追加します。

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 のサポートおよびフィードバックを参照してください。