Excel中将多行内容整合到单个单元格并保留换行效果，可采用五种方法：一、用CHAR(10)配合&连接符手动拼接；二、用TEXTJOIN函数批量合并；三、复制粘贴经记事本中转；四、Power Query聚合合并；五、VBA宏一键合并。

如果您在Excel中需要将多行内容整合到单个单元格内并保留换行效果，则可能是由于报表排版、数据导出或文本汇总等实际需求。以下是实现该目标的多种可行方法：

一、使用CHAR(10)配合&连接符手动拼接

该方法通过公式将多个单元格内容用换行符（ASCII码10）连接，适用于已知行数且需动态更新的场景。

1、选中目标合并单元格（例如D1）。

2、输入公式：=A1&CHAR(10)&B1&CHAR(10)&C1（假定需合并A1、B1、C1三行内容）。

3、按Enter确认后，右键单元格→“设置单元格格式”→勾选“自动换行”。

4、调整行高至能完整显示全部内容。

二、使用TEXTJOIN函数批量合并多行

TEXTJOIN函数可一次性连接指定区域内的非空单元格，并自定义分隔符，支持忽略空值，适合处理不规则行数的数据。

1、在目标单元格中输入公式：=TEXTJOIN(CHAR(10),TRUE,A1:A5)（合并A1至A5区域，TRUE表示忽略空单元格）。

2、按下Enter完成计算。

3、选中该单元格→开始选项卡→点击“自动换行”按钮。

4、双击行号下方边界以自动调整行高。

三、利用复制粘贴结合记事本中转实现纯文本换行合并

此方法不依赖公式，适用于静态内容合并或原始数据含格式干扰的情况，通过外部文本工具清除格式并注入换行符。

1、选中待合并的多行单元格（如A1:A4），按Ctrl+C复制。

2、打开记事本，按Ctrl+V粘贴，此时各行内容自然以换行分隔。

3、全选记事本中内容，按Ctrl+C再次复制。

S_Excel数据架构师

通过可复用的 DuckDB 优先 ETL 执行器运行 Excel/CSV/XLSX 分析，同时保留脚本优先架构。适用于系统需要通用可导出执行器来完成标准表电子表格分析、安全只读 SQL 执行、多表注册、查询模板、验证产物、script_usage.md 使用说明、运行清单，以及调度友好的可重复输出等场景。DuckDB 为首选执行引擎；其他工具仅用于文件探测、Excel 标准化或有明确文档记录的降级场景。

下载

4、回到Excel，右键目标单元格→选择“选择性粘贴”→点击“文本”选项→确定。

5、对该单元格启用“自动换行”，并手动调整行高。

四、使用Power Query进行多行聚合合并

适用于大量数据、需重复执行或与其他清洗步骤联动的场景，可在查询编辑器中统一处理多行文本聚合逻辑。

1、选中源数据区域→数据选项卡→“从表格/区域”导入（勾选“表包含标题”）。

2、在Power Query编辑器中，右键需合并的列→选择“转换”→“格式”→“合并列”。

3、在弹出窗口中，分隔符选择“自定义”，输入#(lf)（代表换行符）。

4、点击确定后，关闭并上载至工作表指定位置。

5、对结果列应用“自动换行”格式并适配行高。

五、VBA宏一键合并选区为带换行的单单元格

该方法适合高频操作用户，运行一次宏即可将任意选中多行单列区域合并至首个单元格，保留各原单元格内容换行排列。

1、按Alt+F11打开VBA编辑器，插入→模块。

2、粘贴以下代码：Sub MergeWithLineBreaks() Dim rng As Range, cell As Range, result As String Set rng = Selection If rng.Columns.Count > 1 Then Exit Sub For Each cell In rng If cell.Value "" Then result = result & cell.Value & Chr(10) Next cell rng.Cells(1, 1).Value = Left(result, Len(result) - 1) rng.Cells(1, 1).WrapText = True End Sub

3、返回Excel，选中需合并的垂直区域（如A1:A6）。

4、按Alt+F8，选择“MergeWithLineBreaks”，点击“运行”。