LISP : select line in specific layer and change...

[RémiL]

Hi ! Little designer here.

I'm looking to create LISP file to automate some tasks :

How to be able to select all the lines of the layer "Wall" and modify them in color "by layer" ?

Thx in advance for your feedback

[Moshe-A]

Remi,

why create a lisp when AutoCAD gives all the tools you need to do that by your own

look at QSELECT  (or FILTER) commands. after you select all objects in layer "Wall" change their color with properties toolbar or ribbon or properties palette.

cheers

moshe

[RémiL]

Hi @Moshe-A

Because I have several manipulations of this kind to do on hundreds of files

[Moshe-A · Accepted solution]

check this:

(defun c:byl (/ ss)
 (if (setq ss (ssget "_x" '((8 . "wall"))))
  (command "_.chprop" "_si" ss "_color" "_bylayer" "")
 )
 (princ)
)

[RémiL]

AutoCad say me :

the object is not in the current space

[Moshe-A]

you need to be in model space

[RémiL]

Yes i'm there

EDIT : ok it's done !!! Thx a lot