Reu Posted March 18, 2013 Share Posted March 18, 2013 Help anyone? http://www.theswamp.org/index.php?topic=44203.0 Thanks, Reuben Shilling Quote Link to comment Share on other sites More sharing options...
Reu Posted March 18, 2013 Author Share Posted March 18, 2013 Solved. http://www.theswamp.org/index.php?topic=44203.new#new Quote Link to comment Share on other sites More sharing options...
BIGAL Posted March 19, 2013 Share Posted March 19, 2013 Another solution you can edit a blocks attributes by its creation position and ignore all together the attribute tag method of changing. I started with this method in VBA Attrib(x) where x is the order number, I now have a VL version nice thing here is you can change any or all with control. (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)) ) Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.