跳到主要内容

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

添加一名作者 最后修改时间:2024-07-15

在某些情况下,您可能需要将选定单元格中的逗号分隔值拆分为单独的行或列。本指南将探索帮助您实现此目的的不同有效方法,并提供分步说明,以确保您能够根据需要高效地管理和重新组织数据。


将逗号分隔的值拆分到不同的列中

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

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

要将选定单元格中逗号分隔的值拆分为列,常用的方法是 Excel 中的“文本到列”向导。在这里,我将逐步向您展示如何使用此向导来实现所需的结果。

1.选择您想要将值拆分为列的单元格范围,然后单击 时间 > 文本到列。 看截图:

2.在第一 将文本转换为列向导 对话框中,选择 分隔 选项,然后单击 下一页 按钮。

3.在第二 将文本转换为列向导 对话框中,仅选中 逗号定界符 部分,然后单击 下一页 按钮。

4.最后 将文本转换为列向导 对话框中选择一个单元格以在 目的地 框,最后单击 完成 按钮。

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

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

正如你所看到的, 文本到列 向导需要多个步骤才能完成任务。 如果您需要更简单的方法, 分裂细胞 的特点 Kutools for Excel 强烈推荐。 借助此功能,您可以通过在单个对话框中完成设置,根据特定分隔符将单元格方便地拆分为多列或多行。

安装 Kutools for Excel 后, 选择 库工具 > 合并与拆分 > 分裂细胞 打开 分裂细胞 对话框。

  1. 选择包含要拆分的文本的单元格范围。
  2. 点击 拆分为列 选项。
  3. 选择 逗号 (或您需要的任何分隔符)并单击 OK.
  4. 选择目标单元格并单击 OK 获取所有分割数据。
备注: 要使用此功能,您应该拥有 Kutools for Excel 安装在您的计算机上。 去下载 Kutools for Excel 以获得 30 天免费试用,无任何限制.

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

本节介绍两种方法,帮助您在 Excel 中将逗号分隔的值拆分到不同的行。请按如下方式操作。

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

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

1。 按 其他 + F11 同时打开 Microsoft Visual Basic应用程序 窗口。

2.在 Microsoft Visual Basic应用程序 窗口中,单击 插页 > 模块。 然后将下面的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 对话框中,选择要拆分的单元格,然后单击 OK 按钮。

4.在第二个弹出窗口中 Kutools for Excel 对话框中,选择一个单元格以查找拆分值,然后单击 OK.

然后,您可以看到所选单元格中用逗号分隔的值分成几行,如下所示。

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

VBA 代码对于 Excel 新手来说太难修改以满足他们的需求。这里 Kutools for Excel 的拆分单元格功能还可以帮助您轻松地将逗号分隔的值拆分为 Excel 中的多行。

安装 Kutools for Excel 后, 选择 库工具 > 合并与拆分 > 分裂细胞 打开 分裂细胞 对话框。

  1. 选择包含要拆分的逗号分隔值的单元格范围。
  2. 点击 拆分为行 选项。
  3. 选择 逗号 (或您需要的任何分隔符)并单击 OK.
  4. 选择目标单元格并单击 OK 获取所有分割数据。
备注: 要使用此功能,您应该拥有 Kutools for Excel 安装在您的计算机上。 去下载 Kutools for Excel 以获得 30 天免费试用,无任何限制.

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


最佳办公生产力工具

🤖 Kutools 人工智能助手:基于以下内容彻底改变数据分析: 智能执行   |  生成代码  |  创建自定义公式  |  分析数据并生成图表  |  调用 Kutools 函数...
热门特色: 查找、突出显示或识别重复项   |  删除空白行   |  合并列或单元格而不丢失数据   |   不使用公式进行四舍五入 ...
超级查询: 多条件VLookup    多值VLookup  |   跨多个工作表的 VLookup   |   模糊查询 ....
高级下拉列表: 快速创建下拉列表   |  依赖下拉列表   |  多选下拉列表 ....
列管理器: 添加特定数量的列  |  移动列  |  切换隐藏列的可见性状态  |  比较范围和列 ...
特色功能: 网格焦点   |  设计图   |   大方程式酒吧    工作簿和工作表管理器   |  资源库 (自动文本)   |  日期选择器   |  合并工作表   |  加密/解密单元格    按列表发送电子邮件   |  超级筛选   |   特殊过滤器 (过滤粗体/斜体/删除线...)...
前 15 个工具集12 文本 工具 (添加文本, 删除字符,...)   |   50+ 图表 类型 (甘特图,...)   |   40+ 实用 公式 (根据生日计算年龄,...)   |   19 插入 工具 (插入二维码, 从路径插入图片,...)   |   12 转化 工具 (小写金额转大写, 货币兑换,...)   |   7 合并与拆分 工具 (高级组合行, 分裂细胞,...)   |   ... 和更多

使用 Kutools for Excel 增强您的 Excel 技能,体验前所未有的效率。 Kutools for Excel 提供了 300 多种高级功能来提高生产力并节省时间。  单击此处获取您最需要的功能...

描述


Office Tab 为 Office 带来选项卡式界面,让您的工作更加轻松

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!
Comments (11)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
A jak zmienić kod żeby nie pytał o ustawienie się w A1 i potem aby wynik był np też od A1 w dół
This comment was minimized by the moderator on the site
Hi Bartek,
You mean don't want to pop up the second dialog to select the target cell, and want to specify the target cell in the code directly?
If so, you need to change the following lines.
For example, you need to start outputting results from B1 and automatically fill down.
Please change this line:
Set xRg1 = Application.InputBox("Split to (single cell):", "Kutools for Excel", , , , , , 8)
to
Set xRg1 = Application.Range("B2")
And then remove the next line:
Set xRg1 = xRg1.Range("A1")
This comment was minimized by the moderator on the site
i still cant upload my csv into 365
This comment was minimized by the moderator on the site
Go to excel file Data option -> text to column->delimited -> Done
it will spit comma separated value into individual column
example
id name add
1 Ratnesh myAdd
2,Yog,myAdd
we will apply in the 2nd record it will split record like 1st records,
Thanks,
Ratnesh Sahu
This comment was minimized by the moderator on the site
Go to excel file Data option -> text to column->delimited -> Done
it will spit comma separated value into individual column
example

id name add

1 Ratnesh myAdd

2,Yog,myAdd


we will apply in the 2nd record it will split record like 1st records,


Thanks,
Ratnesh Sahu
This comment was minimized by the moderator on the site
Thanks it helped :)
This comment was minimized by the moderator on the site
This is amazing, thanks for making it free and easy to use!
This comment was minimized by the moderator on the site
Thank you!
This comment was minimized by the moderator on the site
Alternately for separating into rows, use the text to column steps and then copy & paste ->transpose to turn the columns into rows.
This comment was minimized by the moderator on the site
Thanks Jake! This is what I was looking for. :)
This comment was minimized by the moderator on the site
Good one, the utility help me a lot. Thanks for that... :)
There are no comments posted here yet
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations