画層を変更するLISP

画層変更を頻繁に行う場合は、LISPで専用コマンド化すると時短になります。選択→画層指定までを1コマンドに固定できるため、プロパティを開く手間や画層選択ミスを減らせます。例えば「製品はSEIHIN(B)に入れる」など社内ルールがあるなら、画層名を決め打ちしたLISPを用意すると作業が安定します。あとは対象を選んで実行するだけなので、仕上げや整理作業で効果が大きいです。

(defun c:GB (/ sel)
(setq sel (ssget))
(if sel
(command-s “._CHPROP” sel “” “LA” “SEIHIN(B)” “” “”)
)
(princ)
)