VBA 如何多 sheet 数据按列值对齐合计

汇总某年 12 个月的员工绩效数据，按人汇总到 Year 表中，然后计算各 Project 的绩效总和，写入最后一行，相关的数据与汇总表如下：

下面为其中一个月的数据：

汇总表 Year，希望点按 SUM 按钮后就能自动计算。麻烦的是每页的人员次序和人数都不一定。

可以使用集算器, 完成对齐汇总后再被 VBA 调用。

集算器安装包可去 润乾网站 下载职场版，运行时需要一个授权，免费版本就够用。

我们将上述事例实现步骤：

1.    在集算器中编写脚本 sheets.dfx：

	A	B
1	=file(arg1).xlsopen()	/ 打开 Excel 文件
2	=A1.xlsimport@t(;1,3:17).(Employee)	/ 获取 year 下的用户列表
3	=t