Excelで複数のシートを削除する方法(4つの方法)

  • これを共有
Hugh West

Microsoft Excelでは、さまざまな方法で複数のシートを削除することができます。 コンテキストメニューやExcelリボンからオプションを適用したり、時にはVBAコードを挿入して要件を満たすことができます。 この記事では、適切な例やイラストを使用してExcelで複数のシートを削除するすべての適切な方法を学ぶことができます。

練習用ワークブック

以下のワークブックとエクササイズをダウンロードしてください。

複数シートの削除.xlsx

Excelで複数のシートを削除する4つの簡単な方法

1.リボンオプションでExcelの複数シートを削除する

より リボン オプションを使用すると、複数のシートを削除することができます。

STEPS

  • を長押しして、削除したいシーツを選択します。 シフト キーになります。

  • 今度は ホーム タブを選択し 削除 > シート削除 .

  • ダイアログボックスが表示されます。
  • クリック よっしゃー .

  • すると、選択したシートが削除されていることが確認できます。

2.シートオプションを使用して、Excelで複数のシートを削除する

2.1 隣接ワークシートの場合

隣接する複数のワークシートを削除するためには、以下の手順が必要です。

STEPS

  • を長押しすることで シフト キーを押しながら、削除したい最初のシートと最後のシートをマウスで選択します。

  • 右クリック を選択し、「シート」タブをクリックします。 削除 .

  • 最後に、シートを削除します。

2.2 非隣接ワークシートの場合

また、隣接していないワークシートを削除することも可能です。

STEPS

  • を押して、削除したいセルを選択します。 Ctrl キーになります。

  • 今度は「シート」タブで。 右クリック をマウスで選択し 削除 .

  • ダイアログボックスがポップアップ表示されます。
  • クリック よっしゃー をクリックし、その結果をご覧ください。

3.ハイブリッドキーボードによる複数ワークシートの削除

Excelでキーボードを押して複数のワークシートを削除するのは、最も簡単で早い方法の一つです。 私たちはただシートを選択するだけでよいのです。 右クリック をクリックし、「シート」タブをクリックします。 D キーボードから操作すると、シートが削除されます。

4.複数のExcelシートを削除するVBAコードを挿入する

4.1 アクティブシートを維持したまま全シートを削除する

ブイビーエー は、アクティブシート以外のすべてのシートを削除するのに最適な方法の一つです。

STEPS

  • シートタブから、アクティブなシートを選択します。 右クリック をマウスで選択し 表示コード .

  • 次に、以下のコードをコピーして、VBAモジュールに貼り付けてください。
 Option Explicit Sub deletemultiplesheets() Dim spreadsheet As Worksheet Application.DisplayAlerts = False For Each spreadsheet In Sheets If spreadsheet.Name ActiveSheet.Name Then spreadsheet.Delete End If Next spreadsheet Application.DisplayAlerts = True End Sub 

  • を打つ。 実行 オプションを選択すると、アクティブなシートを除くすべてのシートが削除されることが確認できます。

続きを読む: VBAでExcelシートを削除する方法(VBAマクロ10選)

4.2 特定の文字列を含むシートの削除

特定の文字列を含むシートを簡単に全削除することができるのです。

STEPS

  • シートタブからシートを選択します。
  • 現在 右クリック をマウスで選択し 表示コード .

  • 次に、以下のコードをコピーして、VBAモジュールに貼り付けます。 そして、その上にある 実行 オプションを使用します。
 Option Explicit Sub DeleteSheetWithSameName() Dim spreadsheet As Worksheet Application.DisplayAlerts = False For Each spreadsheet In sheets If spreadsheet.Name Like "*" & "Sales1" & "*" Then MsgBox spreadsheet.Name spreadsheet.Delete End If Next spreadsheet Application.DisplayAlerts = True End Sub 

  • 確認のためのダイアログボックスが表示されますので、以下を選択します。 よっしゃー .

  • 最後に、選択された文字列を含むシートが削除されていることが確認できます。

結論

これらの方法で、Excelの複数のシートを簡単に削除することができます。 練習用のワークブックが追加されています。 どうぞ試してみてください。 何か新しい方法があれば、遠慮なく質問してください。

Hugh West は、業界で 10 年以上の経験を持つ、非常に経験豊富な Excel トレーナー兼アナリストです。彼は会計と財務の学士号と経営管理の修士号を取得しています。ヒューは教えることに情熱を持っており、理解しやすい独自の教育アプローチを開発しました。彼の Excel に関する専門知識は、世界中の何千人もの学生や専門家がスキルを向上させ、キャリアで優れた成果を上げるのに役立ってきました。 Hugh はブログを通じて知識を世界に共有し、個人や企業が潜在能力を最大限に発揮できるよう無料の Excel チュートリアルとオンライン トレーニングを提供しています。