如何合并汇总多个固定格式的报表
现在要每个月合并多个地区上报的 Excel，每个 Excel 都包含多 sheet。将合并汇总结果保存到新 Excel 中，格式保持不变。
各地 Excel 内容如下，需要将多个 sheet 数据都汇总（求和）：
实现步骤：
1. 首先准备一个汇总 Excel，除数据部分为空外，其他统计项、格式与被汇总的 Excel 完全相同
2. 编写集算器脚本（可以到润乾官网下载，用职场版，首次运行时需要加载授权，同时下载一个免费的授权就行）
脚本列出来看方便些：
A |
B |
C |
D |
|
1 |
D:/ 汇总 Excel/ |
=directory(A1) |
=file("汇总表.xls").xlsopen() |
|
2 |
资产负债表 |
=to(4,53) |
[C,D,G,H] |
=C2.(B2.(C2.~/~)).conj() |
3 |
利润表 |
=to(4,32) |
[C,D,E] |
=C3.(B3.(C3.~/~)).conj() |
4 |
销售费用表 |
=to(4,24) |
[C,D,E] |
=C4.(B4.(C4.~/~)).conj() |
5 |
管理费用表 |
=to(4,35) |
[C,D,E] |
=C5.(B5.(C5.~/~)).conj() |
6 |
应上缴应弥补款项表 |
=to(4,32) |
[C,F] |
=C6.(B6.(C6.~/~)).conj() |
7 |
现金流量表 |
=to(4,43) |
[C,D] |
=C7.(B7.(C7.~/~)).conj() |
8 |
快报 |
=to(2,47) |
[C,D,E,F,G] |
=C8.(B8.(C8.~/~)).conj() |
9 |
for B1 |
=file(A1/A9).xlsopen() |
||
10 |
for [A2:A7] |
for [D2:D7].m(#B10) |
=B9.xlscell(C10,B10) |
|
11 |
=C1.xlscell(C10,B10) |
|||
12 |
=C1.xlscell(C10,B10;string(number(D10)+number(D11))) |
|||
13 |
=file("38汇总表.xls").xlswrite(C1) |
B1 列出目录下各个要汇总的 Excel
A2-D8 指定 7 个表要汇总的范围
A9-D12 循环每个分公司 Excel，通过 xlscell 函数取得要汇总的数值（D10），同时取出汇总表对应项目的值（D11），然后累加后将其写回汇总表（D12）
A13 最后将汇总后数据输出到汇总表.xls 中
