16年年底實(shí)習(xí)時(shí)的發(fā)現(xiàn)的小操作丹弱，在這里整理下思路击费。
CAD的插入塊功能不能同時(shí)插入多個dwg逊朽，當(dāng)時(shí)經(jīng)常要進(jìn)行這個操作侦镇，遇到幾十個dwg要插入時(shí)會比較麻煩乾吻，而且可能會漏插髓梅。當(dāng)時(shí)百度了一會拟蜻，沒找到特別直接的辦法，倒是看到了cad腳本的東西枯饿，自己摸索了下酝锅，可行。
現(xiàn)有4個dwg文件需要合并奢方，如圖1搔扁，它們均在cad默認(rèn)坐標(biāo)系中創(chuàng)建，通過插入塊操作（如圖2設(shè)置）合并的結(jié)果如圖3蟋字。
操作流程：
1稿蹲、制作CAD腳本文件 ：*.scr
2、在cad中調(diào)用腳本：在cad的命令行窗口輸入 scr — 打開*.scr文件
執(zhí)行 *.scr腳本后cad做的事情：
1鹊奖、打開第一個文件：1.dwg
2苛聘、依次插入2.dwg、3.dwg和4.dwg忠聚，并全局顯示
3设哗、將合并后文件另存到同一文件夾中( 命名為charu.dwg )
*.scr腳本文件的內(nèi)容解析：
open C:\Users\szzyuser52\Desktop\cad\1.DWG ? ? ? ? ? ? ? ? ? ? ? ? <打開“1.dwg”>
insert *C:\Users\szzyuser52\Desktop\cad\2.DWG 0,0,0 1 0? ? <插入塊-插入“2.DWG”，0,0,0 1 0 是插入塊的參數(shù)两蟀，坐標(biāo)网梢，比例啥的，具體見圖2>
? *C:\Users\szzyuser52\Desktop\cad\3.dwg 0,0,0 1 0? ? ? ? ? <繼續(xù)插入下一個塊（insert可省略）>
? *C:\Users\szzyuser52\Desktop\cad\4.dwg 0,0,0 1 0? ? ? ? ? <繼續(xù)插入下一個塊（insert可省略）>
zoom e? ? ? <縮放至全局>
saveas 2004 C:\Users\szzyuser52\Desktop\cad\charu.dwg? ? <文件另存為,2004是dwg文件版本號>
**值得注意的是赂毯，3战虏、4行前面是有一個空格的，這應(yīng)該是代表3欢瞪、4行是重復(fù)執(zhí)行2行的命令（insert）
除此以外活烙，6行最后是有一個空格的，這個空格應(yīng)該代表在另存為文件時(shí)按下確定遣鼓，其他行的最后均沒有空格**
*這些空格應(yīng)該都代表鍵盤空格鍵啸盏，我是根據(jù)命令行的提示經(jīng)過多次嘗試摸索出來的，多一個不行骑祟，少一個也不行回懦。不過，最后一行其實(shí)是可以放在5行后面次企，用一個空格隔開怯晕。雖然不太明確空格鍵的用法，但是根據(jù)命令窗口的提示去驗(yàn)證就行了*
實(shí)際上調(diào)用腳本就相當(dāng)于在命令行輸入命令來控制cad缸棵，只是由于操作重復(fù)性高舟茶，這些腳本是可以自動生成的，相當(dāng)于批量輸入cad的命令，具體就是在dwg文件完整路徑左右兩邊加上相應(yīng)的命令吧凉，當(dāng)時(shí)我是用excel的vba加上windows的批處理來實(shí)現(xiàn)腳本的自動生成的隧出，也是由于百度vba的知識來到了簡書，別看首頁雞湯多阀捅，干貨還是不少的胀瞪，而且界面還挺好看。
當(dāng)時(shí)我需要將多組的dwg通過插入塊的方式分別合并成多個文件饲鄙，幫上忙的除了cad腳本凄诞，還有就是excel的vba了，vba的應(yīng)用使我能夠一次性生成大量的cad腳本忍级，省去了很多麻煩帆谍，假如不能自動生成這些腳本，那么就不能叫批量插入了颤练，還不如一個個地插入既忆。所以接下來還要回憶一下vba的內(nèi)容。
excel vba............
