大文字でテキストを個別の列に分割するには？

例えば、次のスクリーンショットに示すように、セルの内容を大文字で区切って個別の列に分割したいデータ範囲があるとします。この問題をExcelで解決するための良いアイデアはありますか？

数式を使用して大文字でテキストを個別の列に分割する

VBAコードを使用して大文字でテキストを個別の列に分割する

Kutools for Excelを使用して大文字でテキストを個別の列に分割する

数式を使用して大文字でテキストを個別の列に分割する

セル内に2つの単語しかない場合、次の数式がこの作業を完了するのに役立ちます。以下の手順を行ってください：

1. 配列数式 =LEFT(A2,SMALL(FIND(CHAR(ROW(INDIRECT("65:90"))),A2&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"),2)-1) （A2は大文字で分割したいセル）をデータの隣にある空白セルに入力し、最初の単語を得るためにCtrl + Shift + Enterキーを同時に押します。スクリーンショットをご覧ください：

2. 次にC2を選択し、この数式を適用したいセルまでフィルハンドルをドラッグすると、範囲内のすべての最初の単語が一度に抽出されます。スクリーンショットをご覧ください：

3. 別の数式 =REPLACE(A2,1,LEN(C2),"") （A2は分割したいセル、C2は返された最初の単語が含まれるセル）をD2セルに入力し、Enterキーを押して2番目の単語を得ます。スクリーンショットをご覧ください：

4. D2セルを選択し、2番目の単語を得るためにセルまでフィルハンドルをドラッグすると、範囲内のセルの内容が大文字で2つの列に分割されます。スクリーンショットをご覧ください：

Kutools AIでExcelの魔法を解き放つ

• スマート実行: セル操作、データ分析、グラフ作成を簡単なコマンドで行います。
• カスタム数式: ワークフローを合理化するための独自の数式を生成します。
• VBAコーディング: 簡単にVBAコードを作成し実装します。
• 数式の解釈: 複雑な数式を簡単に理解できます。
• テキスト翻訳: スプレッドシート内の言語障壁を取り除きます。

AI搭載ツールでExcelの機能を強化しましょう。今すぐダウンロードして、かつてないほどの効率を体験してください！

VBAコードを使用して大文字でテキストを個別の列に分割する

上記の数式は、2つの単語しか含まないセル値にのみ適用されます。もし複数の単語を含むセルを分割する必要がある場合は、大文字の前にスペースを追加し、その後「テキストを列に分割」機能を使用してスペースでセルの内容を個別の列に分割できます。

まず、VBAコードを使用して大文字の前にスペースを追加して単語を分離します。

1. ALT + F11キーを押してMicrosoft Visual Basic for Applicationsウィンドウを開きます。

2. 「挿入」>「モジュール」をクリックし、 モジュールウィンドウに次のコードを貼り付けます。

VBAコード：セル内の各大文字の前にスペースを挿入する

Function SplitWords(ByVal Str As String) As String
'updateby Extendoffice 20151128
    Dim I As Integer
    SplitWords = Left(Str, 1)
    For I = 2 To Len(Trim(Str))
        If (Asc(Mid(Str, I, 1)) > 64) And _
           (Asc(Mid(Str, I, 1)) < 91) And _
           (Mid(Str, I - 1, 1) <> " ") Then _
            SplitWords = SplitWords & " "
        SplitWords = SplitWords & Mid(Str, I, 1)
    Next
End Function

3. このコードを保存して閉じ、ワークシートに戻ります。この数式 =splitwords(A2) をデータの隣にある空白セルに入力してください。スクリーンショットをご覧ください：

4. そして、この数式を適用したいセルまでフィルハンドルをドラッグすると、各大文字の前にスペースが挿入され、セルの内容が分離されます。スクリーンショットをご覧ください：

5. そして、これらの数式セルをコピーして別の場所または元の範囲に値として貼り付けて、数式を削除する必要があります。

次に、「テキストを列に分割」機能を使用して、スペースでセルの内容を個別の列に分割します。

6. スペースを挿入したセル値を選択し、「データ」>「テキストを列に分割」をクリックします。「テキストを列に変換するウィザード」のステップ1で「区切り文字」オプションを選択します。スクリーンショットをご覧ください：

7. 次に「次へ」ボタンをクリックし、ウィザードのステップ2で「区切り文字」セクションの「スペース」オプションをチェックします。スクリーンショットをご覧ください：

8続けてクリック 次へ ボタンを押し、ウィザードのステップ3で 一般 オプションを選択し、 列のデータ形式そして、分割された値を配置したいセルを選択するために ボタンをクリックします。スクリーンショットをご覧ください：

9. 最後に「完了」ボタンをクリックすると、セルの内容が次のスクリーンショットに示すように複数の列に分割されます：

Kutools for Excelを使用して大文字でテキストを個別の列に分割する

Kutools for Excelを持っている場合、その「テキストの追加」と「セルの分割」機能を組み合わせることで、このタスクを簡単に快適に処理できます。以下の手順を行ってください：

1. 分割したい元のデータを選択します。

2. 次に「Kutools」>「テキスト」>「テキストの追加」をクリックします。スクリーンショットをご覧ください：

3. 「テキストの追加」ダイアログボックスで、スペースバーを1回または必要な他の区切り文字を「テキスト」ボックスに入力し、「高度」セクションから「1文字目が大文字」を選択します。スクリーンショットをご覧ください：

4. 次に「OK」ボタンをクリックすると、各大文字の前にスペースが追加されます。スクリーンショットをご覧ください：

5. そして、Kutools for Excelの「セルの分割」ユーティリティを使用して、スペースでセルの値を分割することができます。データ範囲を選択したまま「Kutools」>「結合と分割」>「セルの分割」をクリックします。スクリーンショットをご覧ください：

6. 「セルの分割」ダイアログボックスで、「タイプ」セクションの「データの分割」を選択し、ステップ3で追加した「スペース」や他の区切り文字をチェックします。スクリーンショットをご覧ください：

7. 次に「OK」をクリックすると、分割されたデータを配置するセルを選択するよう促すポップアップボックスが表示されます。スクリーンショットをご覧ください：

8. 最後に「OK」ボタンをクリックすると、必要な結果が得られます。スクリーンショットをご覧ください：

今すぐKutools for Excelをダウンロードして無料でお試しください！