08.26 Excel VBA 查詢補償金,並填入工作簿

今天要講的例子,主要跨工作簿的查詢實例。

問題如下:

Excel VBA 查詢補償金,並填入工作簿

解決的思路如下:

Excel VBA 查詢補償金,並填入工作簿

代碼運行的結果如下:

Excel VBA 查詢補償金,並填入工作簿

代碼如下:

Excel VBA 查詢補償金,並填入工作簿

代碼解析

1:2~3行 DIM定義變量;

2:4、5、21、22行 關閉、打開警告及屏幕刷新;

3:6行 後期綁定字典;

4:7行 後去當前工作簿的路徑;

5:8行 需要打開工作簿的名稱;

6:9~12行 打開記錄補償金的工作簿,並把數據賦值給數組arr,然後不保存關閉工作簿;

7:13~15行 遍歷數組arr,先判斷編號是否為空,然後把對應的key及item裝入字典;

8:16行 把基本工資工作簿裡面的數組放入數組brr;

9:17~19行 遍歷數組brr,然後把值賦值給U列;

私信 視頻 可以獲取54集VBA入門視頻

私信 VBA或 vba 可以獲取文章中含VBA代碼的Excle文件


分享到:


相關文章: