怎么把两个Excel合并成一个?

来源:百度知道 编辑:UC知道 时间:2024/04/30 15:23:02
就是两个不同的Excel。想把2合并到1的Sheet2里。怎么做到,请高手时间迷津。

两个文件都打开,右键点击2里的sheet1_选择复制或移动工作表_在弹出的对话框里选择文件1_选择要复制或移动到文件1里哪个工作之前_确定就完整地合并过去了,连格式都一起过去了,很方便

是指把两个单独的电子表格文件合并成一个吗?如有A、B两个文件,想把B文件合并到A文件,如果是,先打开A文件,再选择工具栏上的“数据”——“导入外部数据”——选择B文件,根据提示确定B文件导入的位置后确认即可。

1.

我们需要把多个excel表都放在同一个文件夹里面,并在这个文件夹里面新建一个excel
2.用microsoft excel打开新建的excel表,并右键单击sheet1,找到“查看代码”,单击进去。进去之后就看到了宏计算界面
3.

然后我们把下面这些宏计算的代码复制进去,然后找到工具栏上面的“运行”下的“运行子过程/用户窗体”,代码如下,如图所示:

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 & "\" &