如何在Excel中將逗號分隔的文本字符串轉(zhuǎn)換為列表或行？
假設(shè)您有一個用逗號分隔的單元格值列表，現(xiàn)在，您需要將這些用逗號分隔的文本字符串轉(zhuǎn)換為多行或一列，如下面的屏幕快照所示。 如何在Excel中一次基于逗號分隔符將多個單元格值拆分為行？
使用VBA代碼將逗號分隔的文本字符串轉(zhuǎn)換為行
將逗號分隔的文本字符串轉(zhuǎn)換為行 Kutools for Excel
使用VBA代碼將逗號分隔的文本字符串轉(zhuǎn)換為行以下VBA代碼可以幫助您將多個逗號分隔的單元格值轉(zhuǎn)換為列，請執(zhí)行以下操作：
1。 按住 Alt + F11鍵 鍵，然后打開 Microsoft Visual Basic應(yīng)用程序 窗口。
2。 點擊 插頁 > 模塊，然后將以下宏粘貼到 模塊 窗口。
VBA代碼：將逗號分隔的文本字符串轉(zhuǎn)換為行或列表
Sub RedistributeCommaDelimitedData()Updateby ExtendofficeDim xArr() As StringDim xAddress As StringDim Rg As RangeDim Rg1 As RangeOn Error Resume NextxAddress = Application.ActiveWindow.RangeSelection.AddressSet Rg = Application.InputBox("please select the data range:", "Kutools for Excel", xAddress, , , , , 8)If Rg Is Nothing Then Exit SubSet Rg = Application.Intersect(Rg, Rg.Parent.UsedRange)If Rg Is Nothing Then Exit SubSet Rg1 = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)If Rg1 Is Nothing Then Exit SubxArr = Split(Join(Application.Transpose(Rg.Value), ","), ",")Rg1.Resize(UBound(xArr) + 1) = Application.Transpose(xArr)Rg1.Parent.ActivateRg1.Resize(UBound(xArr) + 1).SelectEnd Sub3。 然后按 F5 鍵以運(yùn)行此代碼，在彈出的對話框中，選擇要轉(zhuǎn)換的數(shù)據(jù)范圍，請參見屏幕截圖：
4。 并點擊 OK，在以下對話框中，指定要在其中輸出結(jié)果的單元格，請參見屏幕截圖：
5。 點擊 OK 按鈕，所選的逗號分隔單元格值已轉(zhuǎn)換為行列表。 看截圖：
將逗號分隔的文本字符串轉(zhuǎn)換為行 Kutools for Excel如果你有 Kutools for Excel，其 分裂細(xì)胞 實用程序，您可以根據(jù)需要根據(jù)逗號分隔符快速將逗號分隔的單元格值拆分為多行或多列。
Kutools for Excel : 帶有300多個便捷的Excel加載項，可以在內(nèi).前往下載購買貝寶/ MyCommerce安裝后 Kutools for Excel，請執(zhí)行以下步驟：
1。 選擇您要基于逗號分隔符轉(zhuǎn)換為行的單元格值。
2。 然后點擊 Kutools >合并與拆分> 分裂細(xì)胞，請參見屏幕截圖：
3。 在 分裂細(xì)胞 對話框中選擇 拆分為行 選項下 Type 部分，然后從 指定分隔符 部分，檢查 其他 復(fù)選框，然后在文本框中輸入逗號，請參見屏幕截圖：
4。 然后點擊 Ok，然后會彈出另一個對話框，提醒您選擇要放入結(jié)果的單元格，請參見屏幕截圖：
5。 然后點擊 Ok 按鈕，逗號分隔的單元格已根據(jù)逗號分隔符分為多行，請參見屏幕截圖：
單擊以了解有關(guān)此拆分單元格功能的更多信息…
下載并 Kutools for Excel 現(xiàn)在 ！
演示：將逗號分隔的文本字符串轉(zhuǎn)換為行 Kutools for ExcelKutools for Excel：具有300多個方便的Excel加載項，可以在內(nèi)，沒有任何限制。 立即下載并！相關(guān)文章：
如何通過回車將單元格分為多列或多行？
如何在Excel中將單元格值拆分為多個列？
最佳辦公生產(chǎn)力工具
將小時轉(zhuǎn)化為分鐘 Kutools for Excel!準(zhǔn)備好增強(qiáng)您的 Excel 任務(wù)了嗎？ 利用的力量 Kutools for Excel - 您終極的節(jié)省時間的工具。 簡化復(fù)雜的任務(wù)并像專業(yè)人士一樣瀏覽數(shù)據(jù)。 以閃電般的速度體驗 Excel！
為什么需要 Kutools for Excel
