ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 901|回复: 2

[分享] 如何对多个 Excel 做累计汇总

[复制链接]

TA的精华主题

TA的得分主题

发表于 2021-6-15 14:22 | 显示全部楼层 |阅读模式
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
这样的问题经常能看到,分享一种解决方案。
Excel 按天存储日销售数据,现在需要针对每日的销售数据做累加算出月销售额。如 8 月 1 日的月销售额与日销售额相同(已填写):


8 月 2 日的月销售额则需要使用上一日的月销售额和本日销售额做累计求出:


使用集算器实现步骤:
1. 安装运行esProc
2. 编写esProc SPL脚本


脚本列出来看下:
ABC
1=directory@p("40/")
2for A1=file(A2).xlsimport@t()=A1.m(#A2+1)
3if len(C2)>0=file(C2).xlsimport@t()
4>C3.run(月销售额 =B2.select@1( 姓名 ==C3. 姓名). 月销售额 + 日销售额 )
5=file(C2).xlsexport@t(C3)
A1 列出目录下所有文件,按日期有序
A2 开始循环这些文件,读取当日数据(B2),并判断如果有下一日文件(B3)则读入下一日文件(C3),计算下一日月销售额为上一日月销售额 + 本日销售额(C4)
最后将下一日 Excel 输出(C5),完成计算。
3. 按 F9 运行脚本就可以看到 8 月 2 日的月销售额已经算出来了

Excel 按天存储日销售数据,现在需要针对每日的销售数据做累加算出月销售额。如 8 月 1 日的月销售额与日销售额相同(已填写):


8 月 2 日的月销售额则需要使用上一日的月销售额和本日销售额做累计求出:


使用集算器实现步骤:
1. 安装运行esProc
2. 编写esProc SPL脚本


脚本列出来看下:
ABC
1=directory@p("40/")
2for A1=file(A2).xlsimport@t()=A1.m(#A2+1)
3if len(C2)>0=file(C2).xlsimport@t()
4>C3.run(月销售额 =B2.select@1( 姓名 ==C3. 姓名). 月销售额 + 日销售额 )
5=file(C2).xlsexport@t(C3)
A1 列出目录下所有文件,按日期有序
A2 开始循环这些文件,读取当日数据(B2),并判断如果有下一日文件(B3)则读入下一日文件(C3),计算下一日月销售额为上一日月销售额 + 本日销售额(C4)
最后将下一日 Excel 输出(C5),完成计算。
3. 按 F9 运行脚本就可以看到 8 月 2 日的月销售额已经算出来了


TA的精华主题

TA的得分主题

发表于 2021-6-15 14:51 | 显示全部楼层
感觉好高级的样子~

TA的精华主题

TA的得分主题

 楼主| 发表于 2021-6-22 08:18 | 显示全部楼层
梅州 发表于 2021-6-15 14:51
感觉好高级的样子~

Excel处理只是一个场景(桌面分析),肯定比VBA简单,不过要先学习学习。

esProc SPL其实还可以做大数据(分布式计算)、数据中台、数据仓库之类的数据分析场景。

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-6-3 00:37 , Processed in 0.032271 second(s), 9 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表