Hi,大家好,我是小酥;
本期给大家分享如何利用VBA快速合并多个工作簿中指定Sheet到同一个工作表中。

工具下载地址:链接: https://pan.baidu.com/s/1jl1NIwJzB_YAsxju6Kb_Hg?pwd=883u 提取码: 883u
本次演示示例为将小学各年级成绩单汇总在一个表格,各年级成绩单分别在6个独立的工作簿。
下图为演示示例▼

分析表格结构
每份成绩单结构都是一样(如下截图)
1、Sheet名称都是“成绩单”;
2、表格内容从B2单元格开始(即第二行、第二列);
3、共有4列;

操作步骤
步骤1:下载了演示文件,直接点击演示文件中的形状,方可运行代码;
步骤2:根据跳出窗口的提示,输入内容;
①输入爬取的Sheet名称,如未输入,默认爬取工作簿中的第一个Sheet;本示例6个年级成绩单都放在“成绩单”Sheet,即输入“成绩单”,如下图所示,再点“确定”;

②输入从第几行开始抓取,本示例表格内容从B2单元格开始,即输入数字“2”,如下图所示,再点“确定”;

③输入从第几列开始抓取,本示例表格内容从B2单元格开始,即输入数字“2”,如下图所示,再点“确定”;

④输入爬取的列数,本示例表格内容共有4列,即输入数字“4”,如下图所示,再点“确定”;

步骤3:完成以上步骤,等待跳出“结束”提示窗口,即为运行结束(如下图所示)。最后一列为此行内容来自的文件路径;
