Hank's VBA 學習歷程

無論是監造日報或施工日誌，大多數的連動與引用公式都能透過函數進行處理，常見函數有「VLOOKUP」或「HLOOKUP」，其使用方法請參考 PAPAYA電腦教室 。透過以上兩種查詢函數能將EXCEL變成像是資料庫的使用方法，將原始資料列表儲存於另一張表，需要使用時透過關鍵值去查詢回傳其查詢表之對應欄位，然而關鍵值通常都是該報表的「編號」。 圖一、套用查詢函數後的報表範例 當監造日報或施工日誌套用上述方式其實已經足夠一般使用者進行整體報表的資料庫化，避免連結失效或公式錯誤造成效能不佳，惟列印的過程，還是需要 手動更改列印編號後再進行列印 ，這部分的繁瑣過程難以用函數克服，而本篇文章就是要討論一個雖用函數設定完整的報表，如何藉由VBA的力量進行批次列印，完成各位工程人員在遭遇長工期的報表輸出時的夢魘。 批次列印設定DEMO: 實作過程： 1.日報的紀錄有幾項需要另外建立工作表，比如:工項、人力、機具、材料、試驗、職安、進度、重要事項...ETC。這部分端看貴司需求而量身打造，原則是工作表上皆須紀錄編號當索引即可。 2.當工作表安排就緒，移動至報表的"列印頁次輸入"打上編號，測試看看顯示欄位的部分會不會跟著改變，如果都沒有問題，則函數設定的部分就已經完成了。( 很多網友都停滯於此! ) 3.將已經撰寫好的VBA原始碼匯入至開發人員VBA編輯器中。 4.於報表上新增按鈕並指定巨集"ToPDF"。 5.點選按鈕即可執行VBA程式，可以批次更動列印頁次編號並執行列印。 6.因本範例為列印格式為單頁的PDF，爾後只要利用" PDFBinder "合併，即可於印表機進行一次性的列印。 有此類批次列印需求的網友，請於LINE上搜尋ID【 @903qzhwa 】洽詢。 輸出格式的其他選擇： 1.列印紙本>>於報表上先預覽列印，指定印表機型號。 2.列印PDF>>EXCEL格式需高於2003版本，輸出成果為單頁PDF，不可更改 3.列印XLS>>將報表依編號順序另存到另一張工作表(僅有數值)，可利用內建的"列印活頁簿"功能，全部列印下來。 圖二、批次列印為PDF 圖三、批次列印為XLS

 前言： 當工程人員想要了解基地位置目前的土方分布情況時，通常會需要進行「收方作業」，經一連串計算後的數字則可以當作該基地的土方結算數量。收方的過程中，對於地形的表現法常見有方格法及不規則三角網法，而不規則三角網法則為本篇文章主要介紹的內容。 然而現代測量技術進步神速，地形的獲取已漸漸被無人機所取代，透過航照圖配合地面控制點的演算，已經可以得到公分級的精度點雲，一般套裝軟體皆能處理點雲使之轉換成地形基本資料。(此處僅探討點資料到橫斷面到土方估算的流程) 基本資料建置： 透過GPS或全測站將基地的地形拿回來，若地形較為平坦則可以收點時採用帶狀方法收取，若地形有特徵線，比如錐形體，則可將稜角線收取回來，收方作業的基本地形點經業主與承攬廠商會同，即可作為地形的依據。 地形點通常為一文字檔(txt或csv)，包含P,N,E,Z,CD等一連串資料，藉由QGIS將之匯入並使用Delaunay triangulation的內建運算方法，即可演算得到不規則三角網的ShapeFile，QGIS本身有支援轉成DXF的功能，之後預備匯入AutoCAD中進行後處理。 圖一、QGIS產製之TIN 圖二、QGIS之SHP匯出成DXF 操作步驟： 1.將地形點文字檔依表頭相對位置(P,N,E,Z,CD)貼附至繪圖資料庫工作表("總表")。 2.將QGIS匯出之DXF檔匯入至AutoCAD，圖面上會出現一塊塊的Hatch物件。 3.於CAD中以指令HATCHGENERATEBOUNDARY框選所有Hatch物件。 4.將Hatch與Polyline區別開，只留下Polyline備用。 5.繪製一聚合線建立中心線。 6.指定中心線給予寬度並設定樁號建立橫斷面取樣線。( 另參考這裡 ) 7.透過橫斷面取樣線與地形線(Polyline)之交點已知點距離內差其已知點高程。 8.繪製橫斷面圖，點選應作挖方或填方作業之面積並填入土方計算表。 9.由橫斷面法計算前後樁號平均面積與距離計算體積，累計後則為土方作業數量。 圖三、繪圖資料庫中"總表"相關介面 圖四、繪圖資料庫中"中心線"相關介面 圖五、收方平面地形圖成果 圖六、橫斷面圖成果(黃線為開挖位置) 圖七、土方計算表計算流程

前言： 施工照片或者查驗照片對於許多工程人員來說，是個繁瑣的麻煩事。畢竟照片只是一張圖片，需要用人眼去判讀才有辦法了解內容是什麼，因為通常會有一張白板與工地現場進行合照，然而當撰寫白板的人寫字醜到不行時，會使人瘋狂。因此在施工照片的整理上，只要能解決 照片的資訊標示 與 報表位置自動貼附並調整大小 ，想必會讓各位有此類需求的工程人員節省許多時間。 相片的收集來源有以下方式 從相機的SD卡或手機連接USB直接進行下載，其檔案名稱通常為IMG_XXXX 或 DCIM_XXXX 。 透過LINE社群中建立相簿，並將同類屬性的照片丟進同一個相簿中，爾後再透過LINE電腦版將整本相簿進行下載，其檔案名稱通常為 LINE_ALBUM_相簿名稱_XXXX 。 上述兩種方式為筆者曾經使用過的方法，於資料夾檢視情況下僅有縮圖及沒有資訊標示的檔案名稱，需要雙擊展開大圖後才有辦法判讀該相片的用途，雖然上面有一張小白板的合照，但還是需要點開之後才有辦法了解內容是什麼，而【點開】並做【資訊標示】， 本身就是一件很麻煩的事 。 解決方案： 筆者的作法是將照片先整理至一個資料夾的底下，並透過LINE相簿在進行批次下載時指定其子資料夾名稱。之後便透過我所撰寫的【施工照片瀏覽及更名】的VBA小程式進行照片的資訊標示與報表輸出，詳細操作流程如下 點擊【取得資料夾】按鈕，選取已整理好的根資料夾位置。 點擊【貼上結果】按鈕，選取是否要在工作表上顯示縮圖及大小。 移動至工作表(Result)，若於工作表(Main)中有設定顯示大圖，則進入工作表(Result)中便會根據滑鼠選取的欄位顯示相對應的大圖資訊，並留有資訊標示欄位供使用者輸入做修改。 圖一、施工照片大圖資訊 有關施工照片資訊標示均輸入完畢之後，移動至工作表(Main)點擊【更換檔名】按鈕，以VBA可判讀的資訊標示的格式進行檔案名稱儲存，未來若有相對應的格式，系統會自動判讀並做預先設定，不用再輸入一次。 點擊【列印報表】按鈕，將會依照排序方法(時間或者項目)，依序將照片自動貼上於報表中並轉換成XLS或PDF， 製作成PDF才有辦法將檔案發布給其他人使用 ，如為XLS則會在自身電腦中並帶有照片原始檔的狀況下才能看到圖片。 圖三、施工照片報表輸出PDF模式。 圖三、施工照片報表輸出XLS。 若有需要以上檔案的網友們 請於LINE上搜尋ID【 @903qz