Excel で交互の列ごとに空白列を挿入 – 4 の簡単な方法

著者Xiaoyang変更日2025-10-09

Excel でデータを管理・分析していると、他の列ごと、または特定の一定間隔で空白列を挿入する必要が生じることがよくあります。これはワークシートの可読性を高めたり、インポート／エクスポート用にデータを整えたり、追加の計算やコメント欄のスペースを確保したりするのに役立ちます。データ量が少なければ手動で空白列を挿入するのも現実的ですが、大規模なスプレッドシートでは時間がかかり、ミスも起こりやすくなります。こうした状況では、効率的なワークフローを維持するために、効果的でスケーラブルな解決策を見つけることが重要です。本記事では、Excel でこの作業を行うための実用的な方法をいくつか紹介・解説します。ユーザーの好みやデータの規模に応じて、最適な方法をお選びいただけます。

Excel で交互または N 列ごとに空白列を挿入

ショートカットキーを使用して
補助列と並べ替え機能を使用して
Kutools for Excel を使用して
VBA コードを使用して

ショートカットキーで交互または N 列ごとに空白列を挿入

小規模なデータテーブルや素早い調整が必要な場合は、キーボードショートカットを使って手動で空白列を挿入するのがシンプルで効果的です。この方法は、列数が限られており、必要な列を直接選択できる場合に最適です。以下の手順に従って、一定間隔で空白列を挿入してください：

空白列を挿入したい位置の右隣にある最初の列を、ヘッダー領域の列見出しをクリックして選択してください。
次に、キーボードのCtrlキーを押しながら、空白列を挿入したいすべての列のヘッダーをクリックしてください。スクリーンショットを参照ください：
対象のすべての列を選択した後、Ctrl + Shift + プラス(+)キーを同時に押してください。Excel は選択した各列の左側に即座に空白の列を挿入し、既存のデータの間にすばやくスペースを作成できます。スクリーンショットを参照してください：

ヒント：2 列ごとに2 つの空白の列を挿入するには、まず連続する2 列を選択し、Ctrlキーを押しながら同様の方法で他の列ペアも続けて選択します。その後、Ctrl + Shift + プラス記号を使用して一括で空白の列を挿入します。この方法は、列グループの後に3 つ以上の空白の列を挿入したい場合にも適用可能です。その際は、選択パターンを適宜調整してください。

このショートカットキーを使った方法は、中規模のデータで素早く作業したい場合に非常に効果的です。ただし、大規模なデータセットでは、多数の列を手動で選択するのは非効率でミスも起こりやすいため、以下の自動化オプションのいずれかをご検討ください。

補助列と並べ替え機能で交互または N 列ごとに空白列を挿入

大規模または構造化されたデータセットには、補助行とExcel の並べ替え機能を組み合わせた論理的なアプローチが有効です。カスタムの番号付けシステムに基づいてデータを並べ替えることで、指定した間隔で空白行を自動的に挿入するプロセスを実現できます。この方法は非常に柔軟性が高く、アドインや高度な技術スキルを必要としないため、標準的なExcel 機能を使うほとんどのユーザーに最適です。

データセットの直上に新しい空白行を挿入します。この行は一時的に「補助」行として活用します。
補助行の最初の2 つのセル（例：A1 および B1）に、1と2を入力します。両方のセルをハイライトして選択範囲の右下隅にあるフィルハンドルをドラッグし、データの最終セルまで伸ばしてください。これにより、以下のような連続した数値列が自動的に生成されます：
生成された連続番号を選び、コピーしてから、同じ行にある末尾の数値の直後にペーストしてください。このペーストした部分が、新しい空白列のプレースホルダーとなります。
補助行を含むデータ全体の範囲を選択します。次に、Excel リボンのデータタブをクリックし、続いて並べ替えオプションを選択してください。スクリーンショットを参照してください：
表示されるダイアログボックスで、オプションボタンをクリックすると、並べ替え設定をさらに詳細に調整できます。
左から右へ並べ替えオプションを選択すると、列ではなく行単位で並べ替えられるようになります。その後、OKをクリックして、メインの並べ替えダイアログに戻ります。
並べ替えの基準ドロップダウンメニューから、先ほど作成した補助行（例：「行1」）を選択し、他の並べ替え設定はそのままでOKをクリックします。
データセットは補助行の値に基づいて並べ替えられ、指定通りに空白列が元のデータと交互に配置されます。
最後に、補助行が不要になったら削除してください。

ヒント：

2 列ごとに空白列を挿入するには、F1 セルに2を、G1 セルに（例として）4を入力します。この2 つのセルを選択し、フィルハンドルを使って右方向に数列を伸ばしてください。最終的な数値がデータ列の数を超えるようにしてください。
3 列ごとに空白列を挿入する場合も、同じ原則が適用されます。このシナリオでは、F1 セルに3、G1 セルに6を入力し、その後も同様に続けてください。
既存の列の間に2 列以上連続した空白列を挿入する必要がある場合は、作成済みの補助用数値リストを、現在の数列の末尾セルの直後に2 回以上コピー＆ペーストするだけで OK です。

この方法は柔軟性に優れており、プログラミング知識がなくても大規模なデータセットに最適です。ただし、補助行を意図した挿入パターンに正確に合わせて作成することが重要です。非常に大きなテーブルでは、並べ替え処理に少し時間がかかる場合があります。

数回のクリックで交互または N 列ごとに空白列を挿入

特に大規模なデータセットを扱う場合や、ワークフローの中で空白の列を頻繁に挿入する必要がある場合、迅速でユーザーフレンドリーなソリューションをお探しであれば、Kutools for Excelが効率的なアプローチを提供します。Kutools には、カスタム間隔で空白の列を自動挿入する専用ツールが搭載されており、作業をよりシンプルかつ確実に進められます。このユーティリティを使えば、「何列ごとに、いくつの空白列を挿入するか」を簡単に設定でき、ミスのリスクや繰り返し作業による無駄な時間を徹底的に削減できます。

Kutools for Excelは300 以上の高度な機能を提供し、複雑な作業を効率化して、創造性と生産性を高めます。AI 機能と統合されたKutools は、正確にタスクを自動化し、データ管理を簡単にします。Kutools for Excel の詳細情報。。。 無料トライアル。。。

Kutools for Excel をダウンロード・インストールしたら、Kutools > 挿入 > 空白の行/列を挿入をクリックして、空白の行/列を挿入ダイアログボックスを開きます。

空白の列を挿入したいデータ範囲を選択します。
空白の列を挿入タイプとして選択してください。
次に、必要に応じて間隔および列数のテキストボックスに数値を入力してください。（ここでは、1 列ごとに2 つの空白列を挿入するため、「間隔」に1、「列数」に2 をそれぞれ指定します。）
OKをクリックして、設定を適用しましょう。

Kutools は指定した間隔に従って、即座に空白の列を挿入します。スクリーンショットをご参照ください。

Kutools for Excel— 300 以上の必須ツールでExcel を強化し、作業をより迅速・簡単に。AI 機能を活用して、スマートなデータ処理と生産性の飛躍的な向上を実現します。今すぐ入手

Kutools のアプローチは、大規模または複雑なワークシート全体で頻繁に構造を操作する必要がある場合に最適です。この方法は人的ミスのリスクを軽減し、手動や数式による従来の手法と比べて処理速度を大幅に向上させます。確認の際には、必ず選択範囲を再確認し、配置に影響を与える可能性のある結合セルや非表示列にご注意ください。

VBA コードで隔列（または n 列ごと）に空白列を挿入する

VBA マクロは、自動化に慣れたユーザー、あるいは非常に大規模かつ繰り返しの多い作業を管理しているユーザーにとって、極めて効率的な解決策です。シンプルなカスタムマクロを使えば、手動操作なしで、空白の列をどこに・いくつ挿入するかを正確に制御できます。以下では、VBA を使って一定間隔で空白の列を挿入するための詳細なガイドをご案内します。

Excel でALT + F11を押すと、Microsoft Visual Basic for Applications（VBA）ウィンドウが開きます。

挿入>標準モジュールの順に選択し、新しく作成されたモジュールに次のコードを貼り付けます：
VBA コード：固定間隔でデータに指定された数の空白の列を挿入

Sub InsertColumnsAtIntervals()
    'Updatedby Extendoffice
    Dim WorkRng As Range
    Dim xInterval As Integer
    Dim xCols As Integer
    Dim xColsCount As Integer
    Dim xNum1 As Integer
    Dim xNum2 As Integer
    Dim xWs As Worksheet
    Dim xTitleId As String
    Dim i As Integer
    xTitleId = "Kutools for Excel"
    Set WorkRng = Application.Selection
    Set WorkRng = Application.InputBox("Select column range:", xTitleId, WorkRng.Address, Type:=8)
    xColsCount = WorkRng.Columns.Count
    xInterval = Application.InputBox("Enter column interval:", xTitleId, 1, Type:=1)
    xCols = Application.InputBox("How many blank columns to insert at each interval?", xTitleId, 1, Type:=1)
    xNum1 = WorkRng.Column + xInterval
    xNum2 = xCols + xInterval
    Set xWs = WorkRng.Parent
    For i = 1 To Int(xColsCount / xInterval)
        xWs.Range(xWs.Cells(WorkRng.Row, xNum1), xWs.Cells(WorkRng.Row, xNum1 + xCols - 1)).EntireColumn.Insert
        xNum1 = xNum1 + xNum2
    Next
    MsgBox "Columns inserted successfully!", vbInformation
End Sub

コードを貼り付けたら、F5キーを押して実行してください。すると、ダイアログボックスが表示され、空白の列を挿入したいデータ範囲の選択を求められます。対象の列を選択して、OKをクリックしましょう。
次に、列の間隔（つまり、何列ごとに空白の列を挿入するか）を尋ねるプロンプトが表示されます。希望する間隔を入力し、OKをクリックしてください。
さらに、各間隔に挿入したい空白の列数を尋ねるプロンプトが表示されます。数値を入力してOKをクリックしてください。

これらの手順を完了すると、マクロが指定した条件に基づき、データセットに自動的に空白の列を追加します。

以上のように、Excel で一定間隔ごとに空白の列を挿入するには、ニーズやデータ量に応じてさまざまな戦略が活用できます。手動操作、ソート補助法、Kutools、VBA——それぞれの手法には独自のメリットがあり、あなたのワークフロー要件や技術的嗜好に最も合うものを選んでください。これらのテクニックを使いこなせば、Excel 作業がぐっと効率化されるだけでなく、ミスや反復作業もしっかり防止できます。さらにExcel データをもっと効率的に扱う方法を知りたい方は、当社ウェブサイトに数千ものチュートリアルをご用意しています。。

最高の Office 業務効率化ツール

🤖	KUTOOLS AI アシスタント：次に基づいてデータ分析を革新します：インテリジェント実行｜コード生成｜カスタム数式作成｜データ分析とチャート生成｜拡張機能呼び出し…
	人気の機能：検索・ハイライト、または重複をマーキング｜空白行を削除する｜データを失うことなく列の結合またはセルを｜数式を使用しない四捨五入...
	スーパー LOOKUP：複数条件 VLookup ｜複数値 VLookup ｜複数シート間 VLookup ｜ファジーマッチ....
	高度なドロップダウンリスト：ドロップダウンリストをすばやく作成｜連動型ドロップダウンリスト｜複数選択可能なドロップダウンリスト....
	列マネージャー：指定した数の列を追加｜列の移動｜非表示列の表示状態を切り替え｜範囲および列の比較...
	注目の機能：グリッドフォーカス｜デザインビュー｜強化された数式バー｜ワークブックとシートマネージャー｜リソースライブラリ（オートテキスト）｜日付ピッカー｜ワークシートの統合｜暗号化／セルの復号化｜リストからメール送信｜スーパーフィルター｜特殊フィルタ（太字のフォントを持つセルをフィルタリング／斜体／取り消し線。。。）。。。
	トップ15 ツールセット：12 テキストツール（テキストの追加、特定の文字を削除、...）｜ 50+チャートタイプ（ガントチャート、...）｜ 40+実用的関数（誕生日に基づいて年齢を計算します、...）｜ 19 挿入ツール（QR コードを挿入、パスから画像を挿入、...）｜ 12 変換ツール（単語に変換する、為替レートの変換、...）｜ 7 結合と分割ツール（高度な行のマージ、セルの分割、...）｜さらに多数

Kutools はお好みの言語でご利用いただけます。英語、スペイン語、ドイツ語、フランス語、中国語、および40+の他の言語をサポートしています！

Kutools for Excel でExcel スキルを強化し、これまでにない効率を体験しましょう。Kutools for Excel は、生産性を高め、時間を大幅に節約できる高度な機能を300 以上提供します。最も必要な機能を今すぐ入手するにはこちらをクリック。。。

Kutools for Excel の詳細はこちら。。。無料ダウンロード。。。

Office Tab は Office にタブインターフェースをもたらし、作業を大幅に簡単にします

Word、Excel、PowerPoint でタブを使った編集と閲覧を有効にします。Publisher、Access、Visio、Project でもご利用いただけます。
複数のドキュメントを、新しいウィンドウではなく、同じウィンドウ内の新しいタブで開いたり作成したりできます。
日々の生産性を50％も向上させ、毎日数百回ものマウスクリックを削減します！

Office Tab の詳細はこちら。。。無料ダウンロード。。。

すべてのKutools アドインが、たった1 つのインストーラーで完結。

Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。

オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン＋Office Tab Pro
インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能（MSI 対応）
連携してさらにパワーアップ— Office アプリ全体で生産性が向上
30 日間のフル機能トライアル— 登録不要、クレジットカード不要
最高のお得感— 個別アドイン購入よりお得

Kutools for Office の詳細はこちら。。。無料ダウンロード。。。