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 & "\" & 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 Sheets.Count

Wb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)

Next

WbN = WbN & Chr(13) & Wb.Name

Wb.Close False

End With

End If

MyName = Dir

Loop

Range("B1").Select

Application.ScreenUpdating = True

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

End Sub

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

（本文内容由百度知道网友茗童贡献）

在上一节我们介绍了几个Excel表格方面的小技巧，小知识点。第一个我们介绍了如何让Excel表格里面的内容以百分比的形式展现出来，这个知识点我们在财务报表和销售报表中比较常见，第二个知识点我们讲述了单元格如何显示一定的小数位数，这个同样在财务中经常用到，第三个知识点我们顺带介绍了如何让单元格显示分数。

本计划今天我们讲述数值与字符格式的设置对Vlookup等函数的影响，因为家中有些事情，课件未完成，最近几天可能更新上可能不太及时，希望大家谅解。

今天我们第一个介绍的是多个单元格内容的合并，可能大家遇到单元格内容的拆分比较多一些，单元格合并也有一定的用途，比如电商系统里面的省市县区是分列显示，但是我们有时候想让他们显示到同一个单元格里面，这时候就用到单元格的内容合并。

如上图所展现的表格内容，我们要将姓名和电话两列内容合并为一列，这个时候我们用到了Excel表格字符串合并的字符 & 符号，我们在和并列使用公式=A1&B2

使用该公式之后，得到了最终的结果值为：

2. 第二个内容我们介绍下如何设置单元格边框。在打印单元格内容的时候，我们希望单元格有边框，比如在盘点商品的时候，有单元格边框让我们可以在盘点的时候不会看错行，设置单元格的边框也会让表格看起来格外的漂亮、美观，未设置单元格格式的表格会让人感觉一团糟。

在一个Excel表格，我们使用快捷键CTRL+A全选单元格内容，然后选择单元格按钮，选择所有框线，设置完成后效果图如下图：

今天我们讲的两个知识点比较简单，大部分Excel使用者应该比较熟悉，这也是我们工作中必须掌握的知识点，希望对大家有所帮助。

如果内容对大家有所帮助，欢迎留言交流。

有时我们需要把表格的两列合并在一起，如果我们一个个去复制，太浪费时间，还有可能出错。那有没有简单的方法呢？我们可以用公式一下子就搞定，效率是非常的高，下面我们就把过程做一下。

1、比如下列表格A列和B列合并到C列上

2、我们可以选择C2元单元格，输入公式： =A2&B2，即表示A2单元格和B2单元格相连接

3、当我们回车后，表格如下，C2单元格内容就变成了 上海张三

4、我们选择C2单元格后，鼠标放在单元格右下角，当光标变成十字状，按住鼠标左键往下拖动。将下面的内容填充完整，填充后的表格如下：

总结，通过上面用公式连接单元格，并且通过拖动快速填充数据的方法。很快就能实现两列数据合并一列数据的需求，用时短，效率高，你快试试吧！

本百家号：时代新生分享工作、生活、技能方面的经验，愿和您一起成长。请多多关注哦！

可以利用VBA将多个格式相同的Excel表格数据快速合并到一张表格中。

软件版本：Office2007

方法如下：

1.在当前工作簿中有多个格式万全相同，但数据不同的工作表，将其内容合并到SHeet1中：

2.Alt+F11，输入代码如下：

sub m()

for each sh in sheets

if sh.name<>Sheets(1).name then

sh.range("A2:B3").copy sheets(1).range("A"&Sheets(1).range("A65536").end(4).row+1)

end if

next

end sub

3.F5执行代码，得到结果如下：

（本文内容由百度知道网友贡献）

施老师：

有些同事不太会使用Excel表格，连录入数据都是乱七八糟，本来是可以在一个单元格录入的数据，偏偏弄到多个单元格中，如果录错的数据少，还可以手动移过来，如果数据多的话，一个一个的手动移过来，岂不是要累死，这时候我们也不需在重新建立或修改表格，只需找对规律将多个单元格内容合并到一个单元格中即可。

一、使用连接符&

最常用简单的方法，莫过于使用连接符【&】搞定。在需要合并的单元格中输入“=单元格位置&单元格位置”即可，完成后在公式栏中打对勾，然后相同的位置单元格我们可以直接用鼠标拉住单元格右下方的“+”即可合并下方的单元格，如果位置不同的话就用公式“=单元格位置&单元格位置”再算一遍。

二、 使用函数CONCATENATE

使用公式【=CONCATENATE(单元格位置,单元格位置,单元格位置）】也可以快速达到合并的效果。

大家一般用什么方法去合并EXCEL中单元格的内容的？请在下方评论区留言写下你的看法。和施老师一起探讨。

请关注宁双学好网施老师百家号，本文欢迎转载与分享，转载请注明出处！

从事互联网行业的小编们，经常会遇到一个问题，就是导出多个Excel表格数据，经常是多个数据合并到一个excel表格里来做数据分析，那么如何快速的合并excel表格呢？

1、把所有excel文件放在同一个文件夹里。如下图：

2、打开汇总excel，并右键单击sheet1，找到“查看代码”，单击进去。进去之后就看到了宏计算界面。如图所示：

3、然后我们把下面代码复制进去，然后找到工具栏上面的“运行”下的“运行子过程/用户窗体”，代码如下，如图所示：

Sub 合并当前目录下所有工作簿的全部工作表()Dim MyPath, MyName, AWbNameDim Wb As Workbook, WbN As StringDim G As LongDim Num As LongDim BOX As StringApplication.ScreenUpdating = FalseMyPath = ActiveWorkbook.PathMyName = Dir(MyPath & "\" & "*.xls")AWbName = ActiveWorkbook.NameNum = 0Do While MyName <> ""If MyName <> AWbName ThenSet Wb = Workbooks.Open(MyPath & "\" & MyName)Num = Num + 1With Workbooks(1).ActiveSheet.Cells(.Range("B65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)For G = 1 To Sheets.CountWb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)NextWbN = WbN & Chr(13) & Wb.NameWb.Close FalseEnd WithEnd IfMyName = DirLoopRange("B1").SelectApplication.ScreenUpdating = TrueMsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下：" & Chr(13) & WbN, vbInformation, "提示"End Sub

运行几十秒钟就OK啦！如果表格数据过多的话，时间会久一点。

更多Excel技巧，请关注我的百家号：欢喜小龙虾。

今天带个大家的是：如何把下面第一张图中的两列黄色背景的单元格中的内容合并放到一个单元格呢？第二张图是结果图。

下面是得到的结果，姓名这一列和语文成绩这一列的内容全部放在一个单元格了。怎么做到的呢？下面上步骤：

首先在下面空白处找到一个单元格用来放内容，并且首先输入一个等号，如下图中红色线框内的单元格。

等号输入后，有鼠标点击左侧姓名的单元格，如图中红色线框内。下面会出现A50，这是红色线框内单元格对应的位置。

然后，在A50后面输入一个“和”符号（&），如图：

再次单击右侧这一列黄色背景列的语文这个单元格，如图：

单击好后，直接回车，就得到第一个合并的单元格了，如图：

然后单击选中该单元格，把鼠标放在右下角，等出现黑色加号为止，如图：

向下拖拽，有多少列就拖拽多少列，如图：

拖拽好后，就得到下图的结果，如图

这个平常在工作中还是挺实用的，不需要一个一个复制粘贴了，学会的点个赞吧！！！

更多Excel技巧，请关注我的百家号：欢喜小龙虾。

把几个excel表格的内容，合并到同一张表格里面，如何操作？看小编给你演示。

第一步：把需要合并的表格放在同一个文件夹里面，然后再新建一个excel，如图：

第二步：打开“新建Excel2007”，鼠标右键单击Sheet1，选择“查看代码”并打开进去。

第三步：将下列代码粘贴进代码栏：

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 & "\" & 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 Sheets.Count

Wb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)

Next

WbN = WbN & Chr(13) & Wb.Name

Wb.Close False

End With

End If

MyName = Dir

Loop

Range("B1").Select

Application.ScreenUpdating = True

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

End Sub

第四步：点击菜单栏的“运行”、“运行子子过程/用户窗体”，等待几秒后提示合并完成，点击确定。如图：

完成，这样就把3个表格的内容合并到同一张表格里面。

好了，如果觉得小编文章不错，欢迎关注、点赞、收藏。

施老师：

快要过年了，年前许多公司开始统计之前每月的销售表格，做一个整年的销售统计表。有的小公司的表格可能不是很多，手动就可以整好。但是对于一些需要整合大量表格的公司来说是一件很费时的事情。今天施老师就给大家分享下快速合并并计算表格方法！

一、下图中有两个表格，怎样把它们合并到一起呢，我们可以点【数据】-【数据工具】-【合并计算】。就可以了。

上面两个表格数据不是很多，但是我是做演示，所以先用的这个案例，如果碰到数据很多的表格，这个方法是再好不过了。大家不妨试一下下。

有什么疑问的大家可以在下方评论区留言给我，和施老师一起探讨，欢迎关注宁双学好网施老师！

在使用Excel时，如果想把两个单元格中的文字合并到一个单元格中，或者想把两列文字合并成一列，可参考下述方法：

例如要将下图表格中的省和市合并到一个单元格、列中。

●先用鼠标点击选择一个保存合并内容的单元格。

●然后在编辑栏中输入一个等号。

●输入等号后，用鼠标点击要进行合并的第一个单元格。点击后，该单元格的名称会自动输入到编辑栏中。

●再在编辑栏中输入一个“&”符号（按住键盘的Shift键不放的同时按大键盘上方的数字7键）。

●输入“&”后，再用鼠标点击要合并的第二个单元格。

●完成以上步骤后，按键盘的回车键或者点击编辑栏左侧的对号按钮。

●这样，就将两个单元格中的文字合并到一个单元格中了。如果要合并两列，可用鼠标点击合并后单元格右下角的填充柄。

●点击填充柄后，按住鼠标左键不放，向下拖动鼠标，则相同两列中的文字就会自动合并到一列中。

合并后的单元格中虽然显示的是文字，但点击单元格后从编辑栏中可看出单元格中的实际内容是公式。此时如果将该单元格中的内容直接复制粘贴到其他位置，粘贴后的内容会发生改变。如果想保持粘贴后的内容不变，可以采用选择性粘贴数值的方法粘贴，或者将单元格中的内容复制粘贴到word中，再从word中复制粘贴过来。