社区 › VB › [求助]VBA的选择集怎么实现如下操作

robbin840311 发表于 2010-4-26 20:59:00

[求助]VBA的选择集怎么实现如下操作

题目一句话不能说明要表达的意思，代码如下：
Dim sset As AcadSelectionSet
Set sset = ThisDrawing.SelectionSets.Add(Now)

sset.Clear
sset.Select acSelectionSetAll
如何将sset传递给CAD以作后期操作呢？传递给如附件图片中的“当前选择“

学至于行 发表于 2010-4-26 21:43:00

遍历

雪山飞狐_lzh 发表于 2010-4-26 22:17:00

这个VBA干不了，选择集这块com做的很不好，没办法像lisp一样直接给其他命令调用
有间接的方法，不过要借助lisp，而且很慢
所以，不如直接用lisp实现
VBA，Autodesk自己都放弃掉了，哎

wuyunpeng888 发表于 2010-4-26 22:40:00

应该说是微软转向了

robbin840311 发表于 2010-4-27 13:18:00

版主，请问使用lisp如何实现呢？

查看完整版本: [求助]VBA的选择集怎么实现如下操作