-
1.把多个WPS表格汇总到一个表格里
题主，问的是不是不同的表格，比如表格1.xlsx，表格2.xlsx，表格3.xlsx，然后把这个三个汇总成：表格123.xlsx，对吧？还是一个.xlsx表格文件里面不同的sheet，比如sheet1,sheet2,sheet3？下面让我分别针对以上两种情况来回答您1.我们先建立三个表格，并全部打开2.三个表格内，默认都有三个sheet，分别为sheet1,sheet2,sheet3我们命名：表格的分别，1,2,3；表格2的分别4,5,6；表格3的分别为7,8,9重命名操作，自己试试即可，不在此演示了。
3.把表格2中4,5,6和表格3中的7,8,9全部移动表格1中，选中表格2中的4，然后鼠标右键4.点击“移动或复制工作表”5.选中移入表格，移入位置，建立副本否，请直接看图哦！6.点击“确定”以后，去表格1中查看4，去表格2中查看4的副本我们可以看到，表格1中的最后已经有4了，表格2中的4依然存在，其他页面的移动或者复制，同理希望题主能够自己操作一遍，非常简单的哦！全部sheet移动到一个表格文件以后，就可以保存为一个表格文件.xlsx了，不用再保存多个文件了另外需要注意的是：注意“勾选”建立副本不知道能否帮助到题主，这可都是我亲自截图弄的哦。
2.wps多工作表的数据如何汇总
这个是用Excel的方法，WPS不知道能不能用，可以试试
1、新建一个工作表
2、Alt+F11，输入以下代码，然后运行宏。
Sub 合并当前目录下所有工作簿的全部工作表（）
Dim MyPath, MyName, AWbName
Dim Wb As Workbook, WbN As String
Dim G As Long
Dim Num As Long
Dim BOX As String
Application.ScreenUpdating = False
MyPath = ActiveWorkbook.Path
MyName = Dir(MyPath & "\" & "*.xls")
AWbName = ActiveWorkbook.Name
Num = 0
Do While MyName <> ""
If MyName <> AWbName Then
Set Wb = Workbooks.Open(MyPath & "\" & MyName)
Num = Num + 1
With Workbooks(1).ActiveSheet
.Cells(.Range("A65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)
For G = 1 To Sheets.Count
Wb.Sheets(G).UsedRange.Copy .Cells(.Range("A65536").End(xlUp).Row + 1, 1)
Next
WbN = WbN & Chr(13) & Wb.Name
Wb.Close False
End With
End If
MyName = Dir
Loop
Range("A1").Select
Application.ScreenUpdating = True
MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation， "提示"
End Sub
3、在整合后的工作表里面排序、筛选、求和。
