指定された節点に続くセグメントの種類を設定します。 ノードが曲線セグメントのコントロール ポイントである場合、このメソッドは、その曲線のセグメント タイプを設定します。これは、隣接するノードを挿入または削除することで、ノードの合計数に影響する可能性があります。
構文
式。SetSegmentType (Index, SegmentType)
表現ShapeNodes オブジェクトを表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| Index | 必須 | 長整数型 (Long) | セグメントの種類を設定する節点を指定します。 1 から指定した図形内のノードの数までの数値である必要があります。それ以外の場合は、エラーが発生します。 |
| SegmentType | 必須 | MsoSegmentType | セグメントの種類を指定します。 Microsoft Office タイプ ライブラリで宣言されている MsoSegmentType クラスの定数のいずれかを指定できます。 |
例
次の使用例は、作業中の文書の 3 つ目の図形のすべての直線セグメントを曲線セグメントに変更します。 図形はフリーフォームである必要があります。
Dim intCount As Integer
With ActiveDocument.Pages(1).Shapes(3).Nodes
intCount = 1
Do While intCount <= .Count
If .Item(intCount).SegmentType = msoSegmentLine Then
.SetSegmentType _
Index:=intCount, SegmentType:=msoSegmentCurve
End If
intCount = intCount + 1
Loop
End With
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。