Excelで他の行ごとに空白行を挿入する – 4つの方法

Excelでは、空白行の挿入はほとんどのユーザーにとって簡単な作業です。しかし、下のスクリーンショットに示すように、表の各既存の行の間に空白行を挿入する必要がある場合もあります。これにより、可読性が向上し、データが見やすくなります。この記事では、Excelで他の行またはn行ごとに空白行を挿入するためのいくつかの迅速で便利な方法について説明します。

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

• 挿入機能を使用して
• ヘルパーカラムと並べ替え機能を使用して
• Kutools for Excel - 数回のクリックのみで
• VBAコードを使用して

ビデオ: Excelで他の行ごとに空白行を挿入する

挿入機能を使用して他の行ごとに空白行を挿入する

データ量が少ない場合は、Ctrlキーを押しながら各行を選択し、挿入機能を使用して各既存の行の前に空白行を挿入できます。以下にその手順を示します：

ステップ 1: Ctrlキーを押しながら行を1つずつ選択する

1. 行番号をクリックして最初の行を選択します。
2. 次に、キーボードのCtrlキーを押し続けながら、選択したい行番号を1つずつクリックします。
   

ステップ 2: 右クリックメニューから「挿入」オプションを選択する

空白行を挿入したいすべての行を選択したら、選択した行番号のいずれかを右クリックし、コンテキストメニューから「挿入」を選択します。スクリーンショットをご覧ください：

結果：

これで、選択した各行の前に空白行が挿入されます。スクリーンショットをご覧ください：

ヘルパーカラムと並べ替え機能を使用して他の行またはn行ごとに空白行を挿入する

上記の方法はワークシート内の小規模なデータに適しています。ただし、大量のデータを扱っている場合は、ヘルパーカラムを作成し、並べ替え機能を使用して他の行またはn行ごとに空白行を挿入するのが良いでしょう。以下の手順に従って実行してください：

ステップ 1：ヘルパーカラムを作成する

1. データの隣にヘルパーカラムを作成します。例えば、A1:D10の範囲のデータがある場合、セルE1に「Helper column」というテキストを入力します。スクリーンショットをご覧ください：
   
2. 次に、セルE2とE3にそれぞれ1と2を入力します。
3. セルE2とE3を選択し、フィルハンドルを最後のデータセルまでドラッグすると、以下のように増加する数字のリストが埋められます。スクリーンショットをご覧ください：
   
4. 次に、連続した番号をコピーして最後のセルE10の下に貼り付けます。スクリーンショットをご覧ください：
   

ステップ 2：データをヘルパーカラムで並べ替えるために並べ替え機能を適用する

1. ヘルパーカラムのデータを選択し、「データ」＞「並べ替え」をクリックします。スクリーンショットをご覧ください：
   
2. ポップアップする「並べ替えの警告」ダイアログで、「選択範囲を拡張」オプションを選択し、「並べ替え」ボタンをクリックします。スクリーンショットをご覧ください：
   
3. 続く「並べ替え」ダイアログボックスで、「並べ替えの基準」ドロップダウンリストから「Helper column」を選択し、他のオプションは変更せずにOKをクリックしてダイアログを閉じます。スクリーンショットをご覧ください：
   

結果：

これで、データはヘルパーカラムの値に基づいて並べ替えられ、他の行ごとに空白行が挿入されます。

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

時々、データ範囲内に特定の間隔で一定数の空白行を挿入したい場合（例えば、2行以上のデータ行ごとに1つまたは複数の空白行を挿入する）、前の方法は複雑で理解しにくいことがあります。この作業を迅速かつ簡単に解決するために、Kutools for Excelの「空白行と列の挿入」機能を使用すれば、数回のクリックでこの作業を処理できます。

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

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

結果：

これで、2行ごとにデータに単一の空白行が挿入されます。スクリーンショットをご覧ください：

VBAコードを使用して他の行またはn行ごとに空白行を挿入する

VBAコードに興味がある場合、ここでは固定間隔で特定の数の空白行をデータに挿入するためのコードを提供します。以下の手順に従ってください：

ステップ 1：VBAモジュールエディタを開き、コードをコピーする

1. ExcelでALT + F11キーを押すと、「Microsoft Visual Basic for Applications」ウィンドウが開きます。
2. 「挿入」＞「モジュール」をクリックし、モジュールウィンドウに次のコードを貼り付けます。
   VBAコード：固定間隔で特定の数の空白行をデータに挿入する

   Sub InsertRowsAtIntervals()
   'Updateby Extendoffice
   Dim Rng As Range
   Dim xInterval As Integer
   Dim xRows As Integer
   Dim xRowsCount As Integer
   Dim xNum1 As Integer
   Dim xNum2 As Integer
   Dim WorkRng As Range
   Dim xWs As Worksheet
   xTitleId = "KutoolsforExcel"
   Set WorkRng = Application.Selection
   Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
   xRowsCount = WorkRng.Rows.Count
   xInterval = Application.InputBox("Enter row interval. ", xTitleId, 1, Type:=1)
   xRows = Application.InputBox("How many rows to insert at each interval? ", xTitleId, 1, Type:=1)
   xNum1 = WorkRng.Row + xInterval
   xNum2 = xRows + xInterval
   Set xWs = WorkRng.Parent
   For i = 1 To Int(xRowsCount / xInterval)
       xWs.Range(xWs.Cells(xNum1, WorkRng.Column), xWs.Cells(xNum1 + xRows - 1, WorkRng.Column)).Select
       Application.Selection.EntireRow.Insert
       xNum1 = xNum1 + xNum2
   Next
   End Sub

ステップ 2：コードを実行して結果を得る

1. このコードを貼り付けた後、F5キーを押してコードを実行します。プロンプトボックスで、空白行を挿入したいデータ範囲を選択し、OKをクリックします。スクリーンショットをご覧ください：
   
2. 別のプロンプトボックスがポップアップするので、行間隔の数を入力し、OKをクリックします。スクリーンショットをご覧ください：
   
3. 次のプロンプトボックスで、挿入したい空白行の数を入力し、OKをクリックします。スクリーンショットをご覧ください：
   

結果：

これで、指定した間隔で特定の数の空白行が既存のデータに挿入されます。スクリーンショットをご覧ください：

これが、データ範囲内で他の行またはn行ごとに挿入する方法です。さらに多くのExcelのヒントやコツに興味がある場合、当社のウェブサイトでは数千のチュートリアルを提供しています。お読みいただきありがとうございます。今後も役立つ情報を提供できることを楽しみにしています！

関連記事：