Excelで非表示と表示のシートを切り替えるにはどうすればよいですか？

重要なデータが含まれているシートがあり、他のユーザーに見られたくない場合、ワークシートを非表示にすることで、Excelでのデータ保護が簡単に行えます。しかし、時には非表示のシートを表示して再度非表示にする必要があり、通常はそれらを一つずつ非表示解除する必要があります。この操作を頻繁に行う場合、それは面倒で時間がかかります。この記事では、シートを非表示と表示の間で簡単に切り替える方法をいくつかご紹介します。

VBAコードを使用してシートの非表示と表示を切り替える

Kutools for Excelを使用してシートの非表示と表示を切り替える

VBAコードを使用してシートの非表示と表示を切り替える

Sheet1、Sheet2、およびSheet3が非表示になっているワークブックがあると仮定すると、次のVBAコードを使用してそれらを迅速に表示でき、再度クリックすると再び非表示になります。以下の手順を行ってください：

1. 開発 > Visual Basic をクリックすると、新しい Microsoft Visual Basic for Applications ウィンドウが表示されます。挿入 > モジュール をクリックし、モジュールに次のコードを入力します。

Sub ToggleHideUnhideDataSheets()
Application.ScreenUpdating = False
Dim wb As Workbook
Dim ShtNames() As Variant
Set wb = ActiveWorkbook
ShtNames = Array("Sheet1", "Sheet2", "Sheet3")
For i = 0 To UBound(ShtNames)
wb.Sheets(ShtNames(i)).Visible = Not wb.Sheets(ShtNames(i)).Visible
Next i
Application.ScreenUpdating = True
End Sub

上記のコードでは、 ShtNames = Array("Sheet1", "Sheet2", "Sheet3") は変数であり、必要なように非表示のワークシート名を変更できます。

2. 次に、F5キーを押してコードを実行すると、非表示のシートが表示されます。再度非表示にしたい場合は、もう一度 F5キーを押してください。

Kutools for Excelを使用してシートの非表示と表示を切り替える

Kutools for Excel の「ワークシートの表示/非表示を切り替える」機能を使用すると、ワークシートコマンドをクリックするだけで、シートを簡単に非表示または表示に切り替えることができます。

Kutools for Excelには300以上の便利なExcelツールが含まれています。30日間無制限で無料試用できます。今すぐ入手してください。

Kutools for Excelをインストールした後、次の手順を実行できます：

1. 非表示のワークシートを含むワークブックを開きます。

2. Kutools > 表示 > ワークシートの表示/非表示を切り替える をクリックします。スクリーンショットをご覧ください：

このコマンドを一度クリックすると、すべての非表示のシートが表示され、再度非表示にしたい場合は、もう一度このコマンドをクリックします。スクリーンショットをご覧ください：

注: この機能は連続していない非表示のシートにも適用されます。

関連記事：

Excelで非表示と表示の列を切り替える