顧問教學
加入贊助
聯絡我們[分享]LISP複製圖塊及更名
+29
swcforest
qaz6605
aqurius32
winnie
瘋瘋的熊
hugh817
Monkey.D
jgt2035
jasminyouto
sam87187898
ginse0727
s45638239
poiuyy
櫻子
et1029et
RyanGuo
rickey0228
EVONNE
JerryJr
pedromax
Tanya
YU HSIANG
wu200090
judyyai
lingo_st
鑽石級宅男
meet_emily
月蜻蜓
Tiger&蘋果爸
33 posters
![[分享]LISP複製圖塊及更名 - 頁 2 Empty](https://2img.net/i/empty.gif)
[分享]LISP複製圖塊及更名
由 Tiger&蘋果爸 2012-08-21, 09:11
主題回顧 :
分享Lee Mac提供的lisp圖塊複製更名範例，有需要的朋友請下載使用吧~
CBlock指令說明：複製完圖塊後，再更名新的圖塊名稱，再透過MOVE指令將新建立的圖塊移出。
RBlock指令說明：複製完圖塊後，再更名新的圖塊名稱，會刪除圖面中原來的圖塊。
![[分享]LISP複製圖塊及更名 - 頁 2 Aoc210](https://i.servimg.com/u/f31/12/31/59/66/aoc210.png)
程式作者 Lee Mac
http://lee-mac.com/programs.html
CBlock指令 及 RBlock指令 步驟操作：
2012.08.23補充：
適當加上巨集語法可以節省程式步驟！
例如：Cblock指令執行完畢，還需要使用者輸入MOVE指令，再將新的圖塊移出來，可以新增工具按鈕加上巨集就可一氣呵成。
Rblock指令，可以改為重複執行！
巨集指令執行時，若取消指令時請按「Esc鍵」即可。
▼複製圖塊更名
^C^CCBLOCK;\\MOVE;\
▼重複圖塊更名
*^C^CRBLOCK;\\
CopyRenameBlock.lsp程式下載（*回覆可見*）：
分享Lee Mac提供的lisp圖塊複製更名範例，有需要的朋友請下載使用吧~
CBlock指令說明：複製完圖塊後，再更名新的圖塊名稱，再透過MOVE指令將新建立的圖塊移出。
RBlock指令說明：複製完圖塊後，再更名新的圖塊名稱，會刪除圖面中原來的圖塊。
![[分享]LISP複製圖塊及更名 - 頁 2 Aoc210](https://servimg.com/r/3112315966/aoc210.png)
程式作者 Lee Mac
http://lee-mac.com/programs.html
CBlock指令 及 RBlock指令 步驟操作：
judyyai 寫到:感謝蘋爸熱心影片教學與分享~< 積分 +1><威望 +3>
2012.08.23補充：
適當加上巨集語法可以節省程式步驟！
例如：Cblock指令執行完畢，還需要使用者輸入MOVE指令，再將新的圖塊移出來，可以新增工具按鈕加上巨集就可一氣呵成。
Rblock指令，可以改為重複執行！
巨集指令執行時，若取消指令時請按「Esc鍵」即可。
▼複製圖塊更名
^C^CCBLOCK;\\MOVE;\
▼重複圖塊更名
*^C^CRBLOCK;\\
CopyRenameBlock.lsp程式下載（*回覆可見*）：
Tiger&蘋果爸 在 2022-05-05, 09:36 作了第 4 次修改
____________________________________________________________________________________
👉[好康]加入專屬B取得大補帖及看2D+3D課程(點我)👈
![[分享]LISP複製圖塊及更名 - 頁 2 Sesa2011](https://i.servimg.com/u/f67/12/31/59/66/sesa2011.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Youtub11](https://i.servimg.com/u/f67/12/31/59/66/youtub11.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Oiea2011](https://i.servimg.com/u/f67/12/31/59/66/oiea2011.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Oe20011](https://i.servimg.com/u/f67/12/31/59/66/oe20011.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Fbi20011](https://i.servimg.com/u/f67/12/31/59/66/fbi20011.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Line2011](https://i.servimg.com/u/f67/12/31/59/66/line2011.png)
👉[2022優惠活動]AutoCAD 2D進化論教學包(點我)👈
Tiger&蘋果爸- 系統管理員
- 文章總數 : 20490
年齡 : 47
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 84364
威望值 : 16298
注冊日期 : 2008-04-23
-
回復： [分享]LISP複製圖塊及更名
由 jgt2035 2015-04-16, 10:17
實用又省時的好程式,感謝分享,謝謝!
____________________________________________________________________________________
![[分享]LISP複製圖塊及更名 - 頁 2 Ioaoe110](https://i.servimg.com/u/f67/12/31/59/66/ioaoe110.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Zuoiy_10](https://i.servimg.com/u/f67/12/31/59/66/zuoiy_10.png)
![[分享]LISP複製圖塊及更名 - 頁 2 2020-211](https://i.servimg.com/u/f67/12/31/59/66/2020-211.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Aizyao11](https://i.servimg.com/u/f67/12/31/59/66/aizyao11.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Iyb_1510](https://i.servimg.com/u/f67/12/31/59/66/iyb_1510.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Aizyao10](https://i.servimg.com/u/f67/12/31/59/66/aizyao10.png)
![[分享]LISP複製圖塊及更名 - 頁 2 BPl3tjj.png](https://i.imgur.com/BPl3tjj.png.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Ziao1510](https://i.servimg.com/u/f62/19/71/67/71/ziao1510.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Oo-2-110](https://i.servimg.com/u/f67/12/31/59/66/oo-2-110.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Oooa_110](https://i.servimg.com/u/f67/12/31/59/66/oooa_110.png)
jgt2035- 初級會員
- 文章總數 : 40
年齡 : 60
來自 : 台東縣
職業 : 水利工程
愛好 : 園藝
個性 : 勤快-老實
使用年資 : 5
使用版本 : 2010
積分 : 1
經驗值 : 4285
威望值 : 13
注冊日期 : 2011-11-11
Monkey.D- 一般會員
- 文章總數 : 56
年齡 : 37
來自 : 嘉義
職業 : Auto Cad
愛好 : 待業
個性 : 交朋友
使用年資 : 1
使用版本 : 新手初學
經驗值 : 4232
威望值 : 12
注冊日期 : 2012-03-19
hugh817- 一般會員
- 文章總數 : 31
年齡 : 46
來自 : 台南
職業 : 工
愛好 : 發呆
個性 : 懶散
使用年資 : 5
使用版本 : 5
經驗值 : 4037
威望值 : 6
注冊日期 : 2012-06-02
回復： [分享]LISP複製圖塊及更名
由 瘋瘋的熊 2016-01-15, 18:18
謝謝分享，感覺很實用，可是無法下載耶...
____________________________________________________________________________________
瘋瘋的熊- 初級會員
- 文章總數 : 218
年齡 : 35
來自 : 屏東縣
職業 : 工程師
愛好 : 機縫、木工、竉物繪畫
個性 : 懶的要命
使用年資 : 2003年起至今
使用版本 : 2021
積分 : 1
經驗值 : 4203
威望值 : 84
注冊日期 : 2014-09-22
回復： [分享]LISP複製圖塊及更名
由 Tiger&蘋果爸 2016-01-18, 10:10
已經更新下載連結網址！瘋瘋的熊 寫到:謝謝分享，感覺很實用，可是無法下載耶...
____________________________________________________________________________________
👉[好康]加入專屬B取得大補帖及看2D+3D課程(點我)👈
👉[2022優惠活動]AutoCAD 2D進化論教學包(點我)👈
Tiger&蘋果爸- 系統管理員
- 文章總數 : 20490
年齡 : 47
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 84364
威望值 : 16298
注冊日期 : 2008-04-23
-
回復： [分享]LISP複製圖塊及更名
由 winnie 2016-10-01, 20:03
謝謝分享,有lisp真是方便,可以節省工作時間 
____________________________________________________________________________________
winnie- 贊助會員
- 文章總數 : 61
年齡 : 42
來自 : 台北縣
職業 : 工程業
愛好 : 文書
個性 : 溫和
使用年資 : 一年
使用版本 : 2008
經驗值 : 5085
威望值 : 0
注冊日期 : 2009-11-25
回復： [分享]LISP複製圖塊及更名
由 aqurius32 2017-10-26, 09:35
最近剛好要用大量圖塊更名，謝謝分享。
____________________________________________________________________________________
aqurius32- 初級會員
- 文章總數 : 82
年齡 : 48
來自 : 台北
職業 : 繪圖
愛好 : 泡茶
個性 : 大眾化
使用年資 : 10
使用版本 : 2005,2012
積分 : 1
經驗值 : 4477
威望值 : 24
注冊日期 : 2011-11-28
回復： [分享]LISP複製圖塊及更名
由 qaz6605 2018-02-07, 11:56
先試用這真是太實用了!!!
馬上來試看看
非常感謝!
馬上來試看看
非常感謝!
____________________________________________________________________________________
![[分享]LISP複製圖塊及更名 - 頁 2 07810](https://i.servimg.com/u/f37/12/31/59/66/07810.png)
![[分享]LISP複製圖塊及更名 - 頁 2 01310](https://i.servimg.com/u/f37/12/31/59/66/01310.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Acad1810](https://i.servimg.com/u/f39/12/31/59/66/acad1810.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Acad2010](https://i.servimg.com/u/f57/12/31/59/66/acad2010.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Acad1810](https://i.servimg.com/u/f38/12/31/59/66/acad1810.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Acad1211](https://i.servimg.com/u/f41/12/31/59/66/acad1211.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Acad1311](https://i.servimg.com/u/f75/12/31/59/66/acad1311.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Acad1511](https://i.servimg.com/u/f16/12/31/59/66/acad1511.png)
qaz6605- 初級會員
- 文章總數 : 193
年齡 : 44
來自 : 台南市
職業 : 繪圖員
愛好 : 有關電腦的
個性 : 外向
使用年資 : 剛剛初道
使用版本 : 2006
積分 : 2
經驗值 : 5958
威望值 : 82
注冊日期 : 2008-12-31
回復： [分享]LISP複製圖塊及更名
由 swcforest 2018-06-03, 22:28
最近剛好在研究如何更名圖塊
感謝大大提供分享
感謝大大提供分享
____________________________________________________________________________________
![[分享]LISP複製圖塊及更名 - 頁 2 078](https://dl.dropboxusercontent.com/u/9657907/AutoCAD/AutoCAD-tw.com/078.png)
![[分享]LISP複製圖塊及更名 - 頁 2 013](https://dl.dropboxusercontent.com/u/9657907/AutoCAD/AutoCAD-2D2/013.png)
swcforest- 初級會員
- 文章總數 : 113
年齡 : 43
來自 : 台中市南區
職業 : 土木工程設計
愛好 : 遊山玩水及AutoLISP
個性 : 開朗活潑
使用年資 : 六七年了
使用版本 : AutoCAD 2016
積分 : 1
經驗值 : 5580
威望值 : 10
注冊日期 : 2008-07-27
白宗禮- 專屬會員
- 文章總數 : 29
年齡 : 43
來自 : 台灣
職業 : 學生
個性 : 帥
經驗值 : 5134
威望值 : 0
注冊日期 : 2009-05-23
leechingting- 一般會員
- 文章總數 : 25
年齡 : 46
來自 : 七堵區
職業 : 繪圖員
愛好 : auto cad
個性 : 開朗
使用年資 : 10年以上
使用版本 : 2017
經驗值 : 742
威望值 : 6
注冊日期 : 2021-06-02
回復： [分享]LISP複製圖塊及更名
由 powerfly 2022-11-29, 01:28
很棒的分享，實用性滿分，每次要置換圖塊名稱，光看一堆亂碼都要找很久，都要開新圖去重設定。用這個指令方便多了。
powerfly- 一般會員
- 文章總數 : 21
年齡 : 40
來自 : 新北市
職業 : 室內專業美化施工人員
愛好 : 看東看西.無定性
個性 : 舉棋不定
使用年資 : 8YEAR
使用版本 : 2011
經驗值 : 4504
威望值 : 9
注冊日期 : 2011-01-06
ccchiang- 一般會員
- 文章總數 : 35
年齡 : 45
來自 : 臺灣基隆
職業 : 待業
愛好 : 看電影
個性 : 好奇
使用年資 : 3
使用版本 : autocad2012
經驗值 : 2941
威望值 : 0
注冊日期 : 2015-05-28
AutoCAD顧問 :: 技術(發言等級:一般會員) :: :: 進階討論
第2頁(共2頁)
這個論壇的權限：
您 無法 在這個版面回復文章
![[分享]LISP複製圖塊及更名 - 頁 2 2020-310](https://i.servimg.com/u/f67/12/31/59/66/2020-310.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Oiu15010](https://i.servimg.com/u/f67/12/31/59/66/oiu15010.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Ia15010](https://i.servimg.com/u/f62/19/71/67/71/ia15010.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Uos15010](https://i.servimg.com/u/f67/12/31/59/66/uos15010.png)
![[分享]LISP複製圖塊及更名 - 頁 2 BPl3tjj](https://i.imgur.com/BPl3tjj.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Aoe1-111](https://i.servimg.com/u/f67/12/31/59/66/aoe1-111.png)
![[分享]LISP複製圖塊及更名 - 頁 2 Uos15011](https://i.servimg.com/u/f67/12/31/59/66/uos15011.png)
![[分享]LISP複製圖塊及更名 - 頁 2 RQvAhqF](https://i.imgur.com/RQvAhqF.png)
![[分享]LISP複製圖塊及更名 - 頁 2 YdKelqY](https://i.imgur.com/ydKelqY.png)
![[分享]LISP複製圖塊及更名 - 頁 2 K410yWG](https://i.imgur.com/k410yWG.png)