excel中如何快速将多个工作表中的数据合并到一个工作表中

对于excel中如何快速将多个工作表中的数据合并到一个工作表中，很多网友还不是很明白，今天艾巴小编收集了这方面的知识，就将其分享出来。

操作方法：

01 打开EXCEL表格，为了举例，在两个表格中输入不同的数据。

02 按住ALT键，然后按F11键打开VBE编辑器。

03右键单击项目窗口下的Microsoft Excel 对象，然后指向“插入”。

04插入的列旁边会出现一个列表，单击该模块。

05出现模块界面。

06输入以下代码： Option ExplicitSub hbgzb()Dim sh As Worksheet, flag As Boolean, i As Integer, hrow As Integer, hrowc As Integerflag=FalseFor i=1 To Sheets.Count If Sheets(i).Name='合并数据' 然后flag=TrueNextIf flag=False thenSet sh=Worksheets.Addsh.Name='合并数据'Sheets('合并数据'). 后移动：=Sheets(Sheets.Count)End IfFor i=1 To Sheets.CountIf Sheets( i).Name '合并数据' 然后hrow=Sheets('合并数据').UsedRange.Row hrowc=Sheets('合并数据').UsedRange.Rows.Count 如果hrowc=1 则Sheets(i).UsedRange.Copy Sheets('合并数据').Cells(hrow, 1).End(xlUp) Else Sheets(i).UsedRange.Copy Sheets('合并数据').Cells(hrow + hrowc - 1, 1).Offset(1 , 0) 结束IfEnd IfNext iEnd Sub

07 返回工作表界面，按住ALT键，然后按F8键打开宏对话框，点击执行hbgzb宏。

08 工作表合并完成。

以上知识分享到此为止，希望能够帮助到大家！