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

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

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

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

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

以下是一個可以快速將分隔文字分割到多行的 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 鍵啟動程式碼，會彈出一個對話框讓您選擇不包含標題的列，該列包含需要分割成多行的分隔文字。點擊確定。

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

現在，分隔的文字已經被分割成多行，其他相關的列也已重複。

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

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

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

1. 點擊「Kutools」>「合併與分割」>「拆分到多行」，見截圖：

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

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

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

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

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

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

接著會顯示「Power Query 編輯器」窗口，並且數據已經顯示在其中。

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

或者，您也可以選擇該列並右鍵點擊列標題，在上下文菜單中選擇此功能。

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

現在，分隔的文字已經被分割成多行。

5. 然後關閉窗口，會彈出一個對話框，點擊保留按鈕。

然後會創建一個帶有表格的新工作表。

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