Excelで空白の行を削除するには、これらの手順に手動で従うことができます。
Ctrl Shift Down Arrow
を押して、データを使用して最後の行まですべての行を選択します。Data
タブに移動し、 Filter
をクリックします。これにより、列ヘッダーにフィルタードロップダウンが追加されます。(Blanks)
オプションをチェックします。これにより、その列にデータが記載された行のみが表示されます。Ctrl Home
を押してシートの上部に移動し、 Ctrl Shift Down Arrow
目に見えるすべての行を選択します。Delete Row
を選択します。このアクションは、目に見える行が削除されます。これは、ブランク以外の行です。Data
タブに戻り、 Filter
をクリックしてフィルターを取り外します。すべての空白の行が消えたはずです。Excelで空の行を自動的に検出して削除するには、VBA(アプリケーション用のVisual Basic)マクロを使用できます。これがそれを行う方法です:
Alt F11
を押して、VBAエディターを開きます。Insert
てからModule
をクリックします。<code class="vba">Sub DeleteBlankRows() Dim ws As Worksheet Set ws = ActiveSheet Dim lastRow As Long lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row Dim rng As Range Set rng = ws.Range("A1:A" & lastRow) rng.SpecialCells(xlCellTypeBlanks).EntireRow.Delete End Sub</code>
Alt F8
を押してマクロダイアログボックスを開きます。 DeleteBlankRows
を選択し、 Run
をクリックします。このマクロは、列Aのデータに基づいて完全に空白のすべての行を削除します。特定のデータセットに必要に応じて範囲と列を調整します。
大規模なExcelファイルの場合、すべての空白の行を削除する最も迅速な方法では、VBAを使用します。次の手順に従ってください:
Alt F11
を押します。Insert
てからModule
をクリックします。<code class="vba">Sub QuickDeleteBlankRows() Dim ws As Worksheet Set ws = ActiveSheet Dim lastRow As Long lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row Dim rng As Range Set rng = ws.Range("A1:A" & lastRow) Application.ScreenUpdating = False rng.SpecialCells(xlCellTypeBlanks).EntireRow.Delete Application.ScreenUpdating = True End Sub</code>
Alt F8
を押してマクロダイアログボックスを開きます。 QuickDeleteBlankRows
を選択し、 Run
をクリックします。このマクロは、実行中に画面の更新をオフにすることで速度のために最適化されており、大きなファイルに最適な方法になります。
式を直接使用してExcelの行を削除することはできませんが、フォーミュラを使用して空白の行を識別し、式の結果に基づいて手動で削除することができます。方法は次のとおりです。
<code class="excel">=IF(COUNTA(A2:Z2)=0,"Delete","Keep")</code>
この式では、行のすべてのセル(列AからZまで)が空白であるかどうかを確認します。データ列に一致するように、範囲A2:Z2
を調整します。
Delete
を選択し、最初のセクションで説明した可視行を選択して削除します。フォーミュラを使用して空白の行を識別することは、行を削除する前に精度を確保するのに非常に役立ちますが、実際の削除には手動アクションまたはVBAマクロが必要です。
以上がExcelで空白の行を削除する方法の詳細内容です。詳細については、PHP 中国語 Web サイトの他の関連記事を参照してください。