キャリッジリターンに基づいてセルの内容を複数の列または行に分割

Excel を使用していると、改行やキャリッジリターンで区切られた複数の値が1 つのセルに含まれていることがあります。こうしたデータを効果的に分析・操作するには、セル内の内容を複数の列または行に分割するのが最適です。本ガイドでは、その手順をステップ・バイ・ステップでわかりやすく解説します。

セルの分割をキャリッジリターンに基づいて複数の列に分割

• 「テキストを列に分割」機能を使用
• Kutools for Excel を使用
• TEXTSPLIT 関数を使用（Excel 365）

セルの分割をキャリッジリターンに基づいて複数の行に分割

• VBA コードを使用
• Kutools for Excel を使用
• TEXTSPLIT 関数を使用（Excel 365）

セルの分割をキャリッジリターンに基づいて複数の列に分割

以下のスクリーンショットのように、キャリッジリターンで区切られたセルの内容を改行ごとに複数の列に分割したい場合、このセクションではそのための3 つの効果的な方法をご紹介します。

「テキストを列に分割」機能を使用する

Excel の「テキストを列に分割」機能は、セルの内容を複数の列にスマートに分けるのに最適です。

1. 分割したいデータが含まれるセルを選択してください。
2. 「データ」タブに移動し、「テキストを列に分割」をクリックしてください。
   
3. 「テキストを列に分割ウィザード」で「区切り記号付き」を選択し、「次へ」をクリックしてください。
   
4. ステップ2 で、「区切り記号」の下にある「その他」オプションをチェックし、その横のボックスをクリックしてから「Ctrl」＋「J」キーを押して、「次へ」をクリックしてください。スクリーンショットをご参照ください：
   
5. ステップ3 で、結果を表示するセルを指定し、「完了」ボタンをクリックして操作を終了します。
   
6. 現在、すべてのセルの内容が、以下のスクリーンショットのように複数の列に分割されています。
   

Kutools for Excel を使用

Kutools for Excel は、カンマやキャリッジリターンなどの特定の区切り文字に基づいて、セルの内容を複数の列に素早く分割できる使いやすい機能を提供します。直感的なインターフェースと簡単な操作で、データ処理がより効率的かつシームレスに！

1. 分割したいデータの範囲を選択してください。
2. 「Kutools」＞「結合と分割」＞「セルの分割」をクリックしてください（スクリーンショット参照）。
   
3. 「セルの分割」ダイアログボックスで、「タイプ」セクションから必要な「列に分割」オプションを選択し、「指定方法」セクションで「このセルにデータを保存すると、ワークシートの最大行列制限を超えます。適切なセルを選択してデータを保存してください」のチェックボックスをオンにしてください（スクリーンショット参照）。
   
4. 次に「OK」ボタンをクリックすると、結果を出力するセルを選択するよう促すプロンプトボックスが表示されます（スクリーンショット参照）。
   
5. 「OK」をクリックすると、選択したすべてのセルの値がキャリッジリターンに基づいて複数の列に分割されます（スクリーンショット参照）。
   

TEXTSPLIT 関数を使用する（Excel 365）

Excel 365 ユーザー向けに、TEXTSPLIT 関数はセルの内容を動的に分割する方法を提供します。

結果を出力する空白セルに以下の数式を入力し、「Enter」キーを押すと、テキストが自動的に列に分割されます。その後、数式が入ったセルを下方向にドラッグして他のセルにも適用してください（スクリーンショット参照）。

=TEXTSPLIT(A1, CHAR(10))

セルの分割をキャリッジリターンに基づいて複数の行に分割

以下のスクリーンショットのように、キャリッジリターンで区切られた複数行のテキストを含むセルの内容を個別の行に分割する必要がある場合、Excel にはそのための効率的な方法がいくつか用意されています。このセクションでは、あなたのニーズに最適なソリューションを選びやすくするため、これらの手法をステップ・バイ・ステップでわかりやすく解説します。

VBA コードを使用する

VBA は、マクロに慣れたユーザーにとって強力なソリューションを提供します。

1. 「ALT」キーと「F11」キーを同時に押すと、「Microsoft Visual Basic for Applications」のウィンドウが開きます。
2. 「挿入」>「標準モジュール」をクリックし、表示された「標準モジュール」ウィンドウに次のコードを貼り付けます。
   VBA コード：セルの分割をキャリッジリターンに基づいて複数の行に分割

   Sub SplitCells()
   'Update by Extendoffice
   Dim Rng As Range
   Dim WorkRng As Range
   On Error Resume Next
   xTitleId = "KutoolsforExcel"
   Set WorkRng = Application.Selection
   Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
   For Each Rng In WorkRng
       lLFs = VBA.Len(Rng) - VBA.Len(VBA.Replace(Rng, vbLf, ""))
       If lLFs > 0 Then
           Rng.Offset(1, 0).Resize(lLFs).Insert shift:=xlShiftDown
           Rng.Resize(lLFs + 1).Value = Application.WorksheetFunction.Transpose(VBA.Split(Rng, vbLf))
       End If
   Next
   End Sub
   

3. 次に「F5」キーを押してこのコードを実行すると、分割したいデータ範囲を選択するよう促すプロンプトボックスが表示されます（スクリーンショット参照）。
   
4. 「OK」をクリックすると、選択したデータがキャリッジリターンに基づいて複数の行に分割されます。
   

Kutools for Excel を使用

Kutools for Excel を使えば、わずか数ステップで簡単に分割処理を完了できます。以下にその手順を詳しくご案内します。

1. 分割したいデータの範囲を選択してください。
2. 「Kutools」＞「結合と分割」＞「複数行に分割する」をクリックしてください（スクリーンショット参照）。
   
3. 「データを行に分割」ダイアログボックスで、「区切り文字」セクションから「改行」を選びましょう。
   
4. 次に「OK」ボタンをクリックすると、すべてのセルがキャリッジリターンに基づいて複数の行に分割されます。
   

TEXTSPLIT 関数を使用する（Excel 365）

TEXTSPLIT 関数を使えば、セルの内容を動的に行に分割することも可能です。

結果を出力する空白セルに以下の数式を入力し、「Enter」キーを押すと、テキストが自動的に各行に分割されます（スクリーンショット参照）。

=TRIM(TEXTSPLIT(TEXTJOIN(CHAR(10),,A1:A4),,CHAR(10)))

各方法には、Excel のバージョンやユーザーの習熟度に応じたメリットがあります。最適なアプローチを選ぶことで、要件に合わせて簡単にデータを操作できます！さらに多くのExcel のヒントやテクニックを知りたい方は、当社ウェブサイトで数千ものチュートリアルをご覧いただけます。ご一読いただき、誠にありがとうございます。今後も役立つ情報をどんどんお届けしてまいります！

関連記事：