Excelで非表示のワークシートの数をすばやく数える方法は？

何百ものワークシートを含む大きなワークブックがあり、一部のワークシートが非表示になっている場合。 いくつかの特別なニーズを満たすために、ブック内の非表示のワークシートの数を知りたいのですが、XNUMXつずつ数えるのではなく、どうすればよいでしょうか。 次に、非表示のワークシートを一度にすばやくカウントできるXNUMXつのトリックを紹介します。

VBAで隠しシートを数える

Kutools forExcelで隠し/表示シートを数える

隠しシートを削除するか、Kutools forExcelですべての隠しシートを再表示します

---

VBAで隠しシートを数える

ブック内の非表示のワークシートの数を示すダイアログをポップアウトできるVBAコードを紹介します。

1。 押す Altキー+ F11 を有効にするためのキー アプリケーション向け Microsoft Visual Basic 窓。

2。 クリック インセット > モジュール、以下のコードを新しいコードに貼り付けます モジュール 窓。

VBA：隠しシートを数えます。

Sub vhCount()
'Updateby20150602
Dim xWs As Worksheet
Dim xCount As Integer
For Each xWs In Application.ActiveWorkbook.Sheets
    If xWs.Visible Then xCount = xCount + 1
Next
MsgBox "Visible : " & xCount & vbCrLf & _
    "Hidden : " & ActiveWorkbook.Sheets.Count - xCount
End Sub

3。 押す F5 キーを押してコードを実行すると、非表示のワークシートの数と表示されているワークシートの数を示すダイアログが表示されます。

---

Kutools forExcelで隠し/表示シートを数える

VBAに慣れていない場合は、無料でインストールできます Kutools for Excel シート数、隠しシート数、表示シート数を一目で確認できます。

後の 無料インストール Kutools for Excel、以下のようにしてください：

1。 クリック クツール > ナビゲーション ペインを表示します。 スクリーンショットを参照してください：

2。 次に、をクリックします ワークブックとシート ボタンをクリックして本とワークシートを一覧表示し、ペインの下部に移動すると、合計シート数、非表示シート数、および表示シート数を確認できます。

ヒント： ナビゲーションペインが不要になった場合は、 クツール > ナビゲーション 再びそれを隠すために。

---

Kutools for Excelを使用して、非表示のシートを削除するか、すべての非表示のシートを再表示します

Kutools for Excel、ワンクリックですべての非表示のシートを削除することもできます。

1.すべての非表示のシートを再表示する場合は、クリックするだけです クツール > 表示と非表示 > すべての非表示シートを再表示.

2.非表示のシートをすべて削除する場合は、[ エンタープライズ > ワークシート > 非表示のシートをすべて削除する。 スクリーンショットを参照してください：