EditingType Property

expression.EditingType

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

Remarks

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

Example

This example changes all corner nodes to smooth nodes in shape three on myDocument. Shape three must be a freeform drawing.

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