(VBA)多个EXCEL文件计算

发布网友发布时间：2022-04-24 23:32

共4个回答

热心网友时间：2023-10-14 19:51

这种计算也不一定非得编VBA，直接用公式也可以完成。
在CMD下用DIR把文件名都列出来，复制到一个新EXCEL中。
设文件名在A列，B列就可以计算该文件的值。用indirect函数即可。往下一拖（复制）就有了所有文件的结果了。
如A1的3100（文件名为3100.xls),B1取该文件SHEET1内D列平均值
则公式为：=AVERAGE(INDIRECT("["&A1&".xls]Sheet1!$D:$D"))

热心网友时间：2023-10-14 19:51

可以，我只说思路。你就自己写程序吧
1、打开新的excel工作簿，切换到vba代码编辑；
2、设置*数组，保存文件名、计算结果等；
3、把要计算的文件统一放置一个文件夹中；
4、采用遍历此文件夹中所有excel工作簿；
5、写下执行每个工作簿计算过程的子程序，返回结果保存在*数组中，且和取得的excel文件名保存一致；
6、输出在当前excel工作簿中。

热心网友时间：2023-10-14 19:52

单VB貌似实现不了追问谢谢你的回答，我也不是很懂，就是觉得200多个太麻烦了

热心网友时间：2023-10-14 19:53

发你的样本文件到57321522@qq.com