Word VBA教程:SetPosition方法

设置由 Index 指定的顶点位置。注意:由于顶点的编辑类型不同,此方法可能影响相邻顶点的位置。

expression.SetPosition(Index, X1, Y1)

expression   必需。该表达式返回一个 ShapeNodes对象。

Index   Long 类型,必需。要设置其位置的顶点。

X1, Y1   Single 类型,必需。新顶点相对于文档左上角的位置(以磅为单位)。

VBA示例

本示例将活动文档中图形 3 的第二个节点右移 200 磅,下移 300 磅。 图形 3 必须是任意多边形。


With ActiveDocument.Shapes(3).Nodes
    pointsArray = .Item(2).Points
    currXvalue = pointsArray(1, 1)
    currYvalue = pointsArray(1, 2)
    .SetPosition 2, currXvalue + 200, currYvalue + 300
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号