excel合并多个sheet到一个

Excel自带VBA，可以实现批量性操作。

合并多个Sheet的工作页，用VBA写代码操作如下：

1.按下Alt+F11打开VBA界面，双击左侧要合并到的工作表

2.编写代码如下：

Sub test()

For Each sh In Sheets

If sh.Name <> Sheets(1).Name Then

行 = Sheets(1).Range("A65536").End(3).Row + 1

sh.UsedRange.Copy Sheets(1).Range("A" & 行)

End If

Next

End Sub

3.点击“执行子程序”

4.关闭VBA编辑界面

5.完成Sheet合并