如何自動按名字抽取多個 Excel 數據后匯總到一起


例題描述

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

如何自動按名字抽取多個 Excel 數據后匯總到一起

 

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

如何自動按名字抽取多個 Excel 數據后匯總到一起

 

第1列是需要提取的數據名稱,各資產負債表中的數據分別依次提取到后面的列中。由於貨幣資金科目各企業報表中名稱不一致,所以需要模糊查找,只要名稱中含有“貨幣”即可。

實現步驟

1、 運行集算器

可去潤乾官網下載職場版,同時下載一個免費授權就夠了,首次運行時會提示加載。

2、 編寫腳本

如何自動按名字抽取多個 Excel 數據后匯總到一起

 

把代碼列出來看得清楚點

 

如何自動按名字抽取多個 Excel 數據后匯總到一起

 




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


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM