[已解决]将指定文件夹下的所有工作簿中的某一工作表复制到一起

心正意诚身修 · 发表于 2013-8-21 21:03

新近兼代一同事的工作.每月底要将一个文件夹下的二十多几子文件夹(以日期命名)中的不同表进行汇总,而每个子文件平下又包含不同部门的工作表,请问如何将这个文件夹下的二十多个子文件夹中的所有的工作簿名称包含比如部门为"行政"的工作簿中工作表名称为"基本资料"复制到另外一个工作表中?
因为一个月有二十几天,大大小小十几个部门,要一个表一个表的复制,挺费时的,请问,可以实现吗?如何实现,,求代码.谢谢.

最佳答案

月排行榜 / 总排行榜

我心飞翔410

2013-8-21 21:48

http://www.excelpx.com/forum.php?mod=viewthread&tid=295765
先遍历文件夹在依次打开每个工作簿进行操作

跳转到最佳答案楼层

w2001pf · 发表于 2013-8-21 21:16

同一个问题不要重复发贴。只要有附件，并把问题描述清楚，一般有人帮忙的。

心正意诚身修 · 发表于 2013-8-21 21:25

我是看能不能悬赏,结果才五个金币..没办法..没有附件的,,一个文件夹,二十几个子文件夹,每个子文件夹下有十几张报表.也就是四百多个工作簿..附件也没办法上传是吧.

我心飞翔410 · 发表于 2013-8-21 21:48

这个最佳答案由我心飞翔410 给出，感谢我心飞翔410 的回答。

单击隐藏图章

http://www.excelpx.com/forum.php?mod=viewthread&tid=295765
先遍历文件夹在依次打开每个工作簿进行操作

心正意诚身修 · 发表于 2013-8-21 21:59

我心飞翔410 发表于 2013-8-21 21:48
http://www.excelpx.com/forum.php?mod=viewthread&tid=295765
先遍历文件夹在依次打开每个工作簿进行操 ...

谢谢兄弟哈.然后呢,我这有VBA80集,,只是我从来没有看这49集,我才看到第10集...明天看看.谢谢兄弟了哈..等不需要别人给我答的时候,我就把最佳答案给你哈.

我心飞翔410 · 发表于 2013-8-21 22:00

yun

flyingdxl · 发表于 2015-4-10 10:53

我也有同样的问题，那个帖子打不开啊

18600436416 · 发表于 2015-4-22 17:28

现在看不了答案啊，好难过

残冰凝雪 · 发表于 2015-4-28 17:28

需要6级，我昏

ghsfghhjkhjk · 发表于 2015-11-26 19:48

学习了

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