Excel中如何将多行数据首尾连接成一行？

Question

在处理Excel数据时，常需将多行文本内容合并为一行，如将多个地址行或分段描述整合为连续字符串。然而，许多用户不熟悉高效方法，常手动复制粘贴，费时且易出错。常见的问题是：如何利用公式（如CONCAT、TEXTJOIN）或Power Query将指定范围的多行数据首尾相连，并自定义分隔符？尤其当数据包含空值或需跨工作表合并时，操作更为复杂。此外，旧版Excel不支持TEXTJOIN函数，又该如何兼容处理？

Answer 1

一、基础方法：使用Excel内置函数实现多行文本合并

在处理Excel中的多行文本数据时，最直接的方式是利用公式进行字符串拼接。对于现代版本的Excel（2016及以上），TEXTJOIN 函数是最推荐的方法。

• TEXTJOIN(delimiter, ignore_empty, text1, [text2], ...)：可指定分隔符，并选择是否忽略空值。
• 例如：=TEXTJOIN(", ", TRUE, A1:A10) 将A1到A10单元格的内容用逗号加空格连接，跳过空白单元格。
• CONCAT 函数也可用于合并文本，但不支持自动忽略空值，语法为：=CONCAT(A1:A10)。

行号	地址信息	合并结果示例
1	北京市朝阳区望京街9号	=TEXTJOIN("；",TRUE,B1:B5)
2	研发大厦B座3层
3
4	邮编：100102
5	联系电话：[phone]

上述表格展示了如何将一个地址的多个组成部分合并为一条完整记录，通过设置 ignore_empty = TRUE 自动过滤第3行的空值。

二、进阶技巧：跨工作表与动态范围的数据合并

当需要从不同工作表中提取并合并数据时，可以通过引用其他Sheet的区域来扩展 TEXTJOIN 的应用范围。

1. 假设 Sheet2 的 A 列包含客户备注信息，需与当前表汇总：
2. 使用公式：=TEXTJOIN(CHAR(10), TRUE, Sheet2!A1:A100)，其中 CHAR(10) 表示换行符，适用于生成可读性高的文本块。
3. 若数据范围不确定，建议结合 INDIRECT 与命名区域实现动态引用。
4. 例如定义名称 “RemarksRange” 指向 =OFFSET(Sheet2!$A$1,0,0,COUNTA(Sheet2!$A:$A),1)，然后调用：=TEXTJOIN("; ", TRUE, INDIRECT("RemarksRange"))。

// VBA辅助函数：兼容旧版Excel（无TEXTJOIN）
Function JoinText(rng As Range, delimiter As String, Optional skipEmpty As Boolean = True) As String
    Dim cell As Range
    Dim result As String
    For Each cell In rng
        If Not (skipEmpty And IsEmpty(cell)) Then
            If result = "" Then
                result = cell.Value
            Else
                result = result & delimiter & cell.Value
            End If
        End If
    Next cell
    JoinText = result
End Function

该VBA函数可在Excel 2013及更早版本中替代 TEXTJOIN，支持自定义分隔符和空值过滤。

三、高级方案：使用Power Query实现结构化文本合并

对于复杂的数据整合任务，尤其是涉及清洗、转换和跨源合并的场景，Power Query 提供了可视化且可复用的流程。

1. 选择数据区域 → 数据选项卡 → “从表格/区域”加载进入Power Query编辑器。
2. 添加自定义列或聚合操作，使用 Text.Combine() 函数合并多行：
3. = Text.Combine([Description], " | ")，其中 Description 是目标列名。
4. 支持条件判断，如仅合并非空项：= Text.Combine(List.RemoveItems([Notes], {null, ""}), "; ")。
5. 完成转换后关闭并上载至工作表，结果自动刷新。

graph TD
    A[原始多行数据] --> B{选择处理方式}
    B --> C[公式法: TEXTJOIN/CONCAT]
    B --> D[Power Query 合并]
    B --> E[VBA 用户函数]
    C --> F[快速静态输出]
    D --> G[支持清洗+自动更新]
    E --> H[兼容旧版Excel]
    F --> I[最终合并字符串]
    G --> I
    H --> I

此流程图展示了三种主流技术路径的选择逻辑，根据环境限制与维护需求决定最优解。