SegmentType Property

Applies To

ShapeNode object.

Description

Returns a value that indicates whether the segment associated with the specified node is straight or curved. Can be either of the following MsoSegmentType constants: msoSegmentCurve or msoSegmentLine. If the specified node is a control point for a curved segment, this property returns msoSegmentCurve. Read-only Long.

Remarks

This property is read-only. Use the SetSegmentType method to set the value of this property.

Example

This example changes all straight segments to curved segments in shape three on myDocument. Shape three must be a freeform drawing.

Set myDocument = ActiveDocument
With myDocument.Shapes(3).Nodes
    n = 1
    While n <= .Count
        If .Item(n).SegmentType = msoSegmentLine Then
            .SetSegmentType n, msoSegmentCurve
        End If
        n = n + 1
    Wend
End With