Excel で指定したシート、またはアクティブなシート以外のすべてのワークシートを非表示にする方法は？

著者Siluvia変更日2025-09-11

Excel ワークブックに多くのワークシートが含まれていると、データのナビゲーションや管理が難しくなることがあります。レポートを共有するとき、機密情報を保護したいとき、あるいは単にワークスペースを整理したいときなど、特定の1 つのシート（通常は現在作業中のシート）だけを表示し、他のすべてのワークシートを非表示にしたい場面がよくあります。関連するワークシートのみを表示することで、ワークブックをすっきりと保ち、ユーザーの混乱を最小限に抑え、重要なコンテンツに注目を集めやすくなります。

本記事では、Excel でこのタスクをこなすための実用的な方法を2 つご紹介します。柔軟性を重視されるなら VBA コードを、より簡単な操作をお望みならKutools for Excel をご利用ください。きっとご自身のニーズにぴったりのソリューションが見つかります。

VBA コードでExcel の指定した1 つのワークシート以外をすべて非表示にする
 Kutools for Excel でアクティブなワークシート以外をすべて非表示にする（数回のクリックのみ）

VBA コードでExcel の指定した1 つのワークシート以外をすべて非表示にする

シンプルな自動化に慣れている方にとって、VBA（Visual Basic for Applications）を使えば、指定した1 つのワークシート以外をすべて非表示にすることが柔軟に実現できます。この手法は、プロフェッショナルな環境で複雑なワークブックを管理する際や、配布用のテンプレートを作成する際に特に役立ちます。どのシートを表示するかをきめ細かく制御でき、将来的にはバッチ処理用にマクロを簡単にカスタマイズすることも可能です。ただし、VBA を使用するにはファイルをマクロ有効ブック（*。xlsm）として保存し、ユーザーがマクロを有効にしておく必要があります。

この操作を行うには、以下の手順を慎重にご実行ください。

1。開いているワークブックで、まず表示したいワークシートをアクティブにしてください。これにより、作業中のシートを誤って非表示にしてしまうことを防げます。その後、Alt＋F11キーを同時に押して、Microsoft Visual Basic for Applicationsエディターウィンドウを開きます。

2。Visual Basic for Applicationsウィンドウで、メニューから挿入＞標準モジュールをクリックすると、VBA コードを入力できる新しいモジュールが追加されます。スクリーンショットをご参照ください。

VBA エディターで新しいモジュールを挿入するスクリーンショット

3。次の VBA コードを、モジュールウィンドウの空白の編集領域にコピー＆ペーストしてください。

貼り付けられた VBA コードを含む作成済みモジュールのスクリーンショット

VBA コード：指定した1 つのシート以外をすべて非表示にする

Sub SheetHidden()
	Dim xWs As Worksheet
	Dim xName As String
	xName = Application.InputBox("Range", xTitleId, Application.ActiveSheet.Name, Type: = 2)
	For Each xWs In Application.ActiveWorkbook.Worksheets
		If xWs.Name <> xName Then
			xWs.Visible = xlSheetHidden
		End If
	Next
End Sub

4。コードを貼り付けたら、Excel ウィンドウで目的のワークシートが現在アクティブになっていることを確認してください。F5キーを押してコードを実行するか、VBA ツールバーから実行を選択すると、ダイアログが表示されます。このダイアログには、デフォルトで現在のワークシートの名前が範囲ボックスに表示されます。通常はそのままOKボタンをクリックするだけで問題ありませんが、別のシートを選択したい場合は、このステップで変更できます。

他のシートを非表示にする VBA コード実行後にアクティブシート名を表示するダイアログボックス

5。確認後、マクロは即座に指定したワークシート以外のすべてのワークシートを非表示にします。これにより手作業による多数の操作を省略でき、特に大規模な複数シートファイルを扱う際や、他者向けにファイルを準備する際にワークスペースをすっきり整理するのに役立ちます。

非表示にしたワークシートは削除されませんので、いつでも再表示できます。ただし、ワークブック内に表示されているワークシートが1 つしかない場合、Excel はそのシートを非表示にすることを許可しません。必ず少なくとも1 つのシートが表示されるようにしてください。すべてのシートを再度表示したい場合は、以下のシンプルな VBA コードをご活用ください。

注記：以前に非表示にしたすべてのワークシートを再表示するには、Alt＋F11を押して VBA エディターを開きます。新しいモジュールを挿入するか、以前使用したモジュールに下記のコードを貼り付け、F5キーを押して実行してください。これにより、ワークブック内のすべてのシートが再表示され、編集やレビューが可能になります。

VBA コード：非表示のワークシートを表示する

Sub SheetUnHidden()
	Dim xWs As Worksheet
	For Each xWs In Application.ActiveWorkbook.Worksheets
		xWs.Visible = True
	Next
End Sub

Kutools for Excel でアクティブなワークシート以外をすべて非表示にする（1 回のクリックのみ）

より高速でユーザーフレンドリーな方法をお探しの方、特に複数のシートを頻繁に管理する必要がある方には、Kutools for Excel がシンプルなソリューションを提供します。この方法は、コードの作成や実行を避けたい方、または共有用のワークブックを定期的に準備し、効率的なワークフローを実現したい方に最適です。Kutools には、選択していないすべてのシートをわずか数回のマウスクリックで非表示にできる専用機能が搭載されています。

Kutools for Excelは300 以上の高度な機能を提供し、複雑な作業を効率化して、創造性と生産性を高めます。AI 機能と統合されたKutools は、正確にタスクを自動化し、データ管理を簡単にします。Kutools for Excel の詳細情報。。。 無料トライアル。。。

この方法をご利用いただくには、以下の簡単な手順に従ってください。

1。まず、ワークブック内で表示したいワークシートをアクティブ（クリック）にしてください。この確認は非常に重要です。なぜなら、Kutools は操作後に現在のワークシートのみを表示したままにし、それ以外のすべてを非表示にするためです。

2。次に、Excel のリボンからKutoolsタブをクリックします。続いて表示/非表示をクリックし、ドロップダウンメニューから非アクティブなシートを非表示にするを選択してください。これにより、現在のブック内で作業中のシート以外のすべてのワークシートが即座に非表示になります。

リボンの Kutools タブにある「選択以外のシートを非表示」オプションのスクリーンショット

この操作は、同僚やクライアントとファイルを共有するとき、プレゼンテーションに集中したいとき、あるいは裏付けとなるデータが誤って変更されないように保護したいときに特に役立ちます。追加のプロンプトや設定は一切不要で、即座に処理が完了します。

後で以前に非表示にしたすべてのシートを復元（再表示）したい場合も、Kutools ならこの操作が同じように簡単です。Kutools＞表示/非表示＞すべてのシートを再表示をクリックするだけで、ワークブック内のすべてのワークシートが即座に再表示されます。

リボンの Kutools タブにある「すべての非表示シートを再表示」オプションのスクリーンショット

注意事項：Kutools をご利用の際は、非表示ツールを適用する前に、正しいシートが選択されていることをご確認ください。この機能は標準の元に戻すコマンド（Ctrl+Z）では取り消せませんが、上記の方法でいつでもすべてのシートを再表示できます。さらに、Kutools にはより複雑なシナリオで時間を大幅に節約できる、さまざまな一括ワークシート管理機能も搭載されています。

Kutools for Excel— 300 以上の必須ツールでExcel を強化し、作業をより迅速・簡単に。AI 機能を活用して、スマートなデータ処理と生産性の飛躍的な向上を実現します。今すぐ入手

代替ソリューション：上記の方法に加え、ワークフローのニーズに応じて以下のアプローチもぜひご検討ください。

手動で非表示／再表示：任意のワークシートタブを右クリックして、非表示または再表示オプションをご利用いただけます。少数のシートを非表示にするには最適ですが、大きなワークブックではこの方法は時間がかかります。
グループ選択して非表示にする：非表示にしたいシート（表示させたいシートを除く）を、Ctrlキーを押しながらクリックして選択し、選択したシートタブのいずれかを右クリックして非表示を選択します。個別にシートを非表示にするより素早く操作できますが、多数のシートを扱う場合には、上記の VBA やKutools のソリューションほど効率的ではありません。

これらの代替手段は、マクロやアドインへのアクセスが制限されている環境や、制約された条件下で作業する際に非常に役立ちます。

ソリューションを選択する際は、ワークブックのサイズや操作頻度、そして自動化や簡便性へのニーズをしっかり考慮してください。大切なデータを誤って非表示にしてしまうのを防ぐため、常にどのワークシートが表示されているかを再確認しましょう。

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

Office Tab の詳細はこちら。。。無料ダウンロード。。。

すべてのKutools アドインが、たった1 つのインストーラーで完結。

Kutools for Officeスイートには、Excel ・Word ・Outlook ・PowerPoint 用のアドインと Office Tab Pro が含まれており、複数の Office アプリを横断して作業するチームに最適です。

オールインワンスイート— Excel、Word、Outlook、PowerPoint 用アドイン＋Office Tab Pro
インストーラー1 つ、ライセンス1 つ— 数分でセットアップ可能（MSI 対応）
連携してさらにパワーアップ— Office アプリ全体で生産性が向上
30 日間のフル機能トライアル— 登録不要、クレジットカード不要
最高のお得感— 個別アドイン購入よりお得

Kutools for Office の詳細はこちら。。。無料ダウンロード。。。