Autolisp support required to change selected element to 123 layer and set color of the selected element to by layer

[karthikeyanskm]

i have prepared a lisp to set selected element to 123 layer. But dont know to how set the color to bylayer.
My code:
Changes selected objects to Layer 123
(defun c:RD1 ()
(command "_.chprop"
(ssget ) "" "LA" "123" "") )

[paullimapa · Accepted solution]

You’re almost there.  It’s another prompt in the Chprop command:

(command "_.chprop"
(ssget) "" "_LA" "123" "_Color" "_Bylayer" "") )

[TomBeauford · Accepted solution]

(defun c:RD1 ()
  (command "_.chprop"
  (ssget ) "" "LA" "123" "Color" "ByLayer" "")
)

Of course that function only works for changing to one layer and only sets one property to ByLayer.

You can set any layer you want for selected objects from the Layers drop-down in the Ribbon or Quick Access Toolbar and the SETBYLAYER command can set all properties you want to ByLayer in it's Settings or set the Color from the drop-down in Properties.

[Sea-Haven]

Bylayer is also color 256.