使用TEXTJOIN函数可直接合并多行数据为一行并用逗号分隔，公式为=TEXTJOIN(",",TRUE,A1:A10)，适用于Excel 2019及以后版本。
如果您需要将Excel中一列的多行数据合并为一行，并用逗号分隔，以便于复制到其他程序或数据库中使用，可以通过多种方法实现。这种操作常用于整理导出的数据列表。
本文运行环境：Dell XPS 13，Windows 11
一、使用TEXTJOIN函数
TEXTJOIN函数是Excel中专门用于合并文本并指定分隔符的函数，支持忽略空单元格，适用于Excel 2019及以后版本或Office 365。
1、在目标单元格中输入公式：=TEXTJOIN(",",TRUE,A1:A10)，其中A1:A10为需要合并的数据区域。
2、按Enter键确认，即可得到以逗号分隔的一行文本。
3、若数据区域包含空值，设置第二个参数为TRUE可自动跳过空单元格。
二、使用CONCATENATE与辅助列结合
此方法适用于不支持TEXTJOIN函数的旧版Excel，通过逐行拼接实现合并。
1、在B1单元格输入公式：=A1&","，为第一个数据添加逗号。
2、向下填充该公式至最后一行数据，使每项后都追加逗号。
3、在空白单元格使用CONCATENATE函数或“&”符号连接所有B列结果，如：=B1&B2&B3&...&B10。
4、复制结果后，在目标位置选择“选择性粘贴”为数值，去除公式依赖。
三、使用Power Query合并列
Power Query适合处理大量数据，能够可视化操作并保留原始数据结构。
1、选中数据列，点击“数据”选项卡，选择“从表格/区域”加载数据进入Power Query编辑器。
2、在Power Query中，全选该列内容，右键选择“合并列”，自定义分隔符为英文逗号(,)。
3、设定新列名称后点击确定，生成合并后的文本行。
4、点击“关闭并上载”，将结果返回Excel工作表。
四、使用VBA宏代码快速合并
VBA适用于重复性操作，可一键完成大范围数据合并。
1、按Alt+F11打开VBA编辑器，插入新模块。
2、输入以下代码：
Sub MergeWithComma()
Dim rng As Range
Dim cell As Range
Dim result As String
Set rng = Selection
For Each cell In rng
If cell.Value "" Then
result = result & cell.Value & ","
End If
Next cell
result = Left(result, Len(result) - 1)
MsgBox result
End Sub
3、返回Excel，选中目标数据列，运行宏，弹窗将显示合并结果。
4、可将MsgBox改为输出到指定单元格，例如Range("B1").Value = result。
