在 Excel 中处理“换行分列”通常有两种常见的场景：
- 将包含换行符的单个单元格内容，拆分成多行（纵向拆分）。
- 将包含换行符的内容，按换行位置拆分成多个列（横向拆分）。
以下是针对这两种场景的详细操作方法：
拆分成多行（纵向拆分）
假设 A1 单元格内容为：
苹果
香蕉
橘子你希望将其变成三行：
- A1: 苹果
- A2: 香蕉
- A3: 橘子
方法 1：使用“分列”功能（最常用，无需公式）
- 选中包含换行内容的单元格或列。
- 点击顶部菜单栏的 “数据” (Data) 选项卡。
- 点击 “分列” (Text to Columns)。
- 选择 “分隔符号” (Delimited)，点击“下一步”。
- 在分隔符号选项中,勾选 “其他” (Other)。
- 在旁边的输入框中,按下快捷键
Ctrl + J（这是换行符的快捷键，输入后框内可能看似空白，但已生效）。 - 点击“下一步”，选择目标区域（建议选一个新列，避免覆盖原数据）。
- 点击“完成”。
注意：此方法会将内容拆分到多个列
中，如果需要变成多行，请结合“转置”功能，或使用下面的方法 2。
方法 2：使用 Power Query（推荐，适合大量数据）
- 选中数据区域,点击 “数据” -> “来自表格/区域”。
- 在 Power Query 编辑器中，右键点击该列，选择 “拆分列” -> “按分隔符”。
- 分隔符选择 “自定义”，点击下拉箭头旁的“特殊字符”，选择 “换行符”。
- 在“高级选项”中，拆分方式选择 “行”（而不是列）。
- 点击“确定”，然后点击左上角 “关闭并上载”。
✅ 这是最完美、最自动化的方法，结果直接变成多行。参考2
方法 3：使用 VBA 宏（适合一次性操作）
如果数据量不大,可以使用以下 VBA 代码快速拆分：
Sub SplitByLine()
Dim cell As Range
Dim arr As Variant
Dim i As Long
Dim outputRow As Long
' 假设数据在 A 列，从 A1 开始
For Each cell In Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row)
If InStr(cell.Value, Chr(10)) > 0 Then
arr = Split(cell.Value, Chr(10))
outputRow = cell.Row
For i = LBound(arr) To UBound(arr)
Cells(outputRow, 2).Offset(i, 0).Value = Trim(arr(i)) ' 输出到 B 列
Next i
' 隐藏原行或标记已处理（可选）
End If
Next cell
End Sub
拆分成多列（横向拆分）
假设 A1 单元格内容为：
苹果
香蕉
橘子你希望变成：
- A1: 苹果
- B1: 香蕉
- C1: 橘子
方法 1：使用“分列”功能
- 选中 A1 单元格。
- 点击 “数据” -> “分列”。
- 选择 “分隔符号” -> “下一步”。
- 勾选 “其他”，按下
Ctrl + J。 - 点击“下一步”，选择目标区域（如 B1）。
- 点击“完成”。
方法 2：使用公式（Excel 365 / Excel 2021+）
使用 TEXTSPLIT 函数：
=TEXTSPLIT(A1, CHAR(10))
CHAR(10)代表换行符。- 此公式会自动将内容横向填充到相邻单元格。
方法 3：使用旧版公式（兼容所有版本）
如果只有 3 行数据，可以用 MID + FIND 组合，但较复杂，更通用的方式是使用 Power Query 或 VBA。
常见问题与提示
-
如何输入换行符？
- 在单元格内手动输入换行：按
Alt + Enter。 - 在公式或分列设置中：使用
CHAR(10)或按Ctrl + J。
- 在单元格内手动输入换行：按
-
为什么
Ctrl + J没反应？- 确保你是在“其他”输入框中按下
Ctrl + J，而不是在单元格编辑时。 - 在某些系统或 Excel 版本中，可能需要先选中“其他”输入框，再按
Ctrl + J。
- 确保你是在“其他”输入框中按下
-
拆分后出现空格？
- 使用
TRIM()函数清理多余空格。 - 在 Power Query 中，可以在拆分后添加“修剪”步骤。
- 使用
-
如何合并回换行格式？
- 使用
TEXTJOIN函数：=TEXTJOIN(CHAR(10), TRUE, A1:A3)
- 使用
✅ 推荐方案总结：
- 拆分成多行：使用 Power Query（最稳定、可重复）。
- 拆分成多列：使用 “分列”功能 +
Ctrl + J或TEXTSPLIT函数。
如有具体数据结构或错误截图,可提供更多细节，我会给出更精准的解决方案。
首发原创文章，作者：王坚，如若转载，请注明出处：https://idctop.com/excel%e8%a1%a8%e6%a0%bc%e6%80%8e%e4%b9%88%e6%8d%a2%e8%a1%8c%e5%88%86%e5%88%97%ef%bc%9f/
