设置由 Index 指定的节点后面的线段的段类型。 如果节点是曲线段的控制点,该方法将设置该曲线的段类型。 请注意,该方法可能由于插入或删除相邻的结点而影响结点总数。
语法
表达式。SetSegmentType (Index、 SegmentType)
表达 一个代表 ShapeNodes 对象的变量。
参数
名称 | 必需/可选 | 数据类型 | 说明 |
---|---|---|---|
Index | 必需 | Long | 需要设置线段类型的节点。 |
SegmentType | 必需 | MsoSegmentType | 指定是直线段还是曲线段。 |
示例
本示例将 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
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。