编辑多属性wi
帮助任何人?http://www.theswamp.org/index.php?topic=44203.0
谢谢
鲁本先令 解决了的。
http://www.theswamp.org/index.php?topic=44203.new#new 另一种解决方案是,您可以通过其创建位置编辑块属性,并忽略所有一起更改的属性标记方法。我从VBA Attrib(x)中的这个方法开始,其中x是订单号,我现在有一个VL版本,很好的一点是,你可以用控件更改任何或全部。
(vl-load-com)
(setq y 1)
(setq ss1 (car (entsel)))
(setq bname (vla-get-name(vlax-ename->vla-object SS1)))
(setq x (getint "\nEnter line no to pick")) ; change this line in block
(SETQ newstrblank ".")
(foreach att (vlax-invoke (vlax-ename->vla-object SS1) 'getattributes)
(if (= y x)
(vla-put-textstring att newstrblank)
)
)
(setq y (+ Y 1))
)
页:
[1]