Excel：如何將分隔的文字分割到多行

Author: Sun Last Modified: 2025-08-23

在 Excel 中處理數據時，您可能會遇到包含多條信息的單元格，這些信息通常由逗號、空格或分號等分隔符分開。將這些文字分割到不同的行對於更好的數據分析和組織至關重要。幸運的是，Excel 提供了多種方法來高效完成此任務。以下是將分隔文字分割到多行的逐步指南。
split delimited text to rows

使用 VBA 將分隔的文字分割到多行

使用 Kutools for Excel 將分隔的文字分割到多行

使用 POWER QUERY 將分隔的文字分割到多行

使用 VBA 將分隔的文字分割到多行

以下是一個可以快速將分隔文字分割到多行的 VBA 程式碼。

1. 按下「Alt + F11」鍵以啟動「Microsoft Visual Basic for Applications」視窗。

2. 點擊「插入」>「模組」以創建一個新的空白模組。

3. 複製並將以下程式碼粘貼到空白模組中。

VBA：將分隔的文字分割到多行

Public Sub SplitTextInCellsToRows()
'UpdatebyExtendoffice20220622
    Dim xSRg, xIptRg, xCrRg, xRg As Range
    Dim xSplitChar As String
    Dim xArr As Variant
    Dim xFNum, xFFNum, xRow, xColumn, xNum As Integer
    Dim xWSh As Worksheet
    Set xSRg = Application.InputBox("Select a range:", "Kutools for Excel", , , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    xSplitChar = Application.InputBox("Type delimiter:", "Kutools for Excel", , , , , , 2)
    If xSplitChar = "" Then Exit Sub

    Application.ScreenUpdating = False
    xRow = xSRg.Row
    xColumn = xSRg.Column
    Set xWSh = xSRg.Worksheet
    For xFNum = xSRg.Rows.Count To 1 Step -1
        
        Set xRg = xWSh.Cells.Item(xRow + xFNum - 1, xColumn)
        Debug.Print xRg.Address
        xArr = Split(xRg, xSplitChar)
        For xFFNum = LBound(xArr) To UBound(xArr)
            xRg.EntireRow.Copy
            xRg.Offset(1, 0).EntireRow.Insert Shift:=xlShiftDown
            xRg.Worksheet.Cells(xRow + xFNum, xColumn) = xArr(xFFNum)
        Next
        xRg.EntireRow.Delete
    Next
    Application.CutCopyMode = False
    Application.ScreenUpdating = True
End Sub

4. 按下 F5 鍵啟動程式碼，會彈出一個對話框讓您選擇不包含標題的列，該列包含需要分割成多行的分隔文字。點擊確定。
vba code to select the data range

5. 接著第二個對話框會出現要求輸入您使用的分隔符。這裡輸入逗號（,）。點擊確定。
enter the delimiter to split based on

現在，分隔的文字已經被分割成多行，其他相關的列也已重複。
the delimited texts are split into rows and other related columns have been repeated

此 VBA 會改變原始數據，因此最好在此之前保存一份副本。

使用 Kutools for Excel 將分隔的文字分割到多行

使用 Kutools for Excel 的「拆分到多行」功能可以顯著簡化將分隔文字分割成多行的過程。只需幾次點擊，您可以將由特定分隔符（如逗號、分號或空格）分隔的文字分割成單獨的行。

Kutools for Excel 提供超過 300 種進階功能，簡化複雜任務，提升創造力與效率。 結合 AI 能力，Kutools 能夠精準自動化任務，讓數據管理變得輕而易舉。Kutools for Excel 的詳細資訊...免費試用...

安裝 Kutools for Excel 後，請按照以下步驟操作：

1. 點擊「Kutools」>「合併與分割」>「拆分到多行」，見截圖：
find and click Split Data to Rows feature

2. 在「拆分到多行」對話框中，指定以下操作：

從「區域（單列）」文本框中選擇要分割的列數據；
然後，選擇用於分隔數據的分隔符，這裡我選擇「其他」並在文本框中輸入逗號和空格（, ）；
最後，點擊確定按鈕。

現在，分隔的文字已經根據特定的分隔符轉換為多行，見截圖：
get the result by kutools

使用 Power Query 將分隔的文字分割到多行

如果您使用的是 Excel 2013 或更高版本，Power Query 將是解決此問題的一個很好的選擇。

1. 選擇數據範圍，然後點擊「數據」>「從表格/範圍」。
click Data > From Table/Range

2. 在彈出的「創建表格」對話框中，根據需要勾選「我的表格有標題」，然後點擊確定。
check My table has headers

接著會顯示「Power Query 編輯器」窗口，並且數據已經顯示在其中。
the data is shown in the Power Query Editor window

3. 點擊您想要將分隔文字分割成多行的列，然後點擊「轉換」選項卡 > 「分割列」>「按分隔符」。
click Transform tab > Split Column > By Delimiter

或者，您也可以選擇該列並右鍵點擊列標題，在上下文菜單中選擇此功能。
right-click on the column header to choose By Delimiter

4. 在「按分隔符分割列」窗口中，從「選擇或輸入分隔符」部分選擇所需的分隔符，然後選擇「每次出現分隔符」選項，然後展開「高級選項」部分並選擇「行」選項。點擊確定。
specify options in the dialog box

現在，分隔的文字已經被分割成多行。
the delimited texts have been split into rows

5. 然後關閉窗口，會彈出一個對話框，點擊保留按鈕。
click Keep button in the dialog box

然後會創建一個帶有表格的新工作表。
a new sheet will be created with the table

通過使用這些方法之一，您可以有效地將分隔的文字分割成多行，使您的 Excel 數據更易於管理和操作。如果您對探索更多 Excel 技巧感興趣，我們的網站提供了數千個教程。

其他操作（文章）

如何根據群組交替行顏色？
在 Excel 中，對大多數人來說，每隔一行進行上色可能比較容易，但您是否嘗試過根據某一列值的變化來交替行顏色——如下圖所示的 A 列？本文將介紹如何在 Excel 中根據群組交替行顏色。

如何減少 Excel 文件大小？
有時候，如果 Excel 文件太大，打開或保存可能需要花費數分鐘。為了解決這個問題，本教程將告訴您如何通過刪除不必要的內容或格式來減少 Excel 文件大小。

Excel：如何創建或插入書籤
您是否曾經想像過在工作表或工作簿中有大量數據的情況下，創建或插入一個書籤以便快速跳轉到特定的數據範圍？

如何在 Excel 中對奇數或偶數（交替）行/列應用陰影？
在設計工作表時，許多人傾向於對奇數或偶數（交替）行或列應用陰影，以使工作表更具視覺效果。本文將向您展示兩種在 Excel 中對奇數或偶數行/列應用陰影的方法。

更多文章

最佳 Office 生產力工具

🤖	Kutools AI 助手：以智能執行為基礎，革新數據分析｜生成程式碼｜創建自訂公式｜分析數據並生成圖表｜調用 Kutools 增強函數…
	熱門功能：查找、選取項目的背景色或標記重複值｜刪除空行｜合併列或單元格且不遺失數據｜四捨五入（免公式）...
	高級 LOOKUP：多條件 VLookup｜多值 VLookup｜多表查找｜模糊查找...
	高級下拉列表：快速創建下拉列表｜依賴型下拉列表｜多選下拉列表...
	列管理器：添加指定數量的列｜移動列｜切換隱藏列的顯示狀態｜比較區域及列...
	精選功能：網格聚焦｜設計檢視｜增強編輯欄｜工作簿及工作表管理器｜資源庫（快捷文本）｜日期提取器｜合併資料｜加密/解密儲存格｜按列表發送電子郵件｜超級篩選｜特殊篩選（篩選粗體/傾斜/刪除線...）...
	15 大工具集：12 項文本工具（添加文本、刪除特定字符…）｜50+ 儀表類型（甘特圖等）｜40+ 實用公式（基於生日計算年齡等）｜19 項插入工具（插入QR码、根據路徑插入圖片等）｜12 項轉換工具（金額轉大寫、匯率轉換等）｜7 項合併與分割工具（高級合併行、分割儲存格等）｜...及更多