設(shè)計院少不了的是不停的改圖，發(fā)圖筒愚，審圖赴蝇。其中轉(zhuǎn)PDF文件確實是一個費力氣的活菩浙。往往圖紙有幾十張甚至上百張巢掺，一張一張的打印著實費時費力。網(wǎng)上也有一些轉(zhuǎn)PDF的軟件劲蜻，自己也嘗試了一些陆淀，用起來都不是很滿意。我想要的是一個點一下先嬉，其他都不操心的批量打印軟件轧苫。于是決定自己動手，恰好自己工作了這幾年，用VB和Office與AutoCAD打交道積累的經(jīng)驗也不少了含懊。
先說說自己對于批量打印或者說批量轉(zhuǎn)PDF的需求身冬。
- 支持.xls/.doc/.dwg文件轉(zhuǎn)PDF。
- 支持文件夾掃描文件批量打開多個文件并打印岔乔。
- 并能將生成的PDF文件整理到文件夾中酥筝。
- 支持對于文件的簽署。也就是貼上簽名的圖片雏门。
- 支持DWG文件中查找不到的大字體的替換嘿歌。
- 支持匹配圖紙尺寸、范圍打印茁影，自動旋轉(zhuǎn)等設(shè)置宙帝。
于是目前最終的界面是這樣子的：
實際上這個軟件是自己不斷補充，逐次把功能加上去的募闲〔脚В回顧下自己做這個軟件的歷程。
之前自己也對轉(zhuǎn)圖的機械操作工作量有所體會浩螺。五十張圖紙自己要轉(zhuǎn)兩個多小時沪编。也想過能不能有批量轉(zhuǎn)圖的方法。當時還沒想到從網(wǎng)上找現(xiàn)成的工具年扩。實際上直到自己開始寫代碼蚁廓，找資料才發(fā)現(xiàn)這類的工具已經(jīng)有不少了。
有一天有個人問我有沒有批量打印word的程序厨幻。我以為是想讓我寫個程序相嵌，于是和她說，沒有寫過况脆，不過這個應(yīng)該很簡單饭宾。由于Office軟件可以錄制宏得到代碼，于是加上個批量遍歷打開文件格了，加上錄制出來的發(fā)送到打印機的設(shè)置代碼也就不用兩個小時就可以搞定出來看铆。于是發(fā)給他，得到一個回復“你真是一個神奇的人”盛末。才明白弹惦，是問我有沒有現(xiàn)成的工具。不過開了個頭悄但，就要有收尾棠隐。
再加上Excel文件的批量打印更不必說了，VBA與Excel是親密搭檔檐嚣。
于是開始思考打印DWG文件助泽。其實網(wǎng)上搜了一下，就找到了相關(guān)的VB代碼。加上遍歷打開文件就初步差不多了嗡贺。不過還要解決打印設(shè)置的問題隐解。和Office文檔不一樣的是，Excel文件诫睬、Word文件中已經(jīng)把打印設(shè)置設(shè)置好了厢漩，只需要發(fā)送到打印機就可以。而DWG圖紙里的打印設(shè)置極有可能是不正確的岩臣。所以還要考慮如何設(shè)置打印樣式的問題溜嗜。其實主要是設(shè)置打印范圍的問題。
鑒于一般我院作圖都極度不規(guī)范架谎，判斷圖框確實是個大問題炸宵，既不能用塊名稱來判斷，因為塊很可能被更名谷扣，也不能用塊或多段線的的尺寸是否匹配圖框大小來打印土全，因為可能被縮放或者塊直接被打碎了。不過有一個必須要遵守的規(guī)范就是：最終的文件会涎，一張DWG里面只能有一張圖裹匙。于是索性將打印范圍設(shè)置為“范圍”，這個問題就輕松解決了末秃。
上面這些最開始是使用VBA編寫的概页，由于VBA是寄生在主程序中的。也就是最初這版做的是在Word中批量打印DOC文件练慕，在Excel中批量打印XLS文件惰匙，在AutoCAD中批量打印DWG文件。于是有了下一個計劃：將這幾個批量打印程序整合到一起铃将。
將各個程序整合到一起项鬼，需要解決的問題是：1.VBA代碼轉(zhuǎn)寫為VB代碼，部分常量需要轉(zhuǎn)換劲阎。2.VB調(diào)用本機需要考慮版本不兼容的問題绘盟，例如2003版不帶轉(zhuǎn)PDF功能，只能發(fā)送到虛擬打印機悯仙。AutoCAD低版本相比高版本有些環(huán)境變量直接沒有龄毡，而我到現(xiàn)在也沒找到如何在低版本設(shè)置這些變量的方法。只好放棄對低版本的支持雁比。
這時發(fā)現(xiàn)稚虎，Office高版本（2007版之后）已經(jīng)自帶了轉(zhuǎn)PDF個功能，效率比發(fā)送到虛擬打印機快多了偎捎。做這個程序的時候，自己找了幾種轉(zhuǎn)PDF的方式。首先是PDF虛擬打印機茴她。例如Adobe和pdfFactory打印機寻拂。其二是軟件自帶的轉(zhuǎn)PDF功能，例如上文說到的Office自帶的SaveAsPDFandXPS功能丈牢。而AutoCAD自帶轉(zhuǎn)PDF功能其實也是有的例如DWG to PDF的打印機驅(qū)動祭钉，或者是發(fā)布功能，不過最終我沒有考慮己沛。不僅因為一些低版本沒這功能慌核，而且我也沒找到如何通過VB調(diào)用AutoCAD的發(fā)布功能。
然后最棘手的問題來了申尼，如何判斷是否本機有缺失的字體垮卓，因為簡單字體還好說，AutoCAD如果找不到的話有個默認字體师幕，直接替換了粟按。但是大字體需要自己選，如果使用VB程序打開根本不會提示用戶替換字體霹粥，于是很可能打印出來的是缺字的灭将。很多人畫圖根本不管圖紙上設(shè)置的字體本機有沒有，每次都不厭其煩的點替換字體后控，設(shè)置還有默認取消字體替換的庙曙。于是在做最初的一版的時候告知了打架如何設(shè)置字體，替換字體浩淘。如何使用acad.fmp設(shè)置默認替換字體矾利。不過，我估計也沒幾個人能聽懂馋袜。
不過字體替換這個問題最終還是解決了男旗，在打開AutoCAD的時候查找字體路徑，并將有的字體存入數(shù)組欣鳖，在打開圖紙的時候查看大字體察皇，缺失的字體直接替換成hztxt.shx。
還需要解決的一個問題是泽台，將生成的PDF文件按照源文件的路徑格式整理好什荣。使用SaveAsPDFandXPS功能很好實現(xiàn)。但是發(fā)送到打印機的就不好設(shè)置了怀酷。首選想到的是怎么讓Adobe打印機如我所愿的更改保存路徑稻爬，在查找了注冊表之后還是讓我找到了。于是Adobe打印機生成的路徑可以控制了蜕依。然后發(fā)現(xiàn)pdfFactory打印機更簡單桅锄，它的默認保存路徑是固定的琉雳。只要把二者設(shè)置為不打印預覽就可以讓打印機默默為我工作了。
最后是自動簽名功能友瘤。其實很簡單翠肘，在模板中加入的代號文字，打開的時候查找替換成相應(yīng)的圖片就可以了辫秧。DWG圖紙則是添加的image圖片路徑束倍。
還有增加了停止按鈕功能，只是加個時間判斷就可以了盟戏。
后記绪妹，用了這個批量打印之后，轉(zhuǎn)多少圖都不怕了柿究。速度快邮旷，而且一點也不累。但是卻少了最后檢查一遍圖紙的動力了笛求。哎廊移。。探入。
