excel中怎么把几个单元格合并到一起

1、打开excel表格，下图中的A列单元格，A1和A2合并，A3和A4合并，A5和A6合并。

2、选中合并单元格，使用快捷键“Ctrl+C”进行复制 *** 作。

3、在新单元格点击鼠标右键，在d出的选项中点击“选择性粘贴”。

4、在“选择性粘贴”中选择“值和源格式”。

5、即可将合并的单元格粘贴到新单元格中，而不改变数值跟合并的单元格格式。

将多个单元格内容合并到一个单元格中，一般情况下就会手动来复制内容，粘贴到同一个单元格中。但是这样的 *** 作就比较麻烦。
下面来介绍几种不同的方法，可以方便地将多个单元格合并内容合并到一个单元格中。使用填充下面的两端对齐功能当需要合并的内容中都是文本，不包含数字或公式的时候，可以使用这个方法。
1首先将需要合并的内容放在同一列中。有时候内容会在一行里面，这时就需要进行一下转置。
2调整列宽，保证合并以后的内容长度能够放在一个单元格内。在这里合并后有6个字，因此将这一列列宽调的大一些。
3选中目标单元格，点击“填充”。
4在下拉菜单里面，选择“两端对齐”选项。然后内容就会合并到同一个单元格中了。
使用这种方法就是要注意保证列宽，否则会出现下面的内容无法进行合并的现象另外也不能出现数字或者公式，否则不会生效，并且还会有d窗提示。

昨天分享了多个word文档合并到单个文档的办法，多个word文档合并到单个文档该如何 *** 作？3秒合并多个文档的办法
就有同学问了，Excel表格能合并吗？小编回答是：当然可以。
在我们的实际工作中，同事分别做好的表格数据，需要汇总到一起，这样查看起来会更方便。
多个Excel表格文件合并到一起
Excel表格合并到单个表格文件可以理解为两种，一种是sheet表合并，一种是多个Excel表格合并。
今日主要分享多个Excel表格文件如何合并到个一个Excel表格文件里。
*** 作步骤
首先我们 *** 作前，一定要把多个Excel表格文件放到一个文件夹里。
打开空白Excel文件，点击数据菜单，点击新建查询
选择从文件下的从文件夹，选择Excel表格文件夹
然后自动识别文件夹里的Excel文件，如下图
点击下方合并下的合并和加载选项。
这样基本就完成了表格的合并。
最后需要我们根据不同需求调整一下表格的样式和内容就行了。
调整完最终效果。
多个Excel表格合并一个表格的方法分享完毕。
小编的专栏也有很多漂亮的Excel模板，自带公式，一键生成漂亮的Excel表格模板。如有需要，购买专栏后私信小编获取。

excel中可以利用vba把多个相同格式的excel表格合并到一张表格中
软件版本：office2007
举例说明如下：
1有多个工作表有如下相同格式的数据，合并到总表中：
2alt+f11，输入如下代码：
3f5执行代码，表格数据就合并到总表中了：

“excel中多个表格合并成一个”的 *** 作步骤是：
1、以Excel
2016为例，打开Excel工作表；
2、由已知条件可知，在一个工作簿下，有多个工作表，工作表的结构都相同，但数据顺序不同，需要实现多个表格合并生成一个汇总表；
3、在“汇总表”中，点击“数据”选项下的“合并计算”；
4、根据数据合并的规则，选择“求和”，并将牵涉取合并的数据区域通过“引用位置”逐个添加进去，标签位置根据实际需要，勾选“首行”“最左列”；
5、按“确定”后，“汇总表”生成了合并计算的结果。

1、新建一个文件夹、将要合并的表格放到里面、新建一个表格、用excel打开、右击Sheet1
2、选择查看代码（PS：excel有着一项，WPS没有）
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、点击运行、一段时间（取决于表格的大小和多少）后，合并完成了。

方法/步骤
我们需要把多个excel表都放在同一个文件夹里面，并在这个文件夹里面新建一个excel。
用microsoft excel打开新建的excel表，并右键单击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
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表数据合并后的结果。

---