Excel中将多行数据合并到一行的多种方法

创作时间:

作者:

@小白创作中心

Excel中将多行数据合并到一行的多种方法

引用

来源

https://docs.pingcode.com/baike/4949946

在Excel中，有时我们需要将多行数据合并到一行，以便于数据处理和展示。本文将详细介绍三种主要方法：使用公式（TEXTJOIN函数）、Power Query和VBA宏，以及一些辅助方法，帮助你轻松实现这一需求。

使用公式方法

通过TEXTJOIN函数和数组公式可以实现多行数据的合并。TEXTJOIN函数可以将多个单元格内容合并为一个字符串，并可以指定分隔符。具体步骤如下：

准备数据
首先，在Excel中打开需要合并的多行数据。假设数据在A列，从A1到A10。
使用TEXTJOIN函数
在目标单元格中输入如下公式：
```
=TEXTJOIN(",", TRUE, A1:A10)
```
该公式将A1到A10的内容用逗号分隔符合并成一个字符串。TEXTJOIN函数的参数解释如下：

第一个参数“,”是指定分隔符。
第二个参数TRUE表示忽略空白单元格。
第三个参数A1:A10是需要合并的单元格范围。

确认并应用公式
按下Enter键，公式会自动计算并在目标单元格中显示合并后的字符串。

使用Power Query

Power Query是一种数据连接技术，允许用户从各种数据源中提取、转换和加载数据。以下是使用Power Query将多行数据合并到一行的具体步骤：

加载数据到Power Query
在Excel中，选择需要合并的数据区域，然后点击“数据”选项卡，选择“从表格/范围”。这会打开Power Query编辑器。
转换数据
在Power Query编辑器中，选择要合并的列，然后点击“转换”选项卡，选择“合并列”。在弹出的对话框中，选择需要的分隔符，如逗号或空格，然后点击“确定”。
加载数据回Excel
合并完成后，点击“主页”选项卡，选择“关闭并加载”。合并后的数据将返回到Excel工作表中。

Power Query的方法适用于处理大规模数据和复杂的数据转换任务，提供了更直观的界面和更多的转换选项。

使用VBA宏

如果需要经常执行相同的合并操作，可以使用VBA宏来实现自动化。以下是一个简单的VBA宏示例，用于将多行数据合并到一行：

打开VBA编辑器
在Excel中，按下Alt + F11打开VBA编辑器。
插入新模块
在VBA编辑器中，点击“插入”菜单，选择“模块”。这会插入一个新的代码模块。

编写VBA代码
在新模块中输入以下代码：

Sub 合并多行到一行()
    Dim rng As Range
    Dim cell As Range
    Dim result As String
    Set rng = Range("A1:A10") ' 需要合并的单元格范围
    For Each cell In rng
        If cell.Value <> "" Then
            result = result & cell.Value & ","
        End If
    Next cell
    result = Left(result, Len(result) - 1) ' 去掉最后一个逗号
    Range("B1").Value = result ' 合并结果放在B1单元格
End Sub

这段代码会遍历A1到A10的单元格，将非空单元格的值用逗号分隔符合并到一个字符串中，并将结果放在B1单元格中。