メインコンテンツへスキップ

Kutools for Office — 1つのスイート、5つのツールで、もっと多くのことを成し遂げましょう。

Excelで他の列ごとに空白列を挿入する – 4つの簡単な方法

Author Xiaoyang Last modified

Excelでデータを扱う際、既存の列間に空白列を挿入する必要がある場合があります。小規模なデータセットでは手動での操作も簡単ですが、大規模なデータセットの場合には効率的なアプローチが不可欠です。この記事では、Excelでこのタスクを解決するための便利な方法をいくつか紹介します。

Excelで他の列またはn列ごとに空白列を挿入する


ショートカットキーで他の列またはn列ごとに空白列を挿入する

小規模なデータセットの場合、キーボードショートカットを使って手動で空白列を挿入するのは迅速で効率的です。以下の手順に従ってください:

  1. 空白列を挿入したい列番号をクリックして列を選択します。
  2. 次に、キーボードのCtrlキーを押しながら、選択したい列番号を一つずつクリックします。スクリーンショットをご覧ください:
    Screenshot showing Ctrl key used to select columns for blank column insertion
  3. その後、「Ctrl + Shift + プラス」キーを押すと、他の列ごとに空白列が挿入されます。スクリーンショットをご覧ください:
    Screenshot showing Ctrl + Shift + Plus keys to insert blank columns
ヒント: 2列ごとに2つの空白列を挿入するには、まず連続する2列を選択し、Ctrlキーを押しながら追加の列ペアを選択し続けます。最後に「Ctrl + Shift + プラス」キーのショートカットを使って空白列を挿入します。3つ以上の空白列を3つ以上の列ごとに挿入する場合も同じ方法が適用されます。

ヘルパー列と並べ替え機能で他の列またはn列ごとに空白列を挿入する

より大きなデータセットで他の列またはn列ごとに空白列を体系的に挿入したい場合、ヘルパー列法と並べ替え機能を組み合わせることで時間を節約できます:

  1. データセットのすぐ上に新しい空白行を挿入します。
  2. その行の最初の2つのセルに数字の1と2を入力します。次に、セルA1とB1を選択し、右側の最後のデータセルまでフィルハンドルをドラッグすると、以下のように増分する数字のリストが埋まります。スクリーンショットをご覧ください:
    Screenshot of filling a list of incrementing numbers in a new row
  3. シーケンス番号をコピーし、同じ行の最後の数字のすぐ右側に貼り付けます。
    Screenshot of sequence numbers copied and pasted for sorting
  4. データ範囲全体を選択し、「データ」>「並べ替え」をクリックします。スクリーンショットをご覧ください:
    Screenshot showing the Sort option clicked in the Data tab
  5. 次の「並べ替え」ダイアログボックスで、「オプション」ボタンをクリックします。
    Screenshot showing the Option button in the Sort dialog
  6. 次に、「左から右へ並べ替え」を選択し、OKをクリックして「並べ替え」ダイアログボックスに戻ります。
    Screenshot showing Sort left-to-right option in the Sort dialog
  7. 「並べ替え対象」ドロップダウンリストから新しく追加した行を選択し、他のオプションはそのままにしておきます。次に、OKをクリックしてダイアログを閉じます。
    Screenshot showing options specified in the Sort dialog box
  8. これで、データはヘルパー行の値に基づいて並べ替えられ、他の列ごとに空白列が挿入されます。
    Screenshot showing blank columns inserted after every other column
  9. 最後に、必要であればヘルパー行を削除できます。
ヒント:
  • 2列ごとに空白列を挿入したい場合、この例では、セルF1に数字の2を入力し、セルG1に数字の4を入力します。次に、これらの2つのセルを選択し、右側にフィルハンドルをドラッグして一連の数字を埋めます。シリーズの最後の数字がデータセット内の最大の数字以上であることを確認してください。
    A series of numbers filled in the first row with the last number greater than the highest number in the original dataset
  • 同様に、3列ごとに空白列を挿入するには、F1に数字の3を入力し、G1に数字の6を入力します。以下同様です…
  • 既存の列間に2つ以上の空白列を挿入したい場合は、ヘルパー行リストを最後のセルの右側に2回以上コピーして貼り付けるだけです。

数回のクリックだけで他の列またはn列ごとに空白列を挿入する

Kutools for Excelは、このタスクを自動化するシンプルで効率的なソリューションを提供します。数回のクリックだけで特定の間隔で空白列を迅速に挿入でき、時間の節約と生産性の向上につながります。このセクションでは、Kutools for Excelを使用して簡単に空白列を挿入する方法をご紹介します。

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

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

  1. 空白列を挿入したいデータ範囲を選択します。
  2. 「挿入タイプ」セクションから「空白列」を選択します。
  3. 次に、必要に応じて「間隔」と「列」テキストボックスに数字を指定します。(ここでは、1列ごとに2つの空白列を挿入するので、「間隔」と「列」のボックスにそれぞれ1と2を入力します。)
  4. 最後に、OKをクリックしてダイアログを閉じます。
    Screenshot of Kutools for Excel Insert Blank Rows & Columns dialog

Kutoolsは指定された間隔に従って即座に空白列を挿入します。スクリーンショットをご覧ください:
Screenshot of blank columns inserted by Kutools

Kutools for Excel - 必要なツールを300以上搭載し、Excelの機能を大幅に強化します。永久に無料で利用できるAI機能もお楽しみください!今すぐ入手


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

高度なユーザーまたは大規模なデータセットの場合、VBAを使用して空白列の挿入を自動化できます。以下は、他の列またはn列ごとに空白列を挿入するVBAマクロです。

  1. Excelで「ALT + F11」キーを押すと、「Microsoft Visual Basic for Applications」ウィンドウが開きます。
  2. 「挿入」>「モジュール」をクリックし、モジュールウィンドウに次のコードを貼り付けます。
    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
    
  3. このコードを貼り付けた後、F5キーを押してコードを実行します。表示されるプロンプトボックスで、空白列を挿入したいデータ範囲を選択します。次に、OKをクリックします。スクリーンショットをご覧ください:
    Screenshot showing VBA code prompt to select data range
  4. 別のプロンプトボックスが表示されるので、列間隔の数字を入力します。次に、OKをクリックします。スクリーンショットをご覧ください:
    Screenshot showing VBA code prompt to specify column interval
  5. 次のプロンプトボックスで、挿入したい空白列の数を入力します。次に、OKをクリックします。スクリーンショットをご覧ください:
    Screenshot showing VBA code prompt to specify number of blank columns to insert

これで、指定した間隔で特定の数の空白列が既存のデータに挿入されました。スクリーンショットをご覧ください:
Screenshot showing blank columns inserted by VBA at specified intervals

まとめると、Excelで他の列または特定の間隔で空白列を挿入することは、ニーズやデータセットのサイズに応じてさまざまな方法で実現できます。ワークフローに最適な方法を選択することで、大幅に効率を向上させ、Excelタスクを合理化できます。さらに多くのExcelのヒントやコツに興味がある場合、当社のウェブサイトでは数千ものチュートリアルを提供しています

最高のオフィス業務効率化ツール

🤖 Kutools AI Aide:データ分析を革新します。主な機能:Intelligent Executionコード生成カスタム数式の作成データの分析とグラフの生成Kutools Functionsの呼び出し……
人気の機能重複の検索・ハイライト・重複をマーキング空白行を削除データを失わずに列またはセルを統合丸める……
スーパーLOOKUP複数条件でのVLookup複数値でのVLookup複数シートの検索ファジーマッチ……
高度なドロップダウンリストドロップダウンリストを素早く作成連動ドロップダウンリスト複数選択ドロップダウンリスト……
列マネージャー指定した数の列を追加列の移動非表示列の表示/非表示の切替範囲&列の比較……
注目の機能グリッドフォーカスデザインビュー強化された数式バーワークブック&ワークシートの管理オートテキスト ライブラリ日付ピッカーデータの統合セルの暗号化/復号化リストで電子メールを送信スーパーフィルター特殊フィルタ(太字/斜体/取り消し線などをフィルター)……
トップ15ツールセット12 種類テキストツールテキストの追加特定の文字を削除など)50種類以上のグラフガントチャートなど)40種類以上の便利な数式誕生日に基づいて年齢を計算するなど)19 種類の挿入ツールQRコードの挿入パスから画像の挿入など)12 種類の変換ツール単語に変換する通貨変換など)7種の統合&分割ツール高度な行のマージセルの分割など)… その他多数
Kutoolsはお好みの言語で利用可能 ― 英語、スペイン語、ドイツ語、フランス語、中国語、その他40以上の言語に対応!

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