㈠ CAD中如何將一個已存在的塊替換成另外一個已存在塊
最有效的辦法：
例如：想把塊1的樣子換成塊2的樣子。
1、拷貝一個塊2出來，並炸開。
2、把炸開的圖形製作成一個塊，但是塊的名字起成塊1的名字。
3、一直點確定。
4、成功了！
這種方法適合於，想把圖形中有多處相同的塊同時改變的情況。
試試看吧！
㈡ 如何在CAD中用新塊替換原有的塊
復制到記事本，另存為123.LSP，再cad中載入即可！代碼如下
;;**********************************;選定塊替換
(defun c:cbt ()
(if (and (setq a (entsel "\nSelect a Block :"))
(setq ent (entget(car a)))
(= (cdr (assoc 0 ent)) "INSERT"))
(if (and (setq b (entsel "\nSelect a Block for change :"))
(setq ent1 (entget(car b)))
(= (cdr (assoc 0 ent)) "INSERT"))
(entmod (subst (assoc 2 ent) (assoc 2 ent1) ent1))
)
)
(princ)
)