【快速选择】的方法,选择同一个图层的对象,在属性里面修改图层。
另外一个方法就是使用插件,代码如下:
(defunc:tes(/&k1&kw1&ob1&tc1)
(setvar"cmdecho"0)
(setvar"blipmode"0)
(if(nullvlax-dump-object)(vl-load-com))
(if(setq&tc1(entsel"请选择参考图层或默认为当前图层"))
(setq&tc1(CDR(assoc8(entget(car&tc1)))))
(setq&tc1(getvar"clayer"))
)
(if(setq&kw1(ssget))
(Progn
(while(setq&k1(ssname&kw10))
(setq&kw1(ssdel&k1&kw1))
(setq&ob1(vlax-ename->vla-object&k1))
(vla-put-layer&ob1&tc1);修改图层为指定图层
(vla-put-color&ob1256);改变颜色为图层颜色
);while
)
)
(PRinc)
);复制到记事本,以【.lsp】为后缀命名,打开CAD,Autolisp加载了,命令【tes】
输入对象选择过滤器命令fi---在对话框里下拉菜单选择:颜色---点击下拉菜单旁边的颜色按钮,选择颜色---确定--添加到列表---应用---全部框选---回车,即把符合刚才你设置的颜色的线条选出来了。你可以任意更改线条属性,设置颜色。参考我的截图,注意,如果有块,最好先打散。详细的解答了,希望你采纳,谢谢~