如何合并excel多个格子合并且保留所有数据?
比如说 表格如下:
ABHK
CDHH
EFHK
GHJK
...
有无数行....然后要让它们合并在一起并且数据全部保留.
大概有1万行,.
不要叫我用"=A1&A2&A3"这种方法..因为数据太多,不可能一个一个来.
求救.谢谢.
(1 )启动Excel 2013并打开工作表，在工作表的空白区域选择一个与需要合并的单 元格区域大小相同的区域，然后在“开始”选项卡的“对齐方式”组中单击“合并后居中”按钮合并单元格，如图1所示。
提示：如果需要对多个行或列的单元格进行合并，按住“Ctrl”键分别单击选择这些行或列中的单元格后单击“合并后居中”按钮上的下三角按钮，在打开的下拉列表中选择“跨越合并”选项即可。
(2)在合并单元格被选择的情况下，在“开始”选项卡的“剪贴板”组中选择“格式刷”工具，对需要合并的单元格区域进行合并，如图2所示。
(3)此时，该单元格区域即被合并，Excel也没有给出提示删除单元格数据，所有的单元格数据都将保留。例如，在一个表格的空白单元格中输入公式引用已经合并的单元格，如图3所示。按“Enter”键后，合并前单元格中的数据仍然存在，如图4所示。
温馨提示：内容为网友见解，仅供参考
第1个回答 2008-07-25
数据在A列
B2输入=A1&A2
点B2,光标移到其右下角的小黑点上,光标变成实心十字形时,双击左键
这时,A列最后一个数据的后面,就是你要合并的数据
假设你的数据到A1:A10000,则B10000中,就是你要的
B2输入=A1&A2
点B2,光标移到其右下角的小黑点上,光标变成实心十字形时,双击左键
这时,A列最后一个数据的后面,就是你要合并的数据
假设你的数据到A1:A10000,则B10000中,就是你要的
第2个回答 2008-07-25
我写了一个宏，测试可行！
只要选中需要合并的单元格，再执行这个宏就OK了！
要注意的是：你这有1万多行要合并，而Excel单元格内容（文本）的长度32767个字符。单元格中只能显示1024个字符；而编辑栏中可以显示全部32767个字符。
Sub 合并单元格并保持所有数据宏()
If MsgBox("确定要合并所选择的单元格吗？ 注意：合并后不能撤销！！", _
vbYesNo + vbQuestion, "合并单元格并保持所有数据宏") = vbNo Then Exit Sub
Dim strTmp As String, strTT As String, isFirst As Boolean
strTmp = ""
isFirst = True
For Each Mycells In Selection
strTT = Mycells.Text
If strTT <> "" Then
If Not isFirst Then
strTmp = strTmp & Chr(10) & Chr(13)
End If
strTmp = strTmp & strTT
isFirst = False
End If
Next
Application.DisplayAlerts = False
Selection.Merge
Application.DisplayAlerts = True
Selection.FormulaR1C1 = strTmp
End Sub
只要选中需要合并的单元格，再执行这个宏就OK了！
要注意的是：你这有1万多行要合并，而Excel单元格内容（文本）的长度32767个字符。单元格中只能显示1024个字符；而编辑栏中可以显示全部32767个字符。
Sub 合并单元格并保持所有数据宏()
If MsgBox("确定要合并所选择的单元格吗？ 注意：合并后不能撤销！！", _
vbYesNo + vbQuestion, "合并单元格并保持所有数据宏") = vbNo Then Exit Sub
Dim strTmp As String, strTT As String, isFirst As Boolean
strTmp = ""
isFirst = True
For Each Mycells In Selection
strTT = Mycells.Text
If strTT <> "" Then
If Not isFirst Then
strTmp = strTmp & Chr(10) & Chr(13)
End If
strTmp = strTmp & strTT
isFirst = False
End If
Next
Application.DisplayAlerts = False
Selection.Merge
Application.DisplayAlerts = True
Selection.FormulaR1C1 = strTmp
End Sub
第3个回答 2008-07-24
b1输入:=a1
b2输入:=b1&a2
向下填充本回答被提问者采纳
b2输入:=b1&a2
向下填充本回答被提问者采纳
相似回答
