Excel で複数のシートで同じ行または同じ範囲を削除するには、どうすればよいですか？

著者Siluvia変更日2025-07-14

Excel ワークブックに複数のワークシートが含まれている場合、すべてのシートで同じ行や特定の範囲を同時に削除したい場面がよくあります。たとえば、標準化されたワークブック内の各ワークシートから集計行、古いデータ、または繰り返しセクションを一括で削除する必要があるかもしれません。各シートで手動で削除操作を行うのは非効率的で、ミスも起こりやすくなります—特に大規模なファイルではその傾向が顕著です。幸いにも、選択したすべてのワークシートで同じ行や範囲を効率的に削除できる実用的なアプローチがあります。本記事では、主に2 つの方法をご紹介し、スムーズかつ正確にタスクを完了できるよう、ガイダンス、ヒント、注意点、トラブルシューティングを提供します。

すべてのシートをグループ化して複数シートで同じ行または範囲を削除する
 VBA コードを使用して複数シートで同じ行または範囲を削除する

すべてのシートをグループ化して複数シートで同じ行または範囲を削除する

ワークシートをグループ化すれば、複数のシートに同時に同じ操作を適用できます。この方法はシンプルで、特にシート構造が同一で、すべてのシートに同じ変更を反映させたい場合に最適です。グループ化中に特定の行や範囲を削除すると、その操作はグループ内のすべてのシートでまったく同じ位置に適用されます。

適用可能なシナリオ：この方法は、次のような場面で最適です。

すべてのワークシートが同じ構造（行数・列数および配置が同一）になっています。
複数のシートで同じ行または同じ範囲を同時に削除したい場合は？

ただし、ご注意ください！シートがグループ化されている間に行った操作は、すべてのグループ化されたワークシートに同時に反映されます。ワークシートの構造が異なる場合、意図しない削除が発生するおそれがあります。

グループ化された複数のシートから同じ行や範囲を削除するには、次の手順に従ってください。

1。右クリックで現在のブック内の任意のシートタブをクリックし、「すべてのシートを選択」します。これにより、すべてのワークシートがグループ化されます。

Excel のシートタブを右クリックしてコンテキストメニューからすべてのシートを選択しているスクリーンショット

ヒント：すべてのシートではなく、特定のシートだけをグループ化したい場合は、Ctrlキーを押しながらグループ化したいシートタブをクリックし、右クリックして「シートのグループ化」を選択してください。

2。すべてのワークシートがグループ化されている状態で、現在のワークシートから削除したい行または範囲を選択します。「削除」ボタンをクリックするか、右クリックして「削除」を選択すると、選択した行または範囲がグループ内のすべてのシートで同じ位置から自動的に削除されます。

注意：元に戻す（Ctrl+Z）操作は、すべてのグループ化されたシートに影響します。この操作は各シートごとに個別に元に戻せませんので、削除前に選択範囲が正しいことを今一度ご確認ください。

3。削除操作が完了したら、必ずワークシートのグループ化を解除してください。右クリックで任意のシートタブを再度選択し、「シートのグループ解除」を選んでください。これにより、今後の編集で誤ってすべてのシートに同時に変更が加わるのを防げます。

行または範囲を削除した後にシートのグループ化を解除しているスクリーンショット

実践的なアドバイス：グループ化する前に、ワークブックのバックアップコピーを必ず保存しておきましょう。削除対象の行に依存する数式がある場合は、事前にその影響をしっかり確認してください。グループ解除後は、Excel のタイトルバーに表示されるファイル名から「[グループ]」が消えていることをご確認ください。

トラブルシューティング：複数のシートで誤った行に操作が適用されてしまった場合は、すぐに元に戻し、再度シートをグループ化して正確に行を選択し直し、操作をやり直してください。編集を続ける前に、必ずグループ化状態を確認しましょう。

VBA コードを使用して複数シートで同じ行または範囲を削除する

多数のワークシートで同じ行や特定の範囲を削除する必要がある場合、特に複雑なシナリオや大量のシートを扱う際には、VBA（Visual Basic for Applications）が迅速かつ柔軟な対応を可能にします。VBA を使えば、カスタマイズや一括処理が簡単に行え、より高度な条件に基づく削除や、非連続する行／範囲の削除にもしっかり対応できます。

適用可能なシナリオ：次のようなケースには、ぜひこの方法をご活用ください。

多数のシートで同じ行や範囲を削除する必要がある場合、またはこのような作業を頻繁に繰り返す必要がある場合。
削除条件が、可変範囲やユーザー入力など、より複雑なロジックを含む場合。
ワークシートの構造が異なっていたり複雑であったりするため、簡単にグループ化できない場合。

留意事項：VBA コードを実行すると、データが直接変更されます。必ず事前にワークブックのバックアップを取っておいてください。また、Excel の設定でマクロが有効になっていることもご確認ください。

複数シートで同じ行を削除する

1。同時押しでAlt＋F11を押して、Microsoft Visual Basic for Applications（VBA）エディターを開きます。

2。VBA エディターで、「挿入」＞「モジュール」をクリックして新しいモジュールを作成し、以下の VBA コードをモジュールのコードウィンドウにコピー＆ペーストしてください。

Sub bleh()
    Dim xWs As Worksheet
    Set xWs = ActiveSheet
    ThisWorkbook.Worksheets.Select
    Rows("4:5").Select
    Selection.Delete
    xWs.Select
End Sub

注：VBA コード中の4:5は、現在のブックのすべてのワークシートで行4 と行5 が削除されることを意味します。他の行を削除したい場合は、これらの値を目的の範囲に応じて変更してください。たとえば、行2 のみを削除したい場合は、4:5を2:2に置き換えてください。

3。F5キーを押してコードを実行すると、指定された行がワークブック内のすべてのシートから即座に削除されます。

ヒントと注意点：エラーが発生する場合（たとえば、行数が少ないシートで存在しない行を削除しようとしたときなど）は、すべてのシートに行が十分にあるかご確認ください。このコードは表示中のシートに対して処理を行います。非表示または保護されたシートは、適切に処理されていないとエラーの原因となる可能性があります。

トラブルシューティング：何も起こらない場合や一部の行が期待通りに削除されない場合は、正しいモジュールが選択されていること、コードに構文エラーがないこと、およびシートが保護されていないことをご確認ください。

複数シートで同じ範囲を削除する

すべてのワークシートで同じセル範囲（例：B2:D10 のようなデータブロック）を削除（クリア）したい場合は、以下の VBA コードをご利用いただけます。この方法は、特定の領域からデータのみを削除したいが、行全体を削除したくない場合に特に便利です。

Private Sub CommandButton2_Click()
    Dim xRg As Range
    Dim xTxt As String
    Dim xWs As Worksheet
    On Error Resume Next
    Set xWs = ActiveSheet
    If ActiveWindow.RangeSelection.Count > 1 Then
      xTxt = ActiveWindow.RangeSelection.AddressLocal
    Else
      xTxt = ActiveSheet.UsedRange.AddressLocal
    End If
    Set xRg = Application.InputBox("Please select the range you want to delete across multiple sheets:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xRg.ClearContents
    ThisWorkbook.Worksheets.Select
    ActiveWindow.SelectedSheets.FillAcrossSheets xRg, xlFillWithContents
    xWs.Select
End Sub

VBA コードをモジュールにコピー＆ペーストした後、F5キーを押してマクロを実行します。「Kutools for Excel」とラベルされたポップアップウィンドウが表示されたら、すべてのシートで削除したい範囲を選択し、「OK」をクリックしてください。

Kutools のダイアログボックスで複数のシートにわたって削除する範囲を選択しているスクリーンショット

選択を確定すると、制限された範囲内の値が現在のブックに含まれるすべてのワークシートからクリアされます。

実用的な提案：この方法は、複数のシートで同じセル範囲の値を一括してクリアしたい場合に最適です。「削除」とはここではセルの内容を消去することを指し、セルを上または左にシフトさせるような操作は一切行いません。ワークシートの構造を変更する操作（例：行全体や列の削除）は、VBA コードで明示的に指示しない限り実行されません。

注意事項：マクロを実行する前に、必ずファイルを保存してデータを保護してください。選択されたシートが保護されている場合や非表示になっている場合は、VBA がエラーを返すか、そのシートをスキップすることがあります。

トラブルシューティング：ダイアログボックスが表示されない場合は、マクロが有効になっていて、コード全体が正しく貼り付けられていることをご確認ください。誤った範囲を削除してしまった場合は、正しい選択範囲でマクロを再度実行してください。

まとめと提案：ワークシートのグループ化と VBA のどちらの方法も、複数シートにわたる効率的な削除を実現します。どちらを選ぶかは、ワークブックの構造やこうした作業の頻度に基づいて判断してください。定期的に使う場合は、VBA プロシージャを保存して素早く呼び出せるようにしましょう。さらに、特定のシートや範囲を対象にするようコードをカスタマイズするのもおすすめです。

その他の代替方法

検索と置換を使った手動での繰り返し操作：シートが数枚しかない場合は、各シートに切り替えて対象の行や範囲を選択し、手動で削除できます。大量のシートでは時間がかかりますが、この方法なら意図しないワークシート全体への変更を回避できます。
Excel 数式を使った方法（間接参照法）：複雑なケースでは、INDIRECT 関数やMATCH 関数、IF 関数などを活用した数式とヘルパー列で削除対象の行にフラグを付け、フィルターをかけて手動で削除することも可能です。この手法は複数シートにまたがる直接的な削除には向きませんが、手動削除前に視覚的に確認するのに役立ちます。

最高の 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％も向上させ、毎日数百回ものマウスクリックを削減します！