本人'；m搜索lisp到s
你好嗯，我在几层楼工作，我们有一栋公寓楼，
在每个公寓里，我们有很多街区，比如“床”，
我想一次选择所有的床来更改这个块的层，我不想进入edit_块来更改线的层，但以将块“床”设置为层“mobilier”为例，
按名称选择的过滤器无法将块识别为块，qselection也无法识别。
我希望有人能帮我，
谢谢
这是我的第一个帖子，我不经常说英语，所以我很抱歉我的错误。。。 假设我已经理解了要求，下面是一个快速的Vanilla AutoLISP解决方案供您尝试：
(defun c:nestblocklayer ( / blk def ent enx lay )
(setq blk "bed" ;; Nested block name
lay "mobilier" ;; New layer for nested blocks
blk (strcase blk)
)
(while (setq def (tblnext "block" (not def)))
(setq ent (tblobjname "block" (cdr (assoc 2 def))))
(while (setq ent (entnext ent))
(if
(and
(setq enx (entget ent))
(= "INSERT" (cdr (assoc 0 enx)))
(= blk (strcase (cdr (assoc 2 enx))))
)
(entmod (subst (cons 8 lay) (assoc 8 enx) enx))
)
)
)
(command "_.regenall")
(princ)
) 谢谢李的回答，但它似乎不起作用，
为了确保lisp文件和我需要的情况，
如果只有一个块和一个层，我不会使用lisp，但我需要很好地组织好几个块和几个文件，并且有很多明显的现象：极客：
我得到了什么。图纸
我需要什么。图纸
lisp lee mac mobilier。lsp 对不起，我周五晚上试过了，我结束了，效果很好，非常感谢李，
你是最棒的！
我正在你的网站上寻找有效的名字lisp，所以我可以选择我的所有动态块了！我希望，我可以选择区块以及与它！
非常感谢！
页:
[1]