EXCEL如何快速复制同个工作簿中不同工作表到一个工作表中

Question

我一个工作簿中有30余个5行30多列的工作表，结构完全一样，除了工作表的名称和数据以外没有任何差别，我现在的想法是把他们依次复制到同一个工作表的前五列，上下相连。 不知道如何能快速地把多个工作表按序复制到一个工作表中？ 写错了。5列30余行。第一列为分类，二三四五列为数据。

Answer 1

首先打开book1里面有sheet1，sheet2.，sheet3.在这个excel中打开book2在book2中选择sheet1的标签右键选择“复制移动工作表"
选择工作薄中的book1点确定。ok

Answer 2

应该是这样：
Sub
合并表()
表格数
=
ActiveWorkbook.Worksheets.Count
ActiveWorkbook.Worksheets(1).select
For
i
=
2
To
表格数
Sheets(i).UsedRange.Copy
Cells(ActiveSheet.UsedRange.Rows.Count
+
1,
1)
Next
i
End
Sub