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キーを押してコードをアクティブにすると、ヘッダーを除いた区切り文字で区切られたテキストを含む列を選択するダイアログが表示されます。OKをクリックしてください。

5. 次に、使用している区切り文字を入力するための2番目のダイアログが表示されます。ここではカンマ（,）を指定します。OKをクリックしてください。

これで、区切り文字で区切られたテキストが行に分割され、関連する他の列が繰り返されました。

  VBAは元のデータを変更するため、事前にコピーを保存することをお勧めします。

Kutools for Excelの「複数行に分割する」機能を使用することで、区切り文字で区切られたテキストを複数行に分割するプロセスを大幅に簡素化できます。数回のクリックだけで、カンマ、セミコロン、またはスペースなどで区切られたテキストを個別の行に分割できます。

Kutools for Excelをインストールした後、次の手順を実行してください：

1. 「Kutools」>「結合と分割」>「複数行に分割する」をクリックします。スクリーンショットをご覧ください：

2. 「複数行に分割する」ダイアログボックスで、次の操作を指定します：

1. 「範囲（単一列）」テキストボックスから分割したい列データを選択します；
2. 次に、データを区切る区切り文字を選択します。ここでは、「その他」を選択し、カンマとスペース（, ）をテキストボックスに入力します；
3. 最後に、OKボタンをクリックします。
   

これで、特定の区切り文字に基づいて区切り文字で区切られたテキストが複数行に変換されました。スクリーンショットをご覧ください：

Excel 2013以降のバージョンを使用している場合、Power Queryはこの作業を解決するための優れた選択肢です。

1. データ範囲を選択し、「データ」>「テーブル/範囲から」をクリックします。

2. 表示される「テーブルの作成」ダイアログで、「テーブルにヘッダーがある」を必要に応じてチェックし、OKをクリックします。

次に、「Power Queryエディター」ウィンドウが表示され、データがそこに表示されます。

3. 区切り文字で区切られたテキストを行に分割したい列をクリックし、「変換」タブ>「列の分割」>「区切り文字で」をクリックします。

または、列を選択して列ヘッダーを右クリックし、コンテキストメニューでこの機能を選択することもできます。

4. 「区切り文字で列を分割」ウィンドウで、「区切り文字の選択または入力」セクションから必要な区切り文字を選択し、「区切り文字の各出現箇所」オプションを選択し、「詳細オプション」セクションを展開して「行」オプションを選択します。OKをクリックします。

これで、区切り文字で区切られたテキストが行に分割されました。

5. 次にウィンドウを閉じると、ダイアログが表示されますので、「保持」ボタンをクリックします。

次に、新しいシートがテーブルと共に作成されます。

これらの方法のいずれかを使用することで、区切り文字で区切られたテキストを効率的に行に分割し、Excelデータをより管理しやすく、活用しやすいものにすることができます。さらに多くのExcelのヒントやコツに興味がある場合は、当サイトでは数千ものチュートリアルを提供しています。