Shapes.AddConnector メソッド (Publisher)

コネクタを表す新しい Shape オブジェクトを、指定した Shapes コレクションに追加します。

構文

式。AddConnector (Type、 BeginX、 BeginY、 EndX、 EndY)

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

パラメーター

名前	必須 / オプション	データ型	説明
型	必須	MsoConnectorType	追加するコネクタの種類を指定します。 このメソッドでは使用されない msoConnectorTypeMixed を除き、 MsoConnectorType クラスの定数の 1 つを指定できます。
BeginX	必須	バリアント型 (Variant)	コネクタの始点の x 軸座標を指定します。
BeginY	必須	バリアント型 (Variant)	コネクタの始点の y 軸座標を指定します。
EndX	必須	バリアント型 (Variant)	コネクタの終点の x 軸座標を指定します。
EndY	必須	バリアント型 (Variant)	コネクタの終点の y 軸座標を指定します。

戻り値

Shape

注釈

BeginX、BeginY、EndX、EndY の各パラメーターの場合、数値はポイント単位で評価されます。文字列は、Microsoft Publisher でサポートされている任意の単位 (例: "2.5 in") に含めることができます。

新しいコネクタは、他の図形に接続されていません新しいコネクタを別の図形に接続するのには、 BeginConnect メソッドおよび EndConnect メソッドを使用します。

例

次の使用例は、作業中の文書の先頭ページに、新しい直線コネクタを追加します。

Dim shpConnect As Shape 
 
Set shpConnect = ActiveDocument.Pages(1).Shapes.AddConnector _ 
 (Type:=msoConnectorStraight, _ 
 BeginX:=144, BeginY:=144, _ 
 EndX:=180, EndY:=72)

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。