Excelで非表示のシートと表示のシートを切り替える方法は？

他の人に見られたくない重要なデータを含むシートがある場合、ワークシートを非表示にすることは、Excelのデータを保護する簡単な方法です。 ただし、非表示のシートを表示してから再度非表示にする必要がある場合もあります。通常は、XNUMX枚ずつ再表示する必要があります。通常、この操作を適用すると、面倒で時間がかかります。 この記事では、ワークシートを非表示と非表示の間で切り替える簡単な方法をいくつか紹介します。

VBAコードで非表示と非表示の間でシートを切り替えます

Kutools for Excelを使用して、シートを非表示と非表示の間で切り替えます

VBAコードで非表示と非表示の間でシートを切り替えます

Sheet1、Sheet2、およびSheet3が非表示になっているブックがある場合、次のVBAコードを使用すると、それらをすばやく表示でき、XNUMX回クリックすると再び非表示になります。 次のようにしてください。

1に設定します。 OK をクリックします。 Developer > ビジュアルベーシック、および新しい アプリケーション用のMicrosoftVisual Basic ウィンドウが表示されたら、クリックします インセット > モジュール、モジュールに次のコードを入力します。

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に設定します。 OK をクリックします。 クツール > 表示 > 隠しワークシートの可視性を切り替える、スクリーンショットを参照してください：

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

Note：この機能は、非連続の非表示シートにも適用されます。

関連記事：

Excelで非表示の列と表示されている列を切り替えます