如何合并excel文件的教程

合并excel文件，需要考虑使用vba来实现的

将各个分文件的一张表添加到汇总文件，实现方法如下：

1、需要合并文件的情况截图

其中，“汇总程序”文件有宏代码，用于汇总的，其他分文件可以根据实际需求调整多少

2、分文件情况说明

分文件的第一张表，是需要提取的

3、汇总程序 文件情况：

汇总其他分文件的表格，放在总表右侧

表内“汇总”按钮对应宏代码

4、宏代码

Sub 按钮2_Click()

    ApplicationScreenUpdating = False

    Set sh = ActiveSheet

    For Each f In CreateObject("scriptingfilesystemobject")getfolder(ThisWorkbookPath)Files

        If fName <> ThisWorkbookName Then

            With WorkbooksOpen(f)

                Sheets(1)Copy after:=sh

                ActiveSheetName = fName

                Close False

            End With

        End If

    Next f

    shSelect

    ApplicationScreenUpdating = True

End Sub

5、实现效果如下面的动态图

以上是进行合并多excel文件的方法

合并方法如下：

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

ApplicationScreenUpdating = False

MyPath = ActiveWorkbookPath

MyName = Dir(MyPath & "\" & "xls")

AWbName = ActiveWorkbookName

Num = 0

Do While MyName <> ""

If MyName <> AWbName Then

Set Wb = WorkbooksOpen(MyPath & "\" & MyName)

Num = Num + 1

With Workbooks(1)ActiveSheet

Cells(Range("B65536")End(xlUp)Row + 2, 1) = Left(MyName, Len(MyName) - 4)

For G = 1 To SheetsCount

WbSheets(G)UsedRangeCopy Cells(Range("B65536")End(xlUp)Row + 1, 1)

Next

WbN = WbN & Chr(13) & WbName

WbClose False

End With

End If

MyName = Dir

Loop

Range("B1")Select

ApplicationScreenUpdating = True

MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"

End Sub

4运行之后，等待10秒针左右，等运行完毕，就是合并完成之后，会有提示，点确定就可以了。查看合并后的数据，有5000多行，就是同一个文件夹里面17个excel表数据合并后的结果。效果如图所示。

批量合并excel文件至一个表步骤：

*** 作设备；联想台式机。

设备系统：Windows10。

*** 作软件：officeoffice2010。

1、要把多个表格合并到一个excel表格，新建一个空白的excel表格，作为稍后合并后的表格。注意：要合并的表格里面如果有多个Sheet，可以事先给它们命名下，这样方便你到时合并，确定要合并哪个Sheet。

2、打开新建的excel表格，选择要合并的表格位置，点击工具栏的数据，再点击“现有连接”。

3、出现现有连接窗口，点击浏览更多。

4、找到要合并的excel表格，点击它，再点击打开。

5、出现该excel的数据表格，选择你要合并的数据表格，再点击确定。

6、确定表格数据要放置的位置，再点击确定。

7、完成后，就会出现表格数据，然后再选择单元格，作为另外一个excel表格要放置的位置。注意：你可以把另外一个表格放在其他sheet，不一定要放在同一个sheet。

8、同样的方法，点击工具栏的数据，再点击“现有连接”。

9、出现现有连接窗口，点击浏览更多。

10、选择另外一个excel表格，再点击打开如图所示。

11、出现该excel的数据表格，选择你要合并的数据表格，再点击确定。

12、出现窗口，确定表格数据要放置的位置，再点击确定。

13、完成后，就会出现表格数据，这样就把两个excel合并到一个excel表格了。注意：如果有更多个excel表格，也是按照以上方法，依次导入合并到一个excel表格里。

excel两列内容合并方法如下：

*** 作设：组装电脑台式机。

设备系统：Windows win7。

*** 作软件：Microsoft Office excel2010。

1、首先打开excel，选中单元格。

2、输入“＝”后点击左边的单元格。

3、接着输入“＆”符号。

4、然后点击右边的单元格。

5、敲击回车键就可以看到第一行已经合并完成了，这时候将鼠标移到单元格右下角，当光标变成“＋”形状的时候双击鼠标。

6、最后就可以看到，两列的数据都全部完成合并了。

在 Excel 中经常需要用到2个表进行合并的功能。或许有些初学的朋友不知道该怎么用，如果需要用到表合并的功能却不会用的朋友，不妨学习一下。下面是我带来的关于如何将2个excel表合并的 方法 ，欢迎阅读!

如何将2个excel表合并的方法：

合并2个表步骤1：我们需要把多个excel表都放在同一个文件夹里面，并在这个文件夹里面新建一个excel。如图所示：

合并2个表步骤2：用microsoft excel打开新建的excel表，并右键单击sheet1，找到“查看代码”，单击进去。进去之后就看到了宏计算界面。如图所示：

合并2个表步骤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

ApplicationScreenUpdating = False

MyPath = ActiveWorkbookPath

MyName = Dir(MyPath & "\" & "xls")

AWbName = ActiveWorkbookName

Num = 0

Do While MyName <> ""

If MyName <> AWbName Then

Set Wb = WorkbooksOpen(MyPath & "\" & MyName)

Num = Num + 1

With Workbooks(1)ActiveSheet

Cells(Range("B65536")End(xlUp)Row + 2, 1) = Left(MyName, Len(MyName) - 4)

For G = 1 To SheetsCount

WbSheets(G)UsedRangeCopy Cells(Range("B65536")End(xlUp)Row + 1, 1)

Next

WbN = WbN & Chr(13) & WbName

WbClose False

End With

End If

MyName = Dir

Loop

Range("B1")Select

ApplicationScreenUpdating = True

MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"

End Sub

将多个单元格内容合并到一个单元格中，一般情况下就会手动来复制内容，粘贴到同一个单元格中。但是这样的 *** 作就比较麻烦。

下面来介绍几种不同的方法，可以方便地将多个单元格合并内容合并到一个单元格中。使用填充下面的两端对齐功能当需要合并的内容中都是文本，不包含数字或公式的时候，可以使用这个方法。

1首先将需要合并的内容放在同一列中。有时候内容会在一行里面，这时就需要进行一下转置。

2调整列宽，保证合并以后的内容长度能够放在一个单元格内。在这里合并后有6个字，因此将这一列列宽调的大一些。

3选中目标单元格，点击“填充”。

4在下拉菜单里面，选择“两端对齐”选项。然后内容就会合并到同一个单元格中了。

使用这种方法就是要注意保证列宽，否则会出现下面的内容无法进行合并的现象另外也不能出现数字或者公式，否则不会生效，并且还会有d窗提示。

以上就是关于如何合并excel文件的教程全部的内容，包括:如何合并excel文件的教程、excel怎么合并工作表、批量合并excel文件至一个表等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！