Excelで複数の空白行または空行を迅速に削除するための4つの簡単な方法

Excelで複数の空白行または空行を削除することは、データの分析、レポート作成、またはプレゼンテーション前のデータクリーニングにおいて重要です。空白行はデータの整合性を損ない、計算を複雑にし、洞察を不明瞭にする可能性があります。このガイドでは、これらの空白スペースを効率的に排除し、データを連続的で管理しやすくするための4つの簡単な方法を紹介します。

• 「ジャンプ機能」コマンドを使用して空白行を削除（4ステップ）
• Kutoolsを使用して範囲/シート/ワークブック内の空白行を簡単に削除（1ステップ）
• VBAコードを使用して空白行を削除（4ステップ）
• ヘルパーカラムとフィルター機能を使用して空白行を削除（7ステップ）
• サンプルファイルをダウンロード

以下の手順に従って、「ジャンプ機能」を利用して空白行を削除してください：

1. 空白行を削除したい範囲を選択し、「ホーム」タブをクリックします。次に「編集」グループで「検索と選択」 > 「ジャンプ機能」をクリックします。

2. 「ジャンプ機能」ダイアログで、「空白セル」オプションをチェックします。

3. 「OK」をクリックすると、選択範囲内のすべての空白セルが選択されます。

4. 「ホーム」タブをクリックし、「セル」グループで「削除」 > 「シートの行を削除」をクリックします。

これで、空白セルのある行が削除されました。

選択範囲、アクティブなシート、選択したシート、または全体のワークブックからすべての空白行を素早くかつエラーなく削除する必要がある場合は、「Kutools for Excel」の「空白行を削除」ツールの使用を検討してください。このツールはタスクを簡素化し、より複雑な方法を使わずに、ワンクリックで空白行を削除できます。

「Kutools」 > 「削除」 > 「空白行を削除」をクリックし、サブドロップダウンリストから必要な操作を選択します。

1. 「Alt」 + 「F11」キーを押して「Microsoft Visual Basic for Applications」ウィンドウを有効にします。

2. 「挿入」 > 「モジュール」をクリックして新しい「モジュール」スクリプトを作成し、以下のコードをコピーしてスクリプトに貼り付けます。

VBA: 空白行を削除

Sub DeleteBlankRows()
'Update 20190107
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xRows = WorkRng.Rows.Count
Application.ScreenUpdating = False
For I = xRows To 1 Step -1
    If Application.WorksheetFunction.CountA(WorkRng.Rows(I)) = 0 Then
        WorkRng.Rows(I).EntireRow.Delete XlDeleteShiftDirection.xlShiftUp
    End If
Next
Application.ScreenUpdating = True
End Sub

3. 「F5」キーを押してコードを実行し、ポップアップする「KutoolsforExcel」ダイアログで空白行を削除したい範囲を選択します。

4. 「OK」をクリックします。これで選択範囲内の空白行が削除されました。

1. データ範囲の前に1列挿入します（例として列Aを挿入）。次に、行3のデータを結合する以下の数式をA3に入力します。スクリーンショットをご覧ください：

=B3&C3&D3

ヒント: データが列B3から列Nにまたがる場合、数式を=B3&C3&D3&E3&…&N3に調整してください。

2. 次に、オートフィルハンドルをドラッグして数式を他のセルに埋め込みます。

3. 次に「データ」 > 「フィルター」をクリックします。

4. 次に、ヘルパーカラムの「フィルターアイコン」をクリックし、ドロップダウンリストで「空白」オプションのみをチェックします。スクリーンショットをご覧ください：

5. 「OK」をクリックすると、すべての空白行がフィルタリングされます。

6. フィルタリングされた行を選択し、「ホーム」 > 「削除」 > 「シートの行を削除」をクリックして空白行を削除します。

7. 再び「データ」 > 「フィルター」をクリックして「フィルター」機能を無効にします。

サンプルファイルをダウンロードするにはクリック