1、首先打开EXCEL表格,里面有两个EXCEL文档。
2、然后我们点击EXCEL文档后面如图图标,插入一个新的EXCEL表格。
3、将插入的这个表格命名为合并。
4、然后将光标放到这个EXCEL文档的位置,右键单击,选择查看代码。
5、接着就会出现VBA编辑窗口,在里面输入下面的代码。
Sub 合并当前工作簿下的所有工作表()
Application.ScreenUpdating = False
For j = 1 To Sheets.Count
If Sheets(j).Name <> ActiveSheet.Name Then
X = Range("A65536").End(xlUp).Row + 1
Sheets(j).UsedRange.Copy Cells(X, 1)
End If
Next
Range("B1").Select
Application.ScreenUpdating = True
MsgBox "当前工作簿下的全部工作表已经合并完毕!", vbInformation, "提示"
End Sub
6、输入之后,在上面的工具栏里面点击运行里面的运行子过程/用户窗体。
7、这样就可以将两个EXCEL文档合成一个。
1、如图:有二个工作簿,每一个工作簿中都有若干个工作表,在做合并之前,我们要将这两个工作表打开。
2.在其中一个工作簿选择所有的工作表,方法是先选择第一个工作表,按住shift键,然后点最后一个工作表,这样就可以快速全部选中
3.当然,也可以右击任意一工作表,在弹出的菜单中选择“选定全部工作表”选择所有的工作表。
4.右击工作表标签,在弹出的菜单中选择“移动或复制工作表”在第一个下拉框中选择另一个要合并的工作簿。
5.这样就可以快速将当前工作簿的所有工作表合并到另外一个工作簿了。
6.这里需要注意的是如果两个工作簿,有相同名字的工作簿的话,系统自动用(2)来命名。
7.这样做的话,当前工作簿不会发生变化,复制移动的工作簿,会合并两个工作表的所有内容。
假设Sheet1的A列是姓名,B列是生日,Sheet2的A列是姓名,B列住址。
Sheet2!C1=Vlookup(A1,Sheet1!A:B,2,0)
公式下拉。
使用数据透视表,快速将两个表格合并为一个表格
可以一键复制过来,同时打开这两个Excel表格然后把左边的复制到右边就可以了。