AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~

[分享]圖紙小精靈Ver1.0-VBA版本

向下

[分享]圖紙小精靈Ver1.0-VBA版本

發表 由 林宗漢 于 周六 31 3月 - 2:57

前言:

有鑑於大部分前輩的圖都建立於模型空間(ModelSpace)之下,每次畫圖完畢發現少(多)某一張圖,當要插入或者是刪除時,就會需要在圖框內的頁次欄位進行更動,這點可以說是相當麻煩(尤其是對於超過30頁的圖檔來說),因而引發筆者寫這篇Side Project供參考使用。

使用方法:

1.程式介面建立於VBA之下,為一個dvb檔。

2.請檢查頁次項目部分為: 第OO頁共OO頁

3.請檢查圖框圈選線是否為聚合線(連續線段):偵測(LowerLeftPoint,UpperRightPoint)使用。

4.請檢查圖框圈選線所處圖層是否為 ( 出圖圖框 ):過濾圖框項目。

5.執行VBA巨集→點選第一個module(ShowUserForm)→執行。



圖框圈選線如上圖

按鈕介紹:

1.創造圖框:若需要創建一連串的圖框們,可先在Excel檔中定義圖框內容後批次輸出。



2.新增圖紙:框選所有圖框,輸入要插入的頁次,會把所有框選起來的頁次及>=插入頁次的部分批次增加。

3.去除圖紙:框選所有圖框,輸入要刪除的頁次,會把所有框選起來的頁次及>=插入頁次的部分批次減少。

4.批次列印:必須先設定列印配置,請參考AutoCAD顧問論壇上的批次出圖即可



圖三、列印配置

注意事項:先選擇要輸出的印表機→出圖內容改為視窗(要求圈選時先隨意圈選)→置中出圖→比例為1:1→圖面方位(橫式)→如有需要再更改出圖型式表→套用至配置。

檔案下載:
本機端執行環境 AutoCAD2016 x64,Excel2016 x64,下載點:

PS:每家公司圖框都不太一樣,但這部分可以去原始碼中改成自己喜歡的,程式點開檢視程式碼有註解在裡面
avatar
林宗漢
一般會員
一般會員

文章總數 : 8
年齡 : 23
來自 : 雲林
職業 : 水利工程技師
愛好 : AutoCADVBA/ExcelVBA
個性 : 樂於分享
使用年資 : 2年
使用版本 : AutoCAD2016
經驗值 : 263
威望值 : 22
注冊日期 : 2018-03-15
男 雙魚座 豬

回頂端 向下

回復: [分享]圖紙小精靈Ver1.0-VBA版本

發表 由 Tiger&蘋果爸 于 周二 3 4月 - 3:36

林宗漢 寫到:有鑑於大部分前輩的圖都建立於模型空間(ModelSpace)之下,每次畫圖完畢發現少(多)某一張圖,當要插入或者是刪除時,就會需要在圖框內的頁次欄位進行更動,這點可以說是相當麻煩(尤其是對於超過30頁的圖檔來說),因而引發筆者寫這篇Side Project供參考使用。
感謝林宗漢大大熱心無私的分享~
有興趣的朋友來試試!
讚啦!!

____________________________________________________________________________________
avatar
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 17948
年齡 : 42
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 15↑
使用版本 : AutoCAD 2016
經驗值 : 68797
威望值 : 13366
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

回復: [分享]圖紙小精靈Ver1.0-VBA版本

發表 由 vision25 于 周六 14 4月 - 15:51

感謝分享...!
avatar
vision25
一般會員
一般會員

文章總數 : 53
年齡 : 39
來自 : 新竹線
職業 : 測試
愛好 : 旅遊 攝影
個性 : 沉默寡言
使用年資 : 6
使用版本 : 2011
經驗值 : 2983
威望值 : 0
注冊日期 : 2011-02-01
男 雙子座 羊

回頂端 向下

回復: [分享]圖紙小精靈Ver1.0-VBA版本

發表 由 HEMOS 于 周一 16 4月 - 6:48

這個精靈感覺很厲害… 用不到但推一把!

使用太舊的系統或軟體可能得測試一下…
avatar
HEMOS
榮譽顧問
榮譽顧問

文章總數 : 826
年齡 : 45
來自 : 台北
職業 : 土木結構
愛好 : 攝影
個性 : 和善
使用年資 : 10年以上
使用版本 : AutoCAD 2014
積分 : 26
最佳解答 : 3
經驗值 : 7726
威望值 : 1587
回帖精華 : 1
注冊日期 : 2009-02-23
藍鵲38號
男 射手座 鼠

回頂端 向下

回復: [分享]圖紙小精靈Ver1.0-VBA版本

發表 由 jenniferaptg 于 周三 18 4月 - 11:41

這真的是一個好東西,感謝分享

jenniferaptg
初級會員
初級會員

文章總數 : 118
年齡 : 44
來自 : taiwan
職業 : cafe
愛好 : 電腦
個性 : 平易近人
使用年資 : 15
使用版本 : 用最熟的那一版
經驗值 : 4052
威望值 : 30
注冊日期 : 2009-01-30
藍鵲136號
女 雙子座 虎

回頂端 向下

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章