如何将多个EXCEL文件合并到汇总表中(更新)

漠野001 · 发表于 2012-11-5 12:10

本帖最后由漠野001 于 2012-11-6 10:08 编辑

各位高手们，小弟现统计各品牌的销售数据等信息，但因店铺太多。需要一个个手动去取数这样工作效率太低，对EXCEL VBA也不是很了解。希望各位高手帮忙
1、店铺UDP表模板一致；
2、文件名 <店铺UDP统计汇总表>需要取各店铺相关数据 ,如附件文件 10月李宁2店UDP 的数据需要自动填到汇总表中.
3、我已要求店铺提交UDP时，把文件名改成我要求的统一的文件名。

已做更新

漠野001 · 发表于 2012-11-5 16:12

有没有人回应下呢

hehex · 发表于 2012-11-5 17:04

看了下，稍有点小复杂。回去试做一下，主要是在班上工作之余写的代码，回头抓bug 会付出几倍的辛苦。
还有就是我也是菜鸟对vba 文件操作这块不是非常熟练，不敢说肯定能做的出来。

漠野001 · 发表于 2012-11-6 11:21

hehex 发表于 2012-11-5 17:04
看了下，稍有点小复杂。回去试做一下，主要是在班上工作之余写的代码，回头抓bug 会付出几倍的辛苦。
还有 ...

呵呵，非常感谢了。

hehex · 发表于 2012-11-6 15:29

读了半天楼主那个xlsx 文件粉色区域周边的公式，勉强弄清楚一些逻辑关系。
粉色区域有一些有日期重叠的，也按照标题的意思进行了设置，不过全都有一天的日期重叠。
目前也是按重叠做的，人数也因为日期的重叠而有重复记数。

最严重的问题，楼主的分店文件里有一段老外写的很复杂的宏，好像设密码用的，我仔细看了在工作表和工作簿事件中都没有调用，也没有任何调用的按钮控件。这段代码不知道为什么和我的程序有冲突，造成了使用GetObject 函数读取分店文件数据后，无法正常关闭该文件。

我的算法是：循环读入每一个分店文件数据，然后写入数组里相应的位置。每次打开一个文件，读取结束后就要关闭，然后打开下一个文件，读取，关闭直到最后一个。最后批量把数据从数组中写回工作表。这样代码会比较健康，而且执行效率较高。但是就是无法正常关闭，反复跟踪查了半天也没解决，最后我模拟了一个无宏的文件包里的book1.xls ，发现原来不是我的代码的问题（参考sub testclose() 的代码)。

现在程序虽然可以运行但是有上述问题的隐患无法解决，是有可能出问题的。
具体参考附件

漠野001 · 发表于 2012-11-6 18:43

hehex 发表于 2012-11-6 15:29
读了半天楼主那个xlsx 文件粉色区域周边的公式，勉强弄清楚一些逻辑关系。
粉色区域有一些有日期重叠的，也 ...

厉害，忘记把宏删除了。那个是破解保护工作表密码的，完全不需了.

仙人掌（李正） · 发表于 2012-11-7 15:00

本帖最后由仙人掌（李正）于 2012-11-7 15:01 编辑

这个用公式VLOOKUP
函数也能解决，我不会写代码

xugogo · 发表于 2012-11-8 16:34

hehex 发表于 2012-11-6 15:29
读了半天楼主那个xlsx 文件粉色区域周边的公式，勉强弄清楚一些逻辑关系。
粉色区域有一些有日期重叠的，也 ...

嗯，确实不错！

gz_lwh · 发表于 2012-11-8 17:47

你不如将每个报表复制进去

		自动登录	找回密码
密码			免费注册