[分享]圖紙小精靈Ver1.0-VBA版本
[分享]圖紙小精靈Ver1.0-VBA版本
前言:
有鑑於大部分前輩的圖都建立於模型空間(ModelSpace)之下,每次畫圖完畢發現少(多)某一張圖,當要插入或者是刪除時,就會需要在圖框內的頁次欄位進行更動,這點可以說是相當麻煩(尤其是對於超過30頁的圖檔來說),因而引發筆者寫這篇Side Project供參考使用。
使用方法:
1.程式介面建立於VBA之下,為一個dvb檔。
2.請檢查頁次項目部分為: 第OO頁共OO頁
3.請檢查圖框圈選線是否為聚合線(連續線段):偵測(LowerLeftPoint,UpperRightPoint)使用。
4.請檢查圖框圈選線所處圖層是否為 ( 出圖圖框 ):過濾圖框項目。
5.執行VBA巨集→點選第一個module(ShowUserForm)→執行。
![[分享]圖紙小精靈Ver1.0-VBA版本 Uyeau-11](https://i.servimg.com/u/f62/19/88/63/53/uyeau-11.jpg)
圖框圈選線如上圖
按鈕介紹:
1.創造圖框:若需要創建一連串的圖框們,可先在Excel檔中定義圖框內容後批次輸出。
![[分享]圖紙小精靈Ver1.0-VBA版本 Uyeau-13](https://i.servimg.com/u/f62/19/88/63/53/uyeau-13.jpg)
2.新增圖紙:框選所有圖框,輸入要插入的頁次,會把所有框選起來的頁次及>=插入頁次的部分批次增加。
3.去除圖紙:框選所有圖框,輸入要刪除的頁次,會把所有框選起來的頁次及>=插入頁次的部分批次減少。
4.批次列印:必須先設定列印配置,請參考AutoCAD顧問論壇上的批次出圖即可
![[分享]圖紙小精靈Ver1.0-VBA版本 Uyeau-12](https://i.servimg.com/u/f62/19/88/63/53/uyeau-12.jpg)
圖三、列印配置
注意事項:先選擇要輸出的印表機→出圖內容改為視窗(要求圈選時先隨意圈選)→置中出圖→比例為1:1→圖面方位(橫式)→如有需要再更改出圖型式表→套用至配置。
檔案下載:
本機端執行環境 AutoCAD2016 x64,Excel2016 x64,下載點:
PS:每家公司圖框都不太一樣,但這部分可以去原始碼中改成自己喜歡的,程式點開檢視程式碼有註解在裡面
有鑑於大部分前輩的圖都建立於模型空間(ModelSpace)之下,每次畫圖完畢發現少(多)某一張圖,當要插入或者是刪除時,就會需要在圖框內的頁次欄位進行更動,這點可以說是相當麻煩(尤其是對於超過30頁的圖檔來說),因而引發筆者寫這篇Side Project供參考使用。
使用方法:
1.程式介面建立於VBA之下,為一個dvb檔。
2.請檢查頁次項目部分為: 第OO頁共OO頁
3.請檢查圖框圈選線是否為聚合線(連續線段):偵測(LowerLeftPoint,UpperRightPoint)使用。
4.請檢查圖框圈選線所處圖層是否為 ( 出圖圖框 ):過濾圖框項目。
5.執行VBA巨集→點選第一個module(ShowUserForm)→執行。
![[分享]圖紙小精靈Ver1.0-VBA版本 Uyeau-11](https://i.servimg.com/u/f62/19/88/63/53/uyeau-11.jpg)
圖框圈選線如上圖
按鈕介紹:
1.創造圖框:若需要創建一連串的圖框們,可先在Excel檔中定義圖框內容後批次輸出。
![[分享]圖紙小精靈Ver1.0-VBA版本 Uyeau-13](https://i.servimg.com/u/f62/19/88/63/53/uyeau-13.jpg)
2.新增圖紙:框選所有圖框,輸入要插入的頁次,會把所有框選起來的頁次及>=插入頁次的部分批次增加。
3.去除圖紙:框選所有圖框,輸入要刪除的頁次,會把所有框選起來的頁次及>=插入頁次的部分批次減少。
4.批次列印:必須先設定列印配置,請參考AutoCAD顧問論壇上的批次出圖即可
![[分享]圖紙小精靈Ver1.0-VBA版本 Uyeau-12](https://i.servimg.com/u/f62/19/88/63/53/uyeau-12.jpg)
圖三、列印配置
注意事項:先選擇要輸出的印表機→出圖內容改為視窗(要求圈選時先隨意圈選)→置中出圖→比例為1:1→圖面方位(橫式)→如有需要再更改出圖型式表→套用至配置。
檔案下載:
本機端執行環境 AutoCAD2016 x64,Excel2016 x64,下載點:
PS:每家公司圖框都不太一樣,但這部分可以去原始碼中改成自己喜歡的,程式點開檢視程式碼有註解在裡面
林宗漢- 專屬會員
- 文章總數 : 18
年齡 : 26
來自 : 雲林
職業 : 水利工程技師
愛好 : AutoCADVBA/ExcelVBA
個性 : 樂於分享
使用年資 : 2年
使用版本 : AutoCAD2016
經驗值 : 1226
威望值 : 34
注冊日期 : 2018-03-15
回復: [分享]圖紙小精靈Ver1.0-VBA版本
感謝林宗漢大大熱心無私的分享~林宗漢 寫到:有鑑於大部分前輩的圖都建立於模型空間(ModelSpace)之下,每次畫圖完畢發現少(多)某一張圖,當要插入或者是刪除時,就會需要在圖框內的頁次欄位進行更動,這點可以說是相當麻煩(尤其是對於超過30頁的圖檔來說),因而引發筆者寫這篇Side Project供參考使用。
有興趣的朋友來試試!

回復: [分享]圖紙小精靈Ver1.0-VBA版本
感謝分享...!
vision25- 一般會員
- 文章總數 : 59
年齡 : 41
來自 : 新竹線
職業 : 測試
愛好 : 旅遊 攝影
個性 : 沉默寡言
使用年資 : 6
使用版本 : 2011
經驗值 : 3905
威望值 : 0
注冊日期 : 2011-02-01
回復: [分享]圖紙小精靈Ver1.0-VBA版本
這個精靈感覺很厲害… 用不到但推一把!
使用太舊的系統或軟體可能得測試一下…
使用太舊的系統或軟體可能得測試一下…
HEMOS- 榮譽顧問
- 文章總數 : 877
年齡 : 48
來自 : 台北
職業 : 土木結構
愛好 : 攝影,音樂,電影
個性 : 和善
使用年資 : 20年以上
使用版本 : 始於R14, 2D順手2008,3D建模與彩現最新版本為佳!
積分 : 27
最佳解答 : 3
經驗值 : 8868
威望值 : 1639
回帖精華 : 1
注冊日期 : 2009-02-23
回復: [分享]圖紙小精靈Ver1.0-VBA版本
這真的是一個好東西,感謝分享
jenniferaptg- 專屬會員
- 文章總數 : 124
年齡 : 46
來自 : taiwan
職業 : cafe
愛好 : 電腦
個性 : 平易近人
使用年資 : 15
使用版本 : 用最熟的那一版
經驗值 : 4974
威望值 : 30
注冊日期 : 2009-01-30
AutoCAD顧問 :: 技術(發言等級:一般會員) :: :: 進階討論
第1頁(共1頁)
這個論壇的權限:
您 無法 在這個版面回復文章