Excelでセルの値を縦に分割するにはどうすればよいですか?
Excelで作業しているとき、単一行または複数行にある複数の値を垂直リストに変換する必要がある場合があります。これは、データが水平形式で保存されているが、列形式で処理または分析する必要がある場合に特に役立ちます。
このガイドでは、セルの値を縦に変換するための3つの効率的な方法を紹介します:
Excelでセルの値を行に縦に分割する
- 数式を使用 (Excel 365) - 動的および自動変換に最適
- Kutools for Excelを使用 - すべてのExcelバージョンに対応した専用ツールによる簡単かつ迅速な解決策
- VBAコードを使用 - すべてのExcelバージョンでプロセスを自動化するのに理想的
数式(Excel 365)を使用してセルの値を行に縦に分割する
Excel 365をお持ちの場合は、TEXTSPLIT、TEXTJOIN、TRANSPOSE関数を使用して手動操作なしでセルの値を縦に変換できます。
次の数式を空白のセルにコピーして貼り付け、「Enter」キーを押すと、Excelはデータを自動的に複数行に展開します。スクリーンショットをご覧ください:
=TRANSPOSE(TEXTSPLIT(TEXTJOIN(";", TRUE, A1:A4), ";"))
- TEXTJOIN(";", TRUE, A1:A4): セルA1からA4のテキストをセミコロン (;) で区切って1つの文字列に結合します。
- TEXTSPLIT(...): 結合された文字列をセミコロンを区切り文字として再度分割します。
- TRANSPOSE(...): 結果として得られる縦方向の値のリストを行に変換します(または元の配置に応じてその逆も可能)。
✅ 長所:
- ✔ 動的更新: 元のデータが変更された場合、数式は結果を自動的に更新します。
- ✔ 手動操作不要: 反復的な手動分割の必要性を排除します。
- ✔ カスタマイズ可能な区切り文字: セミコロン (;) をカンマやスペースなどの任意の区切り文字に置き換え、データに合わせることができます。
❌ 短所:
- ✘ Excel 365でのみ利用可能で、古いExcelバージョンでは動作しません。
Kutools for Excelを使用してセルの値を行に縦に分割する
Excel 2019以前のバージョンを使用している場合、強力なアドイン「Kutools for Excel」を使用して、データを簡単に変換および管理できる専用ツールを利用できます。その「データを行に分割」機能を使用すると、必要な区切り文字に基づいてセルの値をシームレスに縦に変換できます。
「Kutools for Excel」をインストール後、次のように操作してください:
- 「Kutools」>「統合と分割」>「データを行に分割」をクリックします。スクリーンショットをご覧ください:
- 「データを行に分割」ダイアログボックスで、次の操作を指定します:
- 分割したいセルを選択します;
- 「区切り文字」セクションで、セル内容をどのように分割するかを定義する区切り文字を選択します。ここでは「セミコロン」を選択します。
- 最後に「OK」ボタンをクリックします。
結果: データは縦方向の列に変換されます。
✅ 長所:
- ✔ すべてのExcelバージョンで動作 (2010、2013、2016、2019、2021、365)
- ✔ 複雑な数式やコーディングの必要なし
- ✔ 幅広い区切り文字をサポート
- ✔ Kutoolsはデータ操作用の300以上のツールを提供し、他のタスクにかかる時間を節約します。
❌ 短所:
- ✘ Kutoolsのインストールが必要
VBAコードを使用してセルの値を行に縦に分割する
上級ユーザーにとって、VBAはセルの値を縦に分割するプロセスを自動化する堅牢な解決策を提供します。以下のVBAコードを使用すると、任意のカスタム区切り文字を使用してセルの内容を行に簡単に分割できます。
1. 「ALT」+「F11」キーを押して「Microsoft Visual Basic for Applications」ウィンドウを開きます。
2. 「挿入」>「モジュール」をクリックし、表示される「モジュール」ウィンドウに次のコードを貼り付けます。
VBAコード: 特定の区切り文字を使用してセルの値を行に縦に分割する
Sub splitvertically()
'updatebyExtendoffice
Dim xRg As Range
Dim xOutRg As Range
Dim xCell As Range
Dim xTxt As String
Dim xStr As String
Dim xOutArr As Variant
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Set xOutRg = Application.InputBox("please select output cell:", "Kutools for Excel", , , , , , 8)
If xOutRg Is Nothing Then Exit Sub
For Each xCell In xRg
If xStr = "" Then
xStr = xCell.Value
Else
xStr = xStr & ";" & xCell.Value
End If
Next
xOutArr = VBA.Split(xStr, ";")
xOutRg.Range("A1").Resize(UBound(xOutArr) + 1, 1) = Application.WorksheetFunction.Transpose(xOutArr)
End Sub
3. そして「F5」キーを押してこのコードを実行すると、縦に分割したいセル値を選択するように促すポップアップが表示されます。スクリーンショットをご覧ください:
4. 「OK」ボタンをクリックすると、結果を配置するセルを選択するように促す別のポップアップが表示されます。スクリーンショットをご覧ください:
5. 「OK」ボタンをクリックすると、セルの値が区切り文字によってリストに分割されます。スクリーンショットをご覧ください:
✅ 長所:
- ✔ プロセスを自動化し、時間を節約
- ✔ すべてのExcelバージョンで動作
- ✔ 異なる区切り文字にカスタマイズ可能
❌ 短所:
- ✘ VBAプログラミングに関する基本的な知識が必要
- ✘ 初心者には少し複雑
Excelでセルの値を縦に変換することは、さまざまな方法で達成でき、それぞれ独自の利点があります。これらの方法を理解することで、特定のニーズに最適なアプローチを選択し、Excelでのワークフローを最適化できます。初心者でも上級ユーザーでも、これらのツールやテクニックはデータをより効果的かつ効率的に扱うのに役立ちます。さらに多くのExcelのヒントやコツに関心がある場合、当社のウェブサイトでは数千のチュートリアルを提供しており、Excelをマスターするお手伝いをしています。
最高のオフィス業務効率化ツール
🤖 | Kutools AI Aide:データ分析を革新します。主な機能:Intelligent Execution|コード生成|カスタム数式の作成|データの分析とグラフの生成|Kutools Functionsの呼び出し…… |
人気の機能:重複の検索・ハイライト・重複をマーキング|空白行を削除|データを失わずに列またはセルを統合|丸める…… | |
スーパーLOOKUP:複数条件でのVLookup|複数値でのVLookup|複数シートの検索|ファジーマッチ…… | |
高度なドロップダウンリスト:ドロップダウンリストを素早く作成|連動ドロップダウンリスト|複数選択ドロップダウンリスト…… | |
列マネージャー:指定した数の列を追加 |列の移動 |非表示列の表示/非表示の切替| 範囲&列の比較…… | |
注目の機能:グリッドフォーカス|デザインビュー|強化された数式バー|ワークブック&ワークシートの管理|オートテキスト ライブラリ|日付ピッカー|データの統合 |セルの暗号化/復号化|リストで電子メールを送信|スーパーフィルター|特殊フィルタ(太字/斜体/取り消し線などをフィルター)…… | |
トップ15ツールセット:12 種類のテキストツール(テキストの追加、特定の文字を削除など)|50種類以上のグラフ(ガントチャートなど)|40種類以上の便利な数式(誕生日に基づいて年齢を計算するなど)|19 種類の挿入ツール(QRコードの挿入、パスから画像の挿入など)|12 種類の変換ツール(単語に変換する、通貨変換など)|7種の統合&分割ツール(高度な行のマージ、セルの分割など)|… その他多数 |
Kutools for ExcelでExcelスキルを強化し、これまでにない効率を体感しましょう。 Kutools for Excelは300以上の高度な機能で生産性向上と保存時間を実現します。最も必要な機能はこちらをクリック...
Office TabでOfficeにタブインターフェースを追加し、作業をもっと簡単に
- Word、Excel、PowerPointでタブによる編集・閲覧を実現。
- 新しいウィンドウを開かず、同じウィンドウの新しいタブで複数のドキュメントを開いたり作成できます。
- 生産性が50%向上し、毎日のマウスクリック数を何百回も削減!
全てのKutoolsアドインを一つのインストーラーで
Kutools for Officeスイートは、Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proをまとめて提供。Officeアプリを横断して働くチームに最適です。





- オールインワンスイート — Excel、Word、Outlook、PowerPoint用アドインとOffice Tab Proが含まれます
- 1つのインストーラー・1つのライセンス —— 数分でセットアップ完了(MSI対応)
- 一括管理でより効率的 —— Officeアプリ間で快適な生産性を発揮
- 30日間フル機能お試し —— 登録やクレジットカード不要
- コストパフォーマンス最適 —— 個別購入よりお得