徐俊生的筆記

斷斷續續發了幾篇 [使用VBA抓資料]、[表格資料的處理] 以及 [圖表製作] 的心得後，這一天終於來到。 有人問了這個問題，「每次都發一點一點的，什麼時候可以看到我使用 Excel 的全貌呢？」 在小弟的認知當中， Excel 大約可以分為三個領域，在網路裡每個領域都有可找到高手神人： 資料處理與分析 (包括資料庫的觀念、內建工具及函數的使用、樞紐分析及大數據分析工具的使用) 數據視覺化呈現的圖表製作 自動化的 vba 程式設計 剛好，最近就有一個整合案例分享給大家，也是我作業的日常。 某一天，健保署統計了去年一整年使用痠痛貼布>192片的病患名單，要醫院自己看著辦。當然了，過去的已經改變不了，老闆會關心的點就是「今年度痠痛貼布的使用情形呢？」 於是乎…從電腦開機、去茶水間倒杯溫溫的茶走回座位開始，一直到最後結果出來，小弟我大約用了２０分鐘的時間，這期間跑資料游標呈現漏斗狀不太能動電腦時，還抽空和女同事探討了一下人生問題，這樣子的速度快不快？ 由於不便呈現真實、近期資料，所以我把資料日期拉得遠一些，一樣是半年，並且增加或刪除一些資料、去識別化。主要呈現這三個部份： 用 VBA 取得所需要的醫令(我自己有vba寫好的報表產生器模板，只要改一點點地方就可以抓到需要的資料) 把文字形態的日期用涵數date()格式化為正確的日期格式。再使用樞紐分析，統計出老闆關心的部份，像是1~6月合計使用>96片病患清單、單月使用>16片註記… 做一個圖來說明。 影片到此為止沒有錄進去後續的美編排版，其實raw data到手整理經過Excel Table化之後，使用樞紐分析可以解決八、九成以上的統計需求，而且可以非常的快速，節省下許多時間，強力推薦給每位Excel 使用者。

繼 藥品許可證及藥理治療分類批次下載.xls、WHO.ATC.DDD.Index.xls 又一大作!! 簡短地介紹它的功能, 就是： 以我們 "自己的藥品清單"→連線到  健保署 的 健保用藥品項網路查詢服務 →比對健保價 後將有價格有異動的藥品列出來 。是不是覺得真是太神奇了？ 所謂的"自己的藥品清單" 有二種方式取得－ ※可以透由此 excel 連線到 伺服器 查詢得到。是在 Excel 中利用 ADO 連接伺服器資料庫 , 把資料從伺服器抓出來，欲使用此功能需要資訊部門協助設定連線方式、修改SQL，外人無法代勞。 ※無法連接伺服器取得者，可以自己手動複制、貼上。 最後比對完成的結果會像下面這張截圖： 之後您只要將 健保藥價異動品項.xls 整理一下，就可以丟給 資訊部門 做排程更新健保藥價了。 影片示範得很清楚了，不多說。用，就對了！ 下載 健保藥價比對程式   2018.05.04 如果程式運行出現 [ 找不到專案或程式庫 ] 什麼之類的東西， 或許有些DLL沒有安裝進去!  可透過下列方式： 您可以在編輯巨集那，選取「工具」->「設定引用項目」，勾選下面兩個引用項目： Microsoft ActiveX Data Objects 6.1 Library Microsoft ActiveX Data Objects Recordset 6.0 Library 在執行流程上，我會以這樣的方式來進行： 1. 使用網頁異動偵測軟體，來追蹤 [ 健保署首頁→藥材專區→藥品→健保用藥品項 ] 有沒有新的異動檔，收到通知後就可開工進行比對。例如： 秒級偵測網頁更新變動通知(PageMonitor,Check4Change)  或 visualping - 偵測網頁更新變動自動email通知 2. 執行這支 健保藥價比對程式 ，自動從HIS主機抓出現用藥品檔→自動比對→結果自動輸出到 健保藥價異動品項.xls →整理一下。 3.丟給 資訊部門 做排程更新。 很開心地可以收工囉！ Ｑ.為何不使用健保用藥品項異動檔來比對? A: 因為有時候短期間就公告好幾筆, 例如 3/27, 3/22, 3...