乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > excel怎么快速合并多个工作表数据到一个工作表-excel多表合并为一个表,多表合并到一张表格

excel怎么快速合并多个工作表数据到一个工作表-excel多表合并为一个表,多表合并到一张表格

作者:乔山办公网日期:

返回目录:excel表格制作


1、首先,提前把所有录入的数据先输入工作表中。

2、然后,新建一个sheet4工作表,目的是为了把前三个工作表的内容合并到表4中。

3、接着,在工作表4中右键,点击查看代码。

4、在代码窗口中,输入以下代码,然后点击工具栏上面的运行就会把三个工作表自动合成在工作表4中了。

5、完成后效果如图所示,记住要在office软件下操作才可以



以WPS 2019版本为例:

关于excel怎么快速合并多个工作表数据到一个工作表,您可使用WPS参考下述步骤完成操作:

1、打开「表格(Excel)」文档

2、点击「数据-合并表格-多个工作表合并成一个工作表」;

3、勾选需合并的工作表即可。

提示:在设置合并工作表时也可添加其他「表格(Excel)」文档来选择其他文档的工作表来合并。


可以利用VBA代码来实现,详细方法:
1、新建一个工作薄,将其命名为你合并后的名字e68a84e8a2ad7a64363
2、打开此工作薄。
3、在其下任一个工作表标签上点击右键,选择“查看代码”。
4、在打开的VBA编辑窗口中粘贴以下代码:
Sub 工作薄间工作表合并()

Dim FileOpen
Dim X As Integer
Application.ScreenUpdating = False
FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xls),*.xls", MultiSelect:=True, Title:="合并工作薄")
X = 1
While X <= UBound(FileOpen)
Workbooks.Open Filename:=FileOpen(X)
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
X = X + 1
Wend
ExitHandler:
Application.ScreenUpdating = True
Exit Sub

errhadler:
MsgBox Err.Description
End Sub

5、关闭VBA编辑窗口。
6、在excel中,工具---宏---宏,选“工作薄间工作表合并”,然后“执行”。
7、在打开的对话窗口中,选择你要合并的300个工作薄。
8、等待。。。。ok!

以WPS 2019版本为例:

如需合并多个工作表数据到一个工作表,可使用WPS2019中已自带的「文档拆分合并」功能:

操作步骤:

1)打开其中一份「表格(Excel)」文档;

2)点击「特色应用-拆分合并-合并」;

3)点击添加需合并文件,设置合并文件需合并的页数范围即可将多个文档合并为一份。

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网