如何将多个 Excel 的格值填入到汇总表的不同列上

各分子公司现金流量表以独立的 Excel 文件上报,现需要汇总各分子公司现金流量表如下所示:

..

各子公司上报的格式完全相同,如“子公司 1.xls”内容为:

..

需要将本年金额填入汇总表“子公司 1”列中。

使用集算器实现步骤:

1.     安装运行集算器

可去润乾官网下载职场版,同时下载一个免费授权就够了,首次运行时会提示加载。

2.     准备汇总表模板,数据部分为空

..

3.     编写脚本

..

 

脚本列出来看下:


A

B

C

1

=directory("42/")

=file("42 汇总表.xls").xlsopen()

[4,43]

2

for A1

=file("42/"+A2).xlsopen()

=B2.xlscell("C"/C1(1):"C"/C1(2))

3


=cellname(C1(1),2+#A2)

=cellname(C1(2),2+#A2)

4


=B1.xlscell(B3:C3;C2)


5


=cellname(3,2+#A2)

=B1.xlscell(B5;A2.split(".")(1))

6

=file("42 汇总表.xls").xlswrite(B1)



A1 列出各子公司上报的 Excel 文件名

B1 打开要生成的汇总表模板

C1 指定获取 / 填写数据的有效行范围,第 4 到 43 行

A2 开始循环各个分子公司数据,打开 Excel(B2)并获取 C4 格 到 C43 格数据(C2 表达式)

B3 和 C3 使用 cellname 算出要写入汇总表的格子起止范围,如子公司 1 要写入 C4 到 C43 格;子公司 2 要写入 D4 到 D43 格…

B4 将子公司数据写入汇总表对应列

..

B5 和 C5 处理表头,将子公司 Excel 文件名(如:子公司 1.xls)作为表头写入汇总表第三行

..

4.     按 F9 运行脚本就可以看到前面的汇总表已经生成了。

数据与脚本.zip