EditingType 属性

       

如果指定的节点为顶点,则本属性的值决定对节点所做的更改将如何影响与该节点所连的两线段。MsoEditingType 类型,只读。

expression.EditingType

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

说明

本属性只读。可用 SetEditingType 方法设置本属性的值。

示例

本示例使 myDocument 上第三个图形中所有的尖角节点变成平滑节点。第三个图形必须是任意多边形。

Set myDocument = Worksheets(1)
With myDocument.Shapes(3).Nodes
    For n = 1 to .Count
        If .Item(n).EditingType = msoEditingCorner Then
            .SetEditingType n, msoEditingSmooth
        End If
    Next
End With