请高手帮忙：多个工作簿合并到一个工作表

xjglxzy

各位老师晚上好：
学生又碰到难题了，恳请各位老师给指点一二，谢谢！
问题：
单位有各村上报的表格（为保护隐私上传的表格中删除了部分单元格内容），现在需要汇总数据，要求：把所有工作簿的表格汇总到2018团林镇年农户道路占地Sheet里（详见上传附件），在论坛里找了代码复制运行后，发现有好几个村的没有汇总（如东团林、北团林等），还有一个村只汇总了一行（如崖下村）。
请各位老师帮忙看一下，将代码给修改为正确的，最好能给说明一下是什么原因，谢谢！

xjglxzy

把所有工作簿的表格汇总到2018团林镇年农户道路占地Sheet1里

abc123281

农户合并123.rar (171.77 KB, 下载次数: 30)

2018-12-3 22:41 上传

点击文件名下载附件

liangmutou01

用ado方式，原工作表不统一，所以要打开工作簿，显得慢了。如果将要合并的工作簿统一的话，就不需要打开工作簿了。试一试吧。