等一个人咖啡 发表于 2022-7-24 23:00:51

vba中如何对一整个选择集进行旋转？

vba中如何对一整个选择集进行旋转？

chixun99 发表于 2022-7-25 09:35:30

遍历选择集，每个图元使用rotate方法。

mikewolf2k 发表于 2022-7-25 08:57:16

遍历，旋转

等一个人咖啡 发表于 2022-7-26 09:51:29

For ii = 0 To sset.Count - 1
sset.Item(ii).Rotate basePoint, rotationAngle
Next ii
确实是这样的
for each   in    这个循环好像不行

chixun99 发表于 2022-7-26 11:48:03

Dim En As AcadEntity
    For Each En In sSet
      En.Rotate BasePoint, RotationAngle
    Next
一样效果。

qwuiop789 发表于 2022-7-27 13:08:44

边历选择集，将每个元素旋转。raotaion
页: [1]
查看完整版本: vba中如何对一整个选择集进行旋转？