这几年的数据表格大体逃不开两类活儿一类是把一条数据拆成多行另一类是把多行数据并成一行。前者容易分列、转置、透视表拖两下就完事后者才磨人尤其像“多行合并成一行同时把数据完整复制出来”这种需求几乎每周都能在答疑群和办公论坛里看到一遍。新手通常直接复制粘贴累胳膊不说还容易漏行错列稍微懂点函数的会去搜 TEXTJOIN但一碰上跨工作表、数据量大、带格式、要排序去重的情况TEXTJOIN 也未必好用。这篇文章把我在实际项目里反复踩过、验证过的几种方案全部整理出来从纯操作到函数到免费插件到 VBA 兜底按场景套用就行最后一节还专门写了几条常规教程里不会讲的避坑经验。1. 内容整体设计与思路拆解1.1 先搞清楚你到底要合并什么“多行合并成一行”听着简单但落地之前必须分清楚你要的是哪一种合并同记录多行合并同一编号下有多条明细行比如同一个订单号对应三个产品名称需要把产品名称并到一行单元格里用顿号或逗号隔开其他字段保持不变。整列内容汇总不关心分组就是把某一列几百行文字全部接到一个单元格里常见于做词云、做标签汇总、生成临时清单。行列互转式合并多个行变成一行里的多列即行转列横向展开每一行去对应一个字段位置。保留数据不漏不丢这可能才是最核心的要求。很多人合并完了发现后面的单元格内容没跟过来或者格式丢了或者合并完想再拆回去却没辙了。把这些场景全部覆盖到才算真正回答“多行合并成一行同时将数据复制出来”而不是只扔一个函数出来。1.2 方案选型背后的逻辑针对不同情况我做了下面这张选型对照表先看它再往下走适用场景推荐方案数据量是否需要公式是否影响原表同类文本汇总到一格TEXTJOIN 函数几千行以内需要不破坏原数据不同单元格内容拼到一行CONCAT / 连接符几百行以内需要不破坏原数据跨工作表合并显示TEXTJOIN IF 数组中等数据量需要不破坏原数据实时刷新不想改结构Power Query 分组聚合几万行轻松不需要写公式生成新表纯操作不用任何函数剪贴板 替换 / 插件少量数据不需要需要重建结果表带格式、带批注的合并剪贴板逐行复制少量数据不需要最接近手动复制复杂规则的自定义合并VBA 宏任意规模不需要可保留原表选方案有两个原则能不写公式就不写公式能不动原表就不动原表。很多人上来就套公式结果数据量一大文件卡成幻灯片最后还得换方案重做一遍白白浪费时间。1.3 为什么有人合并完了数据“少了”一个非常容易被忽视的坑合并单元格之后只有左上角的值会保留。Excel 里选中几行合并系统会弹提示“仅保留左上角的值其他值将被丢弃”这就是很多人合并完发现数据少了的原因。所以凡是涉及“把多行数据复制出来”的需求绝对不要直接点“合并单元格”而是要先做合并内容、再做格式合并或者干脆用函数和 Power Query 生成新列彻底绕开这个限制。2. 核心方法一函数方案适合日常小批量处理2.1 TEXTJOIN —— 最推荐的基础函数TEXTJOIN 是 Excel 2016 及以上版本自带的文本合并函数。它的核心作用就是把一个区域里的多个文本用指定分隔符合并起来。基本语法TEXTJOIN(分隔符, 是否忽略空值, 区域1, 区域2, ...)举个例子。A 列是编号B 列是产品名。我想把同一个编号对应的所有产品名合并到一个单元格里比如 A2 单元格写编号“1001”B 列有“手机”“数据线”“充电器”三行对应它。这时就不用住手并而是用数组形式TEXTJOIN(、, TRUE, IF($A$2:$A$10D2, $B$2:$B$10, ))注意这个公式在旧版 Excel 里需要按CtrlShiftEnter数组三键确认在 Office 365 或者 Excel 2021 之后的版本里直接回车即可。这个公式的思路是IF 部分先把不属于当前编号的内容变成空字符串TEXTJOIN 再把这些空值忽略掉最终把符合条件的文本全部接在一起。实操步骤在原表旁边新建一列“合并结果”。先列出所有不重复的编号可以用删除重复项也可以用数据透视表拉一次。在第一个编号右侧单元格输入 TEXTJOIN 公式。向下填充检查结果是否完整。这里有个细节TEXTJOIN 的第二个参数写TRUE意味着忽略空值。如果不忽略IF 判断出来的空字符串会被当作“有内容”处理合并出来的结果里全是分隔符看起来就是一顿乱炖。2.2 CONCAT 和 连接符 —— 两三个单元格拼接时最顺手如果只是两三个单元格拼到一行根本不需要 TEXTJOIN直接用等号连接符就行A2 、 B2 、 C2注意“”前后要加双引号把分隔符包起来否则 Excel 会认为你在引用一个叫“、”的区域直接报错。CONCAT 函数可以一次连接多个区域比 省事一点CONCAT(A2:A5)但它有个短板不能指定分隔符所有内容会像串珠子一样毫无缝隙地贴在一起。所以一般我还是直接用文字中间想加什么符号就加什么符号灵活得多。2.3 跨工作表合并TEXTJOIN IF 的进阶用法有一种场景多个工作表里的数据需要汇总到一个工作表里显示。比如一月、二月、三月各一个表每个表里都有一列产品名我想在汇总表里把三个月产品名合并到一行。做法是在汇总表里写TEXTJOIN(、, TRUE, 一月!$B$2:$B$10, 二月!$B$2:$B$10, 三月!$B$2:$B$10)这个公式不需要数组三键普通回车就行因为每个工作表区域都是实实在在的引用没有任何数组运算。如果你需要按条件跨表合并比如只合并某个月份里满足某个条件的项那就要把 IF 和多个工作表引用结合起来TEXTJOIN(、, TRUE, IF(一月!$A$2:$A$10$D2, 一月!$B$2:$B$10, ), IF(二月!$A$2:$A$10$D2, 二月!$B$2:$B$10, ))这个公式我用了好几年实测下来最稳的一点是跨表引用时千万别把整列选进去比如选 A:A否则数值量过大会导致公式计算几百毫秒才能刷新大表格里明显卡顿。选精确的有限区域是这类公式不卡的关键。2.4 函数方案的必要注意事项用函数合并有三个坑必须记住公式结果只能单向更新。你改了原表里的数据合并公式会自动刷但如果把合并结果复制成纯文本它就和原表再无关系了。TEXTJOIN 的结果有长度上限吗官方文档说是单元格显示上限 32767 个字符超过的部分会丢失。实际使用中几百行中文文本合并基本没问题但如果你要合并上万行的整列内容建议用 Power Query 或脚本。公式会拖慢大文件。几千行数据的 TEXTJOIN 数组公式要是全表套用几百个保存和打开文件都会明显变慢。这种情况下请优先考虑 Power Query。3. 核心方法二Power Query 分组聚合大数据的首选方案3.1 为什么 Power Query 才是终极方案如果你面临的数据有几万行或者你希望这个合并操作能重复使用以后每月新数据来了点一下刷新就能出结果那函数方案就力不从心了。Power Query 是 Excel 内置的数据清洗和转换工具在 Excel 2016 及以上版本的“数据”选项卡里就可以找到。Power Query 处理多行合并的底层逻辑很简单先把数据加载进查询编辑器再按分组字段做聚合操作。聚合时不选求和、平均数这类数值计算而是选“提取所有值”并自己指定分隔符Power Query 就会帮你把每一组里的文本全部合并成一个单元格。实操步骤选中原表区域点击“数据” → “从表格”Excel 里也叫“自表格/区域”。确认数据范围无误后进入 Power Query 编辑器。选中你想要作为分组依据的列比如编号列点击“分组依据”。在弹出的窗口里新列名写“合并产品”操作选择“所有行”然后点“高级”按钮。添加聚合选择要合并的列产品列操作选择“提取所有值”分隔符输入“、”。点确定后Power Query 会返回一个标题为“表”的结果列。点击该列右侧的展开图标选择“提取值”分隔符选“自定义”输入“、”。点“关闭并加载”合并结果就作为一个新表输出到工作表里。这套流程做完之后以后只要原数据变了右键刷新一下合并结果自动跟着变连公式都不用重写。3.2 分组聚合实际案例多级库存表的合并汇总举个例子我手头有一张多级库存表里面同一物料编码对应多个仓库位置和数量。客户想按编码汇总出“所有位置”和“所有数量”两个合并文本同时保留物料名称。如果用函数得写两组 TEXTJOIN而且数量一列还得先转成文本再拼接比较绕。用 Power Query 就三步分组依据物料编码聚合1物料名称 → 直接取每组第一行可以用“最大值”或“最小值”操作反正是同一个值聚合2仓库位置 → 提取所有值分隔符“、”聚合3数量 → 提取所有值分隔符“、”注意“提取所有值”这个操作默认只能针对文本列如果数量列是数字类型Power Query 编辑器会给你报错或者忽略转换。解决办法是在分组之前提前在“添加列”里把数量列转成文本添加列 → 自定义列 → Table.TransformColumnTypes或者更简单在分组依据窗口里先把数量列的聚合操作类型改成“对文本进行聚合”并让它自动转换。实操上我一般是直接先把这个列的数据类型改成文本省得后面再排查。3.3 Power Query 方案的特殊优势Power Query 合并还有一个隐性优点它不会覆盖原始数据也不会弹“仅保留左上角值”的提示。它是生成一张新表彻底规避了 Excel 原生合并单元格的数据丢失问题。而且它的查询步骤是记录在面板里的以后想看这次合并是怎么做的点一下“查询设置”就能复盘非常适合交工作交接文档时给同事看。4. 核心方法三纯手动操作流零函数零公式也能干4.1 剪贴板 替换法几行数据手动合并如果你就不是想用函数也不用插件数据也就二三十行那最土的办法反而最高效把每行需要合并的单元格复制下来直接粘贴到 Word 里。在 Word 里选中所有行打开“替换”对话框。查找内容输入^p段落标记代表换行符替换内容输入顿号“、”。点击全部替换多行文本瞬间变成一行用顿号连接的内容。把这一行复制回 Excel 单元格里。这个方法看起来笨但胜在所见即所得而且完全不需要掌握任何函数和插件。要保留每行的其他列内容就先把这些内容排好在 Excel 里再整体复制整个过程对思维负担最小。4.2 多列合一行先在编辑栏里拼如果只是想把同一行的几个单元格内容合并到一行末尾的新单元格里比如 A2 到 D2 合并到 E2则完全不需要公式在 E2 单元格点一下。输入等号。鼠标依次点击 A2、B2、C2、D2中间手动输入连接符和分隔符。回车。这是最直观的“手动生成公式”方式适合完全不会写函数的新手也适合需要临时拼一次的情况。缺点是如果每一行的字段都不一样等于每行都要手动点一次效率极低只适合三五行的场景。4.3 带格式、带批注的合并必须用剪贴板逐行操作函数和 Power Query 合并的是“值”也就是纯文本内容。如果你需要把多个单元格的格式、颜色、批注一起复制到一个合并结果里那唯一相对可靠的方式是逐行复制到同一个目标行。具体做法步骤操作说明1先手动合并目标行区域比如选 A1:D1合并居中2复制第一个单元格内容CtrlC3点击合并后单元格的编辑栏不要直接点击单元格本身4粘贴CtrlV 进入编辑栏内粘贴5重复第 2~4 步直到所有行内容都进入编辑栏每个内容之间手动加分隔符这个做法的核心是直接点击合并后的单元格粘贴会覆盖掉原有内容而通过编辑栏粘贴相当于往同一个单元格里追加文本内容就不会丢了。不过我必须提前说清楚这种方法真心累只建议在处理少量带格式样表时使用。如果数据量大且带格式要求那就得用 VBA 了。5. 核心方法四VBA 宏一劳永逸复杂合并规则无所不能5.1 用 VBA 实现“多行合一行数据复制出来”Excel 的 VBA 宏对于很多人来说是黑盒但在多行合并这个问题上宏是真正一步到位的方案尤其是当你需要同时合并多个列、保留分隔符、并且对每一种合并方式有不同要求时。先给一个通用的宏模板。这个宏的功能是选定区域后按第一列分组把后面几列的内容按行合并进一行用指定分隔符合并。打开 VBA 编辑器的方法是按Alt F11在左侧工程资源管理器里右键你的工作簿名称选择“插入” → “模块”然后把下方代码粘贴进去。Sub MergeRows() Dim xRng As Range Dim xCell As Range Dim xDict As Object Dim xKey As String Dim xText As String Dim i As Long Set xDict CreateObject(Scripting.Dictionary) 选择要处理的数据区域包括表头 Set xRng Application.InputBox(请选择要处理的数据区域, MergeRows, Selection.Address, , , , , 1) 从第2行开始循环第1行是表头 For i 2 To xRng.Rows.Count xKey xRng.Cells(i, 1).Value If Not xDict.Exists(xKey) Then 第一次遇到这个分组键时先把该行复制到字典中 xDict.Add xKey, xRng.Rows(i) Else 再次遇到同一个键时把该行内容追加到字典中已存在的数据里 这里以第2列为合并列并用逗号分隔 xDict(xKey).Cells(1, 2).Value xDict(xKey).Cells(1, 2).Value 、 xRng.Cells(i, 2).Value 如果还有其他列要合并继续在这里追加 xDict(xKey).Cells(1, 3).Value xDict(xKey).Cells(1, 3).Value 、 xRng.Cells(i, 3).Value End If Next i 清空原区域写入合并结果 xRng.ClearContents Dim xNewRow As Long xNewRow 1 Dim xItem As Variant 输出表头 xRng.Cells(1, 1).Value 分组 xRng.Cells(1, 2).Value 合并内容 For Each xItem In xDict.Items xNewRow xNewRow 1 xRng.Cells(xNewRow, 1).Value xItem.Cells(1, 1).Value xRng.Cells(xNewRow, 2).Value xItem.Cells(1, 2).Value Next xItem End Sub这段代码是一个基础框架实际使用中我会按需改动比如合并列不止一列、分隔符不一样、需要先排序再去重直接在代码里加条件判断就可以。它最大的好处是整个过程全自动几万行数据秒级完成而且整个逻辑写在宏里下次再遇到同样需求直接运行即可。5.2 更简单的 VBA 小技巧公式转文本如果你不想学上面这一大段代码还有一个取巧的宏思路让宏去把公式计算出来的结果批量替换成静态文本。比如你已经用 TEXTJOIN 把合并公式写好了但公式会随原表变动而更新此时你要把结果复制出来给别人就可以用宏把所有公式结果一次性转为纯文本值Sub FormulasToValues() Dim xRange As Range Set xRange Selection xRange.Copy xRange.PasteSpecial xlPasteValues Application.CutCopyMode False End Sub选中合并结果区域运行这个宏公式就变成纯文本了发给别人也不会出现链接丢失、数据变 0 的情况。这个宏通用性很强我几乎每天都会用到。5.3 VBA 的坑文件格式与宏安全问题用 VBA 要注意三件事保存文件时必须选择.xlsm格式启用宏的工作簿否则宏代码直接丢失。打开文件时如果宏被禁用了需要在“文件 → 选项 → 信任中心 → 信任中心设置 → 宏设置”里启用宏。如果公司电脑受限可以用“Excel 加载项被禁用”同样的思路去查宏安全性设置。VBA 使用字典对象时要引用Microsoft Scripting Runtime如果别人电脑上没这个引用代码会报错。稳妥做法是在代码里直接基于CreateObject(Scripting.Dictionary)创建这也是上面模板里我采用的方式。6. 常见问题排查与实操心得这一节把所有高频问题集中列一遍让我一次说透。与此同时这部分内容里藏着的是几个常规教程不会告诉你的细节。6.1 多行合并时数据丢失了怎么办数据丢失最常见的原因就是我前面说过的直接用了合并单元格功能系统只保留左上角值。已经丢失且没有撤销的话只能靠文件的备份版本恢复。如果只是担心合并后数据可能丢那就坚持一个原则先合并到新列验证完整后再做下一步。比如先在 F 列用 TEXTJOIN 生成合并内容检查无误后再删除原行或者做格式调整。这个习惯能救回很多本不该丢的数据。6.2 合并后换行符号没有出现合并时如果希望每条内容之间换行而不是用顿号连接则分隔符要写成换行符。在 TEXTJOIN 里写法是TEXTJOIN(CHAR(10), TRUE, B2:B10)CHAR(10) 是 Excel 里的换行符。注意这个公式写完后单元格内容虽然看起来是一行文字但只要设置单元格格式为“自动换行”它就显示出逐行排列的效果了。这个细节很多人不知道总说合并后没有换行效果实际上是忘了开自动换行。如果用剪贴板法在 Word 里替换分隔符为^p同样能达到换行效果。6.3 文件名、格式、模板保存前的最后一公里合并做完数据也验证过了保存文件时还是有三个坑要提防中文文件名与特殊符号文件名里不要带“/ : * ? |”这类字符否则保存或另存为时报错偏偏很多人喜欢在文件名里加“产品/型号/汇总”这种格式结果白忙活一场。文件格式用宏的必须是.xlsm。用 Power Query 建议保存.xlsx即可但千万别存成.xls老格式否则很多聚合步骤和函数会失效。打印边界如果合并后的长文本内容要打印出来务必先到“页面布局”里调整列宽和缩放比例否则打印出来时文本会被截断看起来像数据丢失了其实只是显示问题。6.4 加载项禁用和公式下拉失效这类环境问题不少人在合并过程中遇到“公式下拉不生效”或者“Excel 提示加载项被禁用”其实这俩问题经常同时出现。公式下拉失效往往是因为表格开启了“手动计算”模式或者数据区域里存在合并单元格导致拖拽公式时区域错乱。解决办法按CtrlAltF9强制重算整个工作簿。检查“公式”选项卡 → 计算选项确保选中的是“自动计算”。如果选了数据区域下拉公式到末尾时发现不填充先看区域里有没有合并单元格把合并单元格取消再试。“Excel 加载项被禁用”则通常是 Office 更新之后插件没有被自动启用到“文件 → 选项 → 加载项”里手动勾选启用或者到 COM 加载项里重新勾选一次。6.5 合并多列数据的优先级问题当同一分组里有多行数据并且每一列都需要合并时函数方案有个致命问题TEXTJOIN 的 IF 只能判断一个分组条件如果同时要合并产品名和数量两列就得写两个公式而且分组合并出来的顺序可能还对不上。Power Query 方案就没有这个烦恼它在分组时可以直接添加多个聚合列一次性把每列的处理方式都定义好。后面新数据来了刷新一次所有列同步更新不用去担心错位问题。这也是为什么数据量大或者列多时我更推荐 Power Query 的核心原因。7. 高级玩法用开源工具和脚本处理大型数据集7.1 Python Pandas 处理 Excel 多行合并当数据量到几十万行级别Excel 本身已经不太能打了这时候我一般会转到 Python 里用 Pandas 处理。它处理多行合并的方式非常优雅核心就一个groupby() agg()。import pandas as pd # 读取 Excel 文件 df pd.read_excel(data.xlsx, sheet_nameSheet1) # 按编号分组将产品名列合并成一行用顿号分隔 result df.groupby(编号, as_indexFalse).agg({产品名: lambda x: 、.join(map(str, x))}) # 输出到 Excel result.to_excel(merged.xlsx, indexFalse)这段代码处理几十万行数据只需要几秒钟。关键是lambda x: 、.join(map(str, x))这部分就是实现“把组内所有文本复制到一个单元格”的核心逻辑。如果有多个字段需要不同方式处理在 agg 里传入不同列的字典即可。7.2 开源 Excel 数据库软件LibreOffice Base还有人问“开源 Excel 数据库软件”怎么用其实如果你只是做数据合并和汇总不用到正经数据库直接用 LibreOffice Calc 就行。LibreOffice 是开源免费的办公套件Calc 是它的表格组件支持打开和编辑 Excel 文件并且内置了类似 Power Query 的“数据 → 从表格”功能。LibreOffice 对超大表格的打开速度明显比 Excel 流畅得多如果手头数据大而且公司不让装其他收费软件这是一个特别好的备用方案。但要注意LibreOffice 保存的公式在某些场景下跟 Excel 不兼容特别是数组公式和某些数据透视表设置建议另存成.xlsx格式再回 Excel 里用。7.3 c# / VB 脚本控制 Excel 实现自动化合并在办公自动化的落地场景里很多企业有内部系统或老旧的 VFP、Delphi 程序需要直接控制 Excel 完成合并。这种时候通常用 COM 组件调用 Excel比如在 C# 里用Microsoft.Office.Interop.Excel把数据写入 Excel或者用 VB 代码操纵 Excel 的 Selection 和 Cells 对象。这类方案和 VBA 的本质逻辑是一样的只是宿主环境不同。如果你不是开发人员不必深入研究知道“Excel 可以通过 COM 接口被外部程序控制和驱动”这个事实就够了。遇到需要把系统导出数据批量合并成格式漂亮报表的场景直接找会写脚本的同事把这个需求描述成“用 Excel 多行合并方式整理数据源即可”沟通成本会低很多。8. 最后再分享一个小技巧在我的实际经验里真正好用的多行合并不是“学会某一个方案”而是建立一套判断习惯数据量小且一次性需求 → 剪贴板 替换法速度快不用动脑。数据量中等但需要重复刷新 → Power Query一劳永逸。需要控制格式、批注 → VBA 手动或自动化结合。数据量巨大且跨系统 → Python / Pandas顺便做清洗。这几套方案我都在不同项目里跑过实测下来没有一套是万能的。但只要按照表格里的场景去对应选择绝大多数“多行合并成一行同时将数据复制出来”的需求都能在几分钟内解决并且数据完整不丢。如果你之前还在用最原始的方式逐行复制建议从今天这篇里挑一个最适合自己的方案试一次效率提升会非常明显。