ShapeNodes.Insert メソッド (パブリッシャー)

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

構文

Insert (Index, SegmentType, EditingType, x1, y1, x2, y2, x3, y3)

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

パラメーター

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

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

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

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

引数 EditingTypemsoEditingAuto の場合は、この引数を指定しないでください。
X3 省略可能 バリアント型 (Variant) 新しいセグメントの EditingTypemsoEditingCorner の場合、この引数は、ページの左上隅から新しいセグメントの端点までの水平方向の距離を指定します。

引数 EditingTypemsoEditingAuto の場合は、この引数を指定しないでください。
Y3 省略可能 バリアント型 (Variant) 新しいセグメントの EditingTypemsoEditingCorner の場合、この引数は、ページの左上隅から新しいセグメントの端点までの垂直方向の距離を指定します。

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

注釈

X1Y1X2、Y2X3Y3 引数の場合、数値はポイント単位で評価されます。文字列は、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 のサポートおよびフィードバックを参照してください。