ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[原创] 汇总多个excel文件的工具

[复制链接]

TA的精华主题

TA的得分主题

发表于 2014-11-2 21:00 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 Will.li 于 2014-11-3 09:03 编辑

前几天帮同事做了个小工具,拿出来跟大家分享一下。
主要用途:快速汇总多个excel文件中的符合条件的数据到一个excel文件中。
使用方法:
1、将数据源文件的路径添加到汇总表的Data Source工作表中,并填上数据源文件的工作表名称。
2、到Query工作表中设定查询条件,然后点“Query”按钮即可提取数据源文件中符合条件的数据。
说明:
1、可以添加任意多个数据源文件。如果添加了相同的数据源文件(同一个excel表、同一个工作表),则会返回重复的内容。
2、可以设置任意多个查询条件;如果不设置任何查询条件,则返回所有内容。
3、查询条件中支持通配符*和?,支持比较运算符号>,=,<,>=,<=,可以设置日期查询,比如>#2014-10-10#表示2014-10-10之后的数据。
4、数据源文件需要采用相同的格式和字段名称,并且字段顺序要一致。

其实这个文件也可以看成是我之前做的一个工具的简化的替代品。之前那个工具链接如下,采用Excel VBA + Access数据库的方式,查询、写入数据都在一个工作表上。如果用这个工具替代的话,相当于每个人使用统一格式的工作表填写数据,负责数据收集的人用query这个工具来汇总数据。不过用这个工具的话,假如要编辑数据,就要分别到各个工作表去编辑。而之前那个VBA + Access的可以用一个文件编辑所有的数据。
欢迎大家下载测试,希望对大家有帮助。没有复杂的代码,简单实用为主。
附件 Query.zip (78.51 KB, 下载次数: 552)
--原来附件有点bug,单个source文件时sql语句中没有加上查询条件,现在改好了。
Excell VBA+Access的应用:关于局域网内多用户数据收集的应用
http://club.excelhome.net/thread-826893-1-1.html

TA的精华主题

TA的得分主题

发表于 2014-11-2 21:16 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2014-11-2 21:19 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
怎么会出错?要改哪里?
无标题.gif

TA的精华主题

TA的得分主题

发表于 2014-11-2 21:31 | 显示全部楼层
本帖最后由 张雄友 于 2014-11-2 21:37 编辑

B2:F2 的条件怎么不发生作用?只是数据复制过来而已的?

TA的精华主题

TA的得分主题

发表于 2014-11-2 21:47 | 显示全部楼层
B2:F2 的条件怎么不发生作用?只是数据复制过来而已的?3楼问题解决了,4楼的还没有。

TA的精华主题

TA的得分主题

 楼主| 发表于 2014-11-2 22:14 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
张雄友 发表于 2014-11-2 21:47
B2:F2 的条件怎么不发生作用?只是数据复制过来而已的?3楼问题解决了,4楼的还没有。

哪里不发生作用?我这里看的没有问题啊

TA的精华主题

TA的得分主题

发表于 2014-11-3 06:15 | 显示全部楼层
Will.li 发表于 2014-11-2 22:14
哪里不发生作用?我这里看的没有问题啊

根据B2:F2的条件,怎么可能有10条记录?

Query.rar

81.72 KB, 下载次数: 26

TA的精华主题

TA的得分主题

 楼主| 发表于 2014-11-3 09:02 | 显示全部楼层
张雄友 发表于 2014-11-3 06:15
根据B2:F2的条件,怎么可能有10条记录?

多谢提醒,原因在于单个source 文件时sql语句中没加上条件strCriteria,现在改好了,请再试试看。

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2014-11-3 20:26 | 显示全部楼层
Will.li 发表于 2014-11-3 09:02
多谢提醒,原因在于单个source 文件时sql语句中没加上条件strCriteria,现在改好了,请再试试看。

还有个条件,对于 or 条件是怎么实现的?

Query2.rar

66.95 KB, 下载次数: 25

TA的精华主题

TA的得分主题

 楼主| 发表于 2014-11-3 21:09 | 显示全部楼层
张雄友 发表于 2014-11-3 20:26
还有个条件,对于 or 条件是怎么实现的?

当时设计时没有考虑这种情况,主要是在这里面实现起来比较麻烦。
如果懂sql语句的话,可以直接在条件的值那里通过一定的变通的方式来实现,或者是单独再做一个条件的输入框。
在现有的情况下,可以再职务那里输入以下内容来实现,见附件。 查询.rar (57.5 KB, 下载次数: 112)
*' and ([职务] like '%x%' or [职务] like '%s%') and [职务] like '%
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-11-16 19:26 , Processed in 0.049163 second(s), 13 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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