ShapeNodes.Insert メソッド (Publisher)

  • [アーティクル]

指定されたフリーフォームの節点の後に新しいセグメントを挿入します。

構文

式。Insert (Index, SegmentType, EditingType, X1, Y1, X2, Y2, X3, Y3)

式ShapeNodes オブジェクトを表す変数。

パラメーター

名前 必須 / オプション データ型 説明
Index 必須 長整数型 (Long) 新しい節点を挿入する位置の前にある節点の番号を指定します。
SegmentType 必須 MsoSegmentType 追加するセグメントの種類を指定します。 MsoSegmentType クラスの定数の 1 つを指定できます。
EditingType 必須 MsoEditingType 新しいノードの編集の種類。 MsoEditingType クラスの定数の 1 つを指定できます。
X1 必須 バリアント型 新しいセグメントの EditingType が msoEditingAuto の場合、この引数はページの左上隅から新しいセグメントの端点までの水平方向の距離を指定します。

新しいノードの EditingType が msoEditingCorner の場合、この引数は、ページの左上隅から新しいセグメントの最初のコントロール ポイントまでの水平方向の距離を指定します。
Y1 必須 バリアント型 新しいセグメントの EditingType が msoEditingAuto の場合、この引数はページの左上隅から新しいセグメントの端点までの垂直距離を指定します。

新しいノードの EditingType が msoEditingCorner の場合、この引数はページの左上隅から新しいセグメントの最初のコントロール ポイントまでの垂直距離を指定します。
X2 省略可能 バリアント型 新しいセグメントの EditingType が msoEditingCorner の場合、この引数はページの左上隅から新しいセグメントの 2 番目のコントロール ポイントまでの水平方向の距離を指定します。

引数 EditingType が msoEditingAuto の場合は、この引数を指定しないでください。
Y2 省略可能 バリアント型 新しいセグメントの EditingType が msoEditingCorner の場合、この引数はページの左上隅から新しいセグメントの 2 番目のコントロール ポイントまでの垂直距離を指定します。

引数 EditingType が msoEditingAuto の場合は、この引数を指定しないでください。
X3 省略可能 バリアント型 新しいセグメントの EditingType が msoEditingCorner の場合、この引数はページの左上隅から新しいセグメントのエンドポイントまでの水平方向の距離を指定します。

引数 EditingType が msoEditingAuto の場合は、この引数を指定しないでください。
Y3 省略可能 バリアント型 新しいセグメントの EditingType が msoEditingCorner の場合、この引数はページの左上隅から新しいセグメントのエンドポイントまでの垂直距離を指定します。

引数 EditingType が msoEditingAuto の場合は、この引数を指定しないでください。

注釈

X1、Y1、X2、Y2、X3、および Y3 引数の場合、数値はポイント単位で評価されます。文字列は、Publisher でサポートされている任意の単位 (例: "2.5 in") に含めることができます。

例

次の使用例は、作業中の文書の 3 番目の図形の 4 番目の節点の後に、曲線セグメントを持つ滑らかな節点を追加します。 図形は、少なくとも 4 つの節点を持つフリーフォームである必要があります。

With ActiveDocument.Pages(1).Shapes(3).Nodes 
 .Insert Index:=4, _ 
 SegmentType:=msoSegmentCurve, _ 
 EditingType:=msoEditingAuto, _ 
 X1:=210, Y1:=100 
End With

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

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