如何在Excel中将逗号分隔的文本字符串转换为列表或行？

如何在Excel中将逗号分隔的文本字符串转换为列表或行？

使用VBA代码将逗号分隔的文本字符串转换为行

以下VBA代码可以帮助您将多个逗号分隔的单元格值转换为列，请执行以下操作：

1。 按住 Alt + F11键 键，然后打开 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页 > 模块，然后将以下宏粘贴到 模块 窗口。

VBA代码：将逗号分隔的文本字符串转换为行或列表

Sub RedistributeCommaDelimitedData() Updateby Extendoffice Dim xArr() As String Dim xAddress As String Dim Rg As Range Dim Rg1 As Range On Error Resume Next xAddress = Application.ActiveWindow.RangeSelection.Address Set Rg = Application.InputBox("please select the data range:", "Kutools for Excel", xAddress, , , , , 8) If Rg Is Nothing Then Exit Sub Set Rg = Application.Intersect(Rg, Rg.Parent.UsedRange) If Rg Is Nothing Then Exit Sub Set Rg1 = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8) If Rg1 Is Nothing Then Exit Sub xArr = Split(Join(Application.Transpose(Rg.Value), ","), ",") Rg1.Resize(UBound(xArr) + 1) = Application.Transpose(xArr) Rg1.Parent.Activate Rg1.Resize(UBound(xArr) + 1).Select End Sub

3。 然后按 F5 键以运行此代码，在弹出的对话框中，选择要转换的数据范围，请参见屏幕截图：

4。 并点击 OK，在以下对话框中，指定要在其中输出结果的单元格，请参见屏幕截图：

5。 点击 OK 按钮，所选的逗号分隔单元格值已转换为行列表。 看截图：

将逗号分隔的文本字符串转换为行 Kutools for Excel

如果你有 Kutools for Excel，其 分裂细胞 实用程序，您可以根据需要根据逗号分隔符快速将逗号分隔的单元格值拆分为多行或多列。

Kutools for Excel : 带有300多个便捷的Excel加载项，可以在30天内免费试用. 

安装后 Kutools for Excel，请执行以下步骤：

1。 选择您要基于逗号分隔符转换为行的单元格值。

2。 然后点击 Kutools > 合并与拆分 > 分裂细胞，请参见屏幕截图：

3。 在 分裂细胞 对话框中选择 拆分为行 选项下 Type 部分，然后从 指定分隔符 部分，检查 其他 复选框，然后在文本框中输入逗号，请参见屏幕截图：

4。 然后点击 Ok，然后会弹出另一个对话框，提醒您选择要放入结果的单元格，请参见屏幕截图：

5。 然后点击 Ok 按钮，逗号分隔的单元格已根据逗号分隔符分为多行，请参见屏幕截图：

单击以了解有关此拆分单元格功能的更多信息…

下载并免费试用 Kutools for Excel 现在 ！

演示：将逗号分隔的文本字符串转换为行 Kutools for Excel

相关文章：

如何通过回车将单元格分为多列或多行？

如何在Excel中将单元格值拆分为多个列？