如何合并汇总多个固定格式的报表
现在要每个月合并多个地区上报的 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 中