全部显示

SegmentType 属性

返回一个值，该值表示与指定的节点相关联的线段是直线还是曲线。如果指定的节点是曲线段上的控制点，则该属性返回 msoSegmentCurve。MsoSegmentType 类型，只读。

expression   必需。该表达式返回“应用于”列表中的对象之一。

说明

用 SetSegmentType 方法设置该属性的值。

示例

本示例将 myDocument 中第三个图形的所有直线段都更改为曲线段。第三个图形必须是任意多边形。

Set myDocument = Worksheets(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