KutoolsforOffice — 一套方案,五大工具。事半功倍。

在 Excel 中将逗号分隔的值拆分为行/列——简易指南

作者Siluvia修改日期

在某些情况下,您可能需要将选定单元格中的逗号分隔值拆分为独立的行或列。本指南将为您介绍多种高效方法,并提供清晰的分步操作说明,助您轻松管理和重新组织数据,精准满足您的需求。


将逗号分隔的值拆分为不同列

若要将选定单元格中以逗号分隔的值拆分为不同列,请尝试本节介绍的方法。

使用“文本分列”向导将逗号分隔的值拆分为列

在 Excel 中,将选定单元格中的逗号分隔值拆分为多列,最常用的方法是使用“文本分列”向导。下面我将逐步演示如何通过该向导轻松实现这一操作。

1. 选择要拆分为列的单元格区域,然后单击“数据” > “文本分列”。参见下图:

一张截图,展示在 Excel 的“数据”选项卡下选择“文本分列”功能

2. 在首个“文本分列向导”对话框中,选择“分隔符号”选项,然后点击“下一步”按钮。

一张截图,展示“文本分列向导”对话框,并已选中“分隔符号”选项

3. 在第二个“文本分列向导”对话框中,仅勾选“分隔符号”选项下的“逗号”复选框,然后单击“下一步”按钮。

一张截图,展示“文本分列向导”的第二步对话框,并已选中“逗号”作为分隔符

4. 在最后一个“文本分列向导”对话框中,于“目标区域”框内选择一个单元格以放置拆分后的值,然后单击“完成”按钮。

一张截图,展示“文本分列向导”的最后一步对话框,用于选择目标单元格

现在,所选单元格中以逗号分隔的所有值均已拆分为不同的列,如下图所示。

一张截图,展示 Excel 中以逗号分隔的值已被拆分为多个列

使用 Kutools 轻松将逗号分隔的值拆分为多列

如您所见,“文本分列”向导需经多个步骤才能完成操作。若您希望采用更简便的方式,强烈推荐使用“Kutools for Excel”的“分割单元格”功能——只需在一个对话框中完成设置,即可轻松按指定分隔符将单元格内容拆分为多列或多行。

Kutools for Excel 提供 300 多项高级功能,简化复杂任务,提升创造力与效率。集成 AI 能力,Kutools 精准自动化任务,让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

安装 Kutools for Excel 后,依次单击“Kutools” > “合并和拆分” > “分割单元格”,即可打开“分割单元格”对话框。

  1. 请选择包含待拆分文本的单元格区域。
  2. 选择“分割至多列”选项。
  3. 选择“逗号”(或您所需的任意分隔符),然后单击“确定”。
    一张截图,展示 Kutools 的“拆分单元格”对话框,已选择“拆分为列”并将逗号设为分隔符
  4. 请选择目标单元格,然后单击“确定”以获取全部分割数据。
    一个 GIF 动图,展示如何使用 Kutools for Excel 将单元格拆分为多列
注意:要使用此功能,您需要在计算机上安装 Kutools for Excel。立即下载 Kutools for Excel。

将逗号分隔的值拆分为不同行

本节将为您演示两种方法,轻松将 Excel 中逗号分隔的值拆分为不同行。请按以下步骤操作。

使用 VBA 将逗号分隔的值拆分为多行

若要将逗号分隔的值拆分为多行,可使用以下 VBA 代码。

1. 同时按下“Alt”+“F11”键,即可打开“Microsoft Visual Basic for Applications”窗口。

2. 在“Microsoft Visual Basic for Applications”窗口中,单击“插入”>“模块”,然后将下方的 VBA 代码复制并粘贴到模块窗口中。

VBA 代码:将逗号分隔的值拆分为行

Sub SplitAll()
	Dim xRg As Range
	Dim xRg1 As Range
	Dim xCell As Range
	Dim I As Long
	Dim xAddress As String
	Dim xUpdate As Boolean
	Dim xRet As Variant
	On Error Resume Next
	xAddress = Application.ActiveWindow.RangeSelection.Address
	Set xRg  = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
	Set xRg  = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
	If xRg Is Nothing Then Exit Sub
		If xRg.Columns.Count > 1 Then
			MsgBox "You can't select multiple columns", , "Kutools for Excel"
			Exit Sub
			End If
			Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
			Set xRg1 = xRg1.Range("A1")
			If xRg1 Is Nothing Then Exit Sub
				xUpdate = Application.ScreenUpdating
				Application.ScreenUpdating = False
				For Each xCell In xRg
					xRet = Split(xCell.Value, ",")
					xRg1.Worksheet.Range(xRg1.Offset(I, 0), xRg1.Offset(I + UBound(xRet, 1), 0)) = Application.WorksheetFunction.Transpose(xRet)
					I = I + UBound(xRet, 1) + 1
				Next
				Application.ScreenUpdating = xUpdate
			End Sub

3. 按下“F5”键运行代码,在弹出的“Kutools for Excel”对话框中选择要拆分的单元格,然后单击“确定”按钮。

一张截图,展示在 Excel 中使用 VBA 代码选择要拆分的单元格区域

4. 在第二个弹出的“Kutools for Excel”对话框中,选择一个用于放置拆分后数值的单元格,然后单击“确定”。

一张截图,展示运行 VBA 代码后选择拆分数据的目标单元格

随后,您将看到所选单元格中的逗号分隔值已按行拆分,如下图所示。

一张截图,展示使用 VBA 代码将逗号分隔的值拆分为多行

使用 Kutools for Excel 轻松将逗号分隔的值拆分为行

VBA 代码对 Excel 新手来说过于复杂,难以按需修改。此时,“Kutools for Excel”的“分割单元格”功能也能轻松帮您将逗号分隔的值拆分为多行。

Kutools for Excel 提供 300 多项高级功能,简化复杂任务,提升创造力与效率。集成 AI 能力,Kutools 精准自动化任务,让数据管理变得轻松自如。Kutools for Excel 的详细信息……         免费试用……

安装 Kutools for Excel 后,依次单击“Kutools” > “合并和拆分” > “分割单元格”以打开“分割单元格”对话框。

  1. 请选择包含逗号分隔值的单元格区域(这些值将被拆分)。
  2. 选择“分割至多行”选项。
  3. 选择“逗号”(或您所需的任意分隔符),然后单击“确定”。
    一张截图,展示 Kutools 的“拆分单元格”对话框,已选择“拆分为行”并将逗号设为分隔符
  4. 选择目标单元格,然后单击“确定”即可获取全部分割数据。
    一个 GIF 动图,展示如何使用 Kutools for Excel 将单元格拆分为多行
注意:要使用此功能,您的计算机上需已安装 Kutools for Excel。立即下载 Kutools for Excel!

演示:使用 Kutools for Excel 快速将逗号分隔的值拆分为行或列

 
Kutools for Excel:超过 300 款实用工具触手可及!畅享 AI 驱动的功能,让工作更智能、更高效!立即下载!

最佳办公效率工具

🤖KUTOOLS AI 助手:基于以下内容革新数据分析:智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP多条件 VLookup  |  多值 VLookup  |   跨多工作表 VLookup   |   模糊查找……
高级下拉列表快速创建下拉列表   |  级联下拉列表   |  多选下拉列表……
列管理器添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列……
特色功能网格聚焦   |  设计视图   |增强编辑栏   | 工作簿和表管理器   |  资源库(自动文本)|  日期提取   |  汇总工作表  |  加密/解密单元格   | 按列表发送邮件   |  超级筛选   |   特殊筛选(筛选粗体单元格/斜体/删除线……) ......
精选 15 工具集12 文本工具添加文本删除特定字符,……)|   50+ 图表 类型甘特图,……)|   40+ 实用公式基于生日计算年龄,……)|   19 插入工具插入二维码从路径插入图片,……)|   12 转换工具小写金额转大写汇率转换,……)|   7 合并和拆分工具高级合并行分割单元格,……)|……更多
在您的首选语言中使用 Kutools – 支持英语、西班牙语、德语、法语、中文及 40+ 种其他语言!

使用 Kutools for Excel 大幅提升您的 Excel 技能,体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能,助您提升生产力、节省时间。立即点击此处,获取您最需要的功能……


Office Tab 为 Office 带来标签式界面,让您的工作更轻松

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读
  • 在同一个窗口的新标签页中打开并创建多个文档,而非在新窗口中。
  • 将您的工作效率提升 50%,每天减少数百次鼠标点击!

所有 Kutools 插件,一个安装程序

Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro,非常适合需要跨多个 Office 应用高效协作的团队。

ExcelWordOutlookTabsPowerPoint
  • 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
  • 一个安装程序,一个许可证— 几分钟内完成设置(支持 MSI)
  • 协同效果更佳— 在多个 Office 应用中实现高效协同
  • 30 天全功能试用— 无需注册,无需信用卡
  • 超值之选— 比单独购买插件更省钱