第1个回答 2019-11-08
以WPS 2019版本为例：
关于如何快速合并单个excel表中的多个sheet的工作页，您可使用WPS参考下述步骤完成操作：
1、打开「表格（Excel）」文档；
2、点击「数据-合并表格-多个工作表合并成一个工作表」；
3、勾选需合并的工作表即可。
提示：在设置合并工作表时也可添加其他「表格（Excel）」文档来选择其他文档的工作表来合并。
本回答被提问者采纳- 官方电话官方服务
- 官方网站
第2个回答 2017-09-04
采用宏来解决，如下的方法请参考：
1. 增加一个工作表sheet，重命名xx 。
2. 点到新增加的工作表中，按ALT+F11，
3.双击名称xx的图标。
4. 复制上如下代码。
Sub GetStName()
Dim FinalRow As Long
Dim St As Worksheet
FinalRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 2
For Each St In ThisWorkbook.Worksheets
Cells(FinalRow, 1).Value = St.Name
FinalRow = FinalRow + 1
Next St
End Sub
5.把名称为xx的图表的属性改为sheet1（这需要把原先那个sheet1,改为其他的sheet，不和其他工作表重复即可
6.点击菜单中的执行的三角符号，就可以合并所有sheet的工作表内容到一个工作表中
1. 增加一个工作表sheet，重命名xx 。
2. 点到新增加的工作表中，按ALT+F11，
3.双击名称xx的图标。
4. 复制上如下代码。
Sub GetStName()
Dim FinalRow As Long
Dim St As Worksheet
FinalRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 2
For Each St In ThisWorkbook.Worksheets
Cells(FinalRow, 1).Value = St.Name
FinalRow = FinalRow + 1
Next St
End Sub
5.把名称为xx的图表的属性改为sheet1（这需要把原先那个sheet1,改为其他的sheet，不和其他工作表重复即可
6.点击菜单中的执行的三角符号，就可以合并所有sheet的工作表内容到一个工作表中
相似回答