Excelで大文字でテキストを別々の列に分割するにはどうすればよいですか？
次のスクリーンショットに示すように、セルの内容を大文字で別々の列に分割したいデータの範囲があるとすると、Excelでこの問題を解決するための良いアイデアはありますか？
数式を使用して大文字でテキストを別々の列に分割する
セルに単語がXNUMXつしかない場合は、次の数式を使用してこの作業を完了することができます。 次のようにしてください。
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に入力し、を押します。 入力します XNUMX番目の単語を取得するためのキー。スクリーンショットを参照してください。
4。 セルD2を選択し、塗りつぶしハンドルをセルまでドラッグしてXNUMX番目の単語を取得すると、範囲のセルの内容が大文字でXNUMX列に分割されます。スクリーンショットを参照してください。
VBAコードを使用して大文字でテキストを別々の列に分割する
上記の数式は、XNUMXつの単語を含むセル値にのみ適用されます。分割する必要のあるセルに複数の単語がある場合は、大文字の前にスペースを追加してから、テキストを列に適用してセルの内容を分割できます。列をスペースで区切ります。
まず、VBAコードを適用して大文字の前にスペースを追加し、単語を区切ります。
1。 を押し続けます Alt + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。
2に設定します。 OK をクリックします。 インセット > モジュール、次のコードをに貼り付けます モジュール 窓。
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。 次に、をクリックします Next ボタン、ウィザードのステップ2で、チェックします スペース オプションの下に デリミタ セクション、スクリーンショットを参照してください：
8。 クリックしてください Next ボタン、ウィザードのステップ3で、 オプションの下に 列データ形式、次に、をクリックして分割値を配置するセルを選択します 
ボタン、スクリーンショットを参照してください：
9。 最後に、 終了 ボタンをクリックすると、次のスクリーンショットに示すように、セルの内容が複数の列に分割されています。
Kutools for Excelを使用して、テキストを大文字で別々の列に分割する
あなたが持っている場合 Kutools for Excel、その組み合わせ テキストを追加 & 分割セル 機能、このタスクを簡単かつ快適に処理できます。次のようにしてください。
| Kutools for Excel : 300以上の便利なExcelアドインがあり、30日以内に制限なしで無料で試すことができます. |
1。 分割する元のデータを選択します。
2。 次に、をクリックします クツール > テキスト > テキストを追加、スクリーンショットを参照してください：
3。 の中に テキストを追加 ダイアログボックスで、スペースバーまたは必要なその他の区切り文字をXNUMX回入力してください。 テキスト ボックスをクリックし、 最初の文字は大文字です に追加するだけ セクション、スクリーンショットを参照してください：
4. 次に、をクリックします。 Ok ボタン、および各大文字の前にスペースが追加されています。スクリーンショットを参照してください。
5。 そして、あなたは適用することができます 分割セル の有用性 Kutools for Excel セル値をスペースで分割し、データ範囲を選択したままにして、[ クツール > マージ＆スプリット > 分割セル、スクリーンショットを参照してください：
6。 の中に 分割セル ダイアログボックスで 列に分割 下 タイプ セクション、およびチェック スペース または、手順3で追加したその他の区切り文字は、スクリーンショットを参照してください。
7. 次に、をクリックします。 Ok、および分割データを配置するセルを選択するように促すプロンプトボックスが表示されます。スクリーンショットを参照してください。
8。 最後に、 OK ボタンをクリックすると、必要な結果が得られます。スクリーンショットを参照してください。
今すぐExcel用のKutoolsをダウンロードして無料トライアル！
デモ：Kutools for Excelを使用して、テキストを大文字で別々の列に分割します
最高のオフィス生産性向上ツール
| 🤖 | Kutools AI アシスタント: 以下に基づいてデータ分析に革命をもたらします。 インテリジェントな実行 | コードを生成 | カスタム数式の作成 | データを分析してグラフを生成する | Kutools関数を呼び出す... |
| 人気の機能: 重複を検索、強調表示、または識別する | 空白行を削除する | データを失わずに列またはセルを結合する | 数式なしのラウンド ... | |
| スーパールックアップ: 複数の基準の VLookup | 複数の値の VLookup | 複数のシートにわたる VLookup | ファジールックアップ .... | |
| 詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する | 依存関係のドロップダウン リスト | 複数選択のドロップダウンリスト .... | |
| 列マネージャー: 特定の数の列を追加する | 列の移動 | Toggle 非表示列の表示ステータス | 範囲と列の比較 ... | |
| 注目の機能: グリッドフォーカス | デザインビュー | ビッグフォーミュラバー | ワークブックとシートマネージャー | リソースライブラリ (自動テキスト) | 日付ピッカー | ワークシートを組み合わせる | セルの暗号化/復号化 | リストごとにメールを送信する | スーパーフィルター | 特殊フィルター (太字/斜体/取り消し線をフィルター...) ... | |
| 上位 15 のツールセット: 12 テキスト ツール (テキストを追加, 文字を削除する、...） | 50+ チャート 種類 (ガントチャート、...） | 40+ 実用的 式 (誕生日に基づいて年齢を計算する、...） | 19 挿入 ツール (QRコードを挿入, パスから画像を挿入、...） | 12 変換 ツール (数字から言葉へ, 通貨の換算、...） | 7 マージ＆スプリット ツール (高度な結合行, 分割セル、...） | ... もっと |
Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。 最も必要な機能を入手するにはここをクリックしてください...
Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作業をはるかに簡単にします
- Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
- 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
- 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
