excel中怎样把多个表格中的数据合并在一个表格中

1、新建一个文件夹、将要合并的表格放到里面、新建一个表格、用excel打开、右击Sheet1
2、选择查看代码（PS：excel有着一项，WPS没有）
3、将下列代码复制到文本框中：
Sub 合并当前目录下所有工作簿的全部工作表()
Dim MyPath, MyName, AWbName
Dim Wb As workbook, WbN As String
Dim G As Long
Dim Num As Long
Dim BOX As String
ApplicationScreenUpdating = False
MyPath = ActiveWorkbookPath
MyName = Dir(MyPath & "\" & "xls")
AWbName = ActiveWorkbookName
Num = 0
Do While MyName <> ""
If MyName <> AWbName Then
Set Wb = WorkbooksOpen(MyPath & "\" & MyName)
Num = Num + 1
With Workbooks(1)ActiveSheet
Cells(Range("B65536")End(xlUp)Row + 2, 1) = Left(MyName, Len(MyName) - 4)
For G = 1 To SheetsCount
WbSheets(G)UsedRangeCopy Cells(Range("B65536")End(xlUp)Row + 1, 1)
Next
WbN = WbN & Chr(13) & WbName
WbClose False
End With
End If
MyName = Dir
Loop
Range("B1")Select
ApplicationScreenUpdating = True
MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"
End Sub
4、点击运行、一段时间（取决于表格的大小和多少）后，合并完成了。

1、首先打开你要调整的两个表格，关掉其他表格，只留这2个表格。

2、打开之后，点击你需要移动的表单里，看到下方的标签处。

3、你可以看到有多张表，按住shift键可以全选表格，或者单击右键选择选定全部工作表。

4、选中全部表格之后，再次单击右键选择移动或复制工作表。

5、点击将选定工作表移至的下拉框，并在下拉框中选择另一个表格，点击移至最后，选择确定。

6、然后你就会在另一个表格里看到所有表格都移到本来存在的表格后面了。

excel中将多个工作表的内容复制整合到同一个工作表中的方法如下：

1、打开合并计算的工作表，将把第2-4张工作表中的数据合并到第1张工作表中。

2、选中要合并数据的单元格区域。

3、选择“数据”菜单选项卡，单击工具栏中的“合并计算”按钮。

4、d出“合并计算”对话框，在“函数”下拉列表中选择“求和”选项，单击“引用位置”后面的收缩对话框按钮。

5、选择工作表“北京”，鼠标拖动选中B3：E6单元格区域，单击展开对话框按钮返回到合并计算的对话框中。

6、单击“添加”按钮将引用位置添加到“所有引用位置列表中。

7、使用同样的方法把”上海“和”深圳“工作表中的数据区域也添加到”所有引用位置“中。

8、单击确定按钮，将选定工作表中的数据添加到汇总的工作表中完成。

---