答可以利用VBA快速合并单个excel工作簿中的多个工作表(sheet)
软件版本:Office2007
方法如下:
1.当前工作簿中有多个工作表,结构都一样如下所示,当里面的数据不一样,将它们全部合并到当前工作表中:
2.Alt+F11,打开宏界面,输入如下代码:
Sub m()
For Each sh In Sheets 遍历每个工作表,提取数据
If sh.Name <> Sheet1 Then 排除当前工作表
sh.Range(A2:C & sh.Range(A65536).End(3).Row).Copy Range(A & Range(A65536).End(3).Row + 1) 将工作表中的所有数据复制到当前工作表最后一行的下一行中
End If
Next
End Sub
3.F5执行代码,返回Excel得到结果如下,工作表合并完成:
https://zhidao.baidu.com/question/1542693634497650307.html