例題描述
某文件目錄里有多個企業資產負債表,其中一個如下圖所示:

現在需要從這些資產負債表中提取某些數據進行財務分析,目標表如下圖所示:

第1列是需要提取的數據名稱,各資產負債表中的數據分別依次提取到后面的列中。由於貨幣資金科目各企業報表中名稱不一致,所以需要模糊查找,只要名稱中含有“貨幣”即可。
實現步驟
1、 運行集算器
可去潤乾官網下載職場版,同時下載一個免費授權就夠了,首次運行時會提示加載。
2、 編寫腳本

把代碼列出來看得清楚點

A1 定義數據文件保存的目錄變量dir
A2 打開目標匯總文件“財務分析.xlsx”為Excel對象
A3 列出目錄中所有的資產負債表文件(以zc開頭的)
D3 定義要提取的數據名稱序列
A4 循環目錄中的資產負債表
B4 打開當前循環的資產負債表為Excel對象
B5 循環要提取的數據項目
C5 循環當前資產負債表的每一行
D5 循環當前資產負債表的每一列
E5 讀取當前行列的單元格內容
E6-F8 如果單元格內容匹配當前數據項,則讀出它右邊第2個單元格內容,填入目標報表Excel對象的相應單元格,然后結束C5開始的循環,繼續查找下一項數據。
A9 把匯總好數據的目標Excel對象A2保存到目標文件。
3、 按F9運行這段程序,打開目標文件財務分析.xlsx,可以看到本文開頭所要求的財務數據。
【附件】 cwfx.zip