ShapeNode.SegmentType プロパティ (Publisher)

指定したノードに関連付けられているセグメントが直線か曲線かを示す MsoSegmentType 定数を返します。 読み取り専用です。

構文

式。SegmentType

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

戻り値

MsoSegmentType

注釈

SegmentType プロパティの値は、Microsoft Publisher タイプ ライブラリで宣言されている MsoSegmentType クラスの定数のいずれかです。

If the specified node is a control point for a curved segment, this property returns msoSegmentCurve.

このプロパティに値を設定するには、 SetSegmentType メソッドを使用します。

例

次の使用例は、作業中の文書の最初のページの最初の図形で、すべての直線セグメントを曲線セグメントに変更します。 この使用例を正しく実行するには、指定した図形がフリーフォームである必要があります。

Sub ChangeSegmentTypes() 
 Dim intNode As Integer 
 With ActiveDocument.Pages(1).Shapes(1).Nodes 
 intNode = 1 
 Do While intNode <= .Count 
 If .Item(intNode).SegmentType = msoSegmentLine Then 
 .SetSegmentType Index:=intNode, _ 
 SegmentType:=msoSegmentCurve 
 End If 
 intNode = intNode + 1 
 Loop 
 End With 
End Sub

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

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