如果指定的节点是顶点,则此属性的返回值表示对节点所做的更改如何影响与该节点相连的两条线段。 只读 MsoEditingType。
语法
表达式。EditingType
表达 一个代表 ShapeNode 对象的变量。
备注
此属性是只读的。 使用 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
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。