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

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

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

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

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

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

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

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

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

大家好，Excel合并单元格，是一个让人又爱又恨的东西！强烈建议，尽量不要把单元格合并在一起，因为合并单元格会给以后的数据处理带来很多的麻烦！但合并单元格的功能，在套打或设定版面时，又有其不可替代的作用，因此让人又爱又恨！

我们在工作中经常会遇到需要合并相同值的单元格，但是对于Excel有大量需要合并单元格的时候，你真确定要一个一个的合并吗？其实你大可不必慌忙，我们今天分享的VBA小代码内容是批量合并相同值的单列单元格。您只需将以下代码复制到VBE窗口中，执行代码即可。

照例举个例子，如下图所示，C列是部门字段，需要将相同的部门单元格修改为合并单元格。

源数据：

我们看看执行的效果：

看了上面的动画，是不是感觉非常适合合并大量的单元格。其实上述的代码也是非常简单.

附上Excel VBA代码

Sub MergeRange()

Dim rngData As RangeDim i&, lngCol&, lngFirst, lngLast On Error Resume Next

Set rngData = Application.InputBox("请选择单列数据列！", Default:=Selection.Address, Type:=8)

Set rngData = Intersect(rngData.Parent.UsedRange, rngData) 'intersect语句避免用户选择整列造成低效运算

lngCol = rngData.Column 'rngData所在列 lngFirst = rngData.Row '用户选择的区域并不是一定从第一行开始，使用此句读取开始行

lngLast = lngFirst + rngData.Rows.Count - 1 'rngData结束行 Application.ScreenUpdating = False '取消屏幕刷新 Application.DisplayAlerts = False '取消消息提醒。 rngData.Parent.Select

'激活rngData对象所在的工作表，避免跨工作表操作问题 For i = lngLast To lngFirst + 1 Step -1 '对rngData进行从尾向前遍历 If Cells(i, lngCol) = Cells(i - 1, lngCol) Then Cells(i - 1, lngCol).Resize(2, 1).Merge End If Next

rngData.VerticalAlignment = xlCenter '单元格格式上下居中 Application.ScreenUpdating = True Application.DisplayAlerts = True MsgBox "合并完成！"End Sub

PS:

1，该段代码只支持单列单元格区域，即按照相同的列进行合并。例如A10:A20，B2:B500等。

2，由于merge合并后的单元格区域只保留右上角首个单元格的值，因此该段代码遍历单元格区域的顺序是从后向前，而不是从前向后，后者是新人常出错之处，注意for-next循环是从Step -1开始的。

3，当然也可以采用从前向后的遍历顺序，先将Rng装入数组，对数组中的数据进行遍历判断是否等同，标记头尾行号，再批量合并单元格。该方法的效率也会高于遍历单元格两两合并的方法。

其实合并单元格，对我处理数据的时候，造成非常大的麻烦，我们最好还是少合并单元格。

以上就是今天要和大家分享的技巧，希望对大家有所帮助,祝各位一天好心情！

Excel中的每一个函数都有特定的用途，不是他们没有用处，而是你不了解他们或者用不着，建议同学们收藏起来，万一要用着呢！

唯有不断学习，才能不被淘汰!

在各类的数据汇总中，为了更美观的查看数据，我们经常会需要将相同内容的单元格进行合并，这样可以更加美观的查看各类数据。

如上图所示，我们需要将部门相同的单元格合并为调整后的样式，合并后的数据相比合并前看起来会更加的直观和清晰，现在我们就来讲一下如何最快的将相同单元格内容进行合并。

【动态效果图】

第一步：选择数据区域后，点击插入—透视表，在当前表格中插入。如下图：

第二步：将部门和姓名移动到行标签，销售量移动到数值标签，从而制作好数据透视表。如下图：

第三步：点击设计—报表布局，以表格的方式显示数据；再点击设计—分类统计—不显示分类汇总，将分类汇总数据取消掉。如下图：

第四步：点击数据透视表区域，点击右键—数据透视表选项，布局下面勾选合并且居中带标签单元格。如下图：

最后调整一下单元格边框、位置即可形成我们需要的表格样式。现在你学会这个操作方法了吗？

合并多个表格文件，Excel中可以使用power query，WPS中可以使用数据透视表来完成，两者各有优缺点。

例如，有下面3个表格，表格的标题行中有部分内容相同。怎样合并这样的3个文件呢？

步骤1：将这3个文件存放到同一个文件夹下（很重要），随意打开一个文件（例如01.xlsx），再新建一个空白表格文件。

步骤2：在空白表格文件中，插入数据透视表，选择“使用多重合并计算区域”——“选定区域”——“创建单页字段”——“下一步”。

步骤3：用鼠标选取01.xlsx文件中所有的数据，点击“添加”，就会在“所有区域”看到该数据区域；接着一一选取其他文件区域。

文件很多的话，这一步也是很麻烦的。可以使用BAT命令先将文件重命名成类似的名字，这样选取了第一个表格数据之后，后面的数据就不需要打开表格选取，而是直接修改文件名字。每个表格中的数据不同，在添加区域时，可以将区域设置的大一些，例如使用“$1:$4”(表示表格前4行）。

步骤4：数据选取完毕，就可以点击“确认”键创建一个新的数据透视表，会看到如下的汇总结果。界面中部的数据就是各个文件中的原始数据。

步骤5：还可以将筛选器下的“页1”拖到行字段下，这样我们就会看到界面左侧有“项1”、“项2”和“项3”，分别对应步骤3所添加的文件啦。

步骤6：如果某个原始表格中的数据变更了，可以在汇总表格上右键一下，点击“刷新”，汇总表数据也会随之更新。

和Excel的Power Query相比：

1. Excel中操作更简单一些，不过也只有Excel2016以上的版本才支持。

2. Excel的power query合并表格文件时，要求每个表格中的工作表名称相同，列数也必须相同，否则合并后数据会有遗漏或差错；使用数据透视表则没有这个限制。

3. 如果表格中列标题相同、行标题不相同，使用Excel的power query则不能合并；使用数据透视表则可以合并。

4. 原始数据更新时，两者都可以同步更新。

5. 数据透视表合并原始数据的同时还能汇总数据。

谢谢阅读，欢迎点赞、评论、关注和点击头像。

可以利用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执行代码，得到结果如下：

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

日常工作中我们有碰到过要把相同名称所对应的数据相加，如果说数据不是很多可以用简单的sum函数可以完成。当数据比较庞大，SUM可能就不好用了。

比如表格（1）要把名称相同的数据都相加，简便的方法是用SUMIF，有俩种用法

表格（1）

一、单独算“梨、苹果。。”的数据，直接点击B19为条件区域则可以按表格（1）中可以轻松求出。

=sumif(B1:B17,B19,C1:C17) 如果求苹果则把B19改成B18

二、批量算出所要相加的名称数据则用到：

=SUMIF(B1:B17,{"苹果";"梨";"香蕉";"葡萄";"橘子";"橙子";"西瓜"},C1:C17)

表格（2）

B1:B17则是我们要引用的区域（及我们求和的苹果，梨。。。名称相同的地方）我们输入的，{"苹果";"梨";"香蕉";"葡萄";"橘子";"橙子";"西瓜"}和单独输入的“苹果”。。。为条件区域。表格（1）（2）

3.C1：C17则是我们要求和的区域

俩种方法都没有多大区别，只是条件区域用{}把几个名称联系在一起组成一个数组

4.如果要让结果按列显示，则用;（分号） 如表格（1），如果要让结果按行显示，则用，(逗号）。

表格（3）

5.批量填充下来的话，则选中求和的区域表格（3）中的红色框框中，点击输入函数的框框表格（4），然后按住shift+ctrl+enter则所有求和都可以了如表格（5）

表格（4）

表格（5）

简单几步，再复杂的求和也可以搞定，如果名称排序没有规律，可以用这个函数来求和，是不是比用sum一个个求和快呢

施老师：

有些同事不太会使用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啦！如果表格数据过多的话，时间会久一点。

我们想把姓名一样的人员，语文的分数匹配到一起。我们可以用到Vlookup函数，比如下面俩个表格：

（表格1）

（表格2）

第一种方法，数据比较小，我们可以复制对应的分数去第一个表中。

如果数据比较复杂可以用VLOOKUP来按姓名匹配语文分数：

（表格3）

公式为=vlookup（A2,sheet2!A1:B6,2，0）

A2为我们要匹配的对象，sheet2!A1:B6为我们要匹配(提取）的数据所在的表格（表格2），分数在第二列，所以为2，如果我们要匹配的是人名则是所在的列为1。精确匹配则是1.模糊匹配则是0.

鼠标定位到75的单元格，当鼠标变成+时双击鼠标左键则下面的数据都会显示。

注意：精确匹配必须得名称一致。否则会提示#N/A。

这个公式可以帮我们处理很大的数据，好好学习吧

把几个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个表格的内容合并到同一张表格里面。

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