Share via

SegmentType Property

  • Article

MsoSegmentType

MsoSegmentType can be one of these MsoSegmentType constants.
msoSegmentCurve The SegmentType property returns this value if the specified node is a control point for a curved segment.
msoSegmentLine

expression.SegmentType

*expression   * Required. An expression that returns one of the objects in the Applies To list.

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 = ActivePresentation.Slides(1)
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

Applies to | ShapeNode Object