EXCEL多个工作簿合并为一个工作簿里的多个工作表方法

Application.ScreenUpdating = True

Exit Sub

errhadler:

MsgBox Err.Description

End Sub

4.点击运行按钮或者按f5键运行vba代码；

5.代码运行后会弹出要进行数据合并的文件夹，选择之前要进行数据合并创建的文件夹，按ctrl+a键全选所有的工作簿，之后点击打开；