How to quickly count the number of hidden worksheets in Excel?

If you have a large workbook with hundreds of worksheets, and some of worksheets are hidden. To meet some special needs, you want to know the number of hidden worksheets in the workbook, how can you do instead of counting them one by one? Now I will introduce two tricks can quickly count the hidden worksheets at once.

Count hidden sheets with VBA

Count hidden/visible sheets with Kutools for Excel

Delete hidden sheets or unhide all hidden sheets with Kutools for Excel

Count hidden sheets with VBA

Amazing! Using Efficient Tabs in Excel Like Chrome, Firefox and Safari!

Save 50% of your time, and reduce thousands of mouse clicks for you every day!

I introduce a VBA code which can pop out a dialog to tell you the number of hidden worksheets in a workbook.

1. Press Alt + F11 keys to enable the Microsoft Visual Basic for Applications window.

2. Click Insert > Module, and paste below code to the new Module window.

VBA: Count hidden sheets.

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. Press F5 key to run the code, and a dialog pops out to tell you the number of hidden worksheets and the number of visible worksheets.

Count hidden/visible sheets with Kutools for Excel

If you are not familiar with VBA, you can free install Kutools for Excel to count number of sheets, hidden sheets, and visible sheets at a glance.

After free installing Kutools for Excel, please do as below:

1. Click Kutools > Navigation to display the pane. See screenshot:

2. Then click Workbook & Sheet button to list the books and worksheets, and go to the bottom of the pane, you can find the number of total sheets, hidden sheets and visible sheets.

Tip: If you do not need Navigation pane anymore, click Kutools > Navigation again to hide it.

Delete hidden sheets or unhiden all hidden sheets with Kutools for Excel

With Kutools for Excel, you also can remove all hidden sheets at one click.

1. If you want to unhide all hidden sheets, just click Kutools > Show/Hide > Unhide All Sheets.

2. If you want to delete all hidden sheets, just click Enterprise > Worksheet > Delete All Hidden Sheets. See screenshot:

If you are interested in this addi-in, click here to download the 60-days free trial.

The Best Office Productivity Tools

Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by 80%

• Reuse: Quickly insert complex formulas, charts and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails...
• Super Formula Bar (easily edit multiple lines of text and formula); Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range...
• Merge Cells/Rows/Columns without losing Data; Split Cells Content; Combine Duplicate Rows/Columns... Prevent Duplicate Cells; Compare Ranges...
• Select Duplicate or Unique Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
• Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
• Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
• Super Filter (save and apply filter schemes to other sheets); Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
• Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
• More than 300 powerful features. Supports Office/Excel 2007-2019 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features 30-day free trial. 60-day money back guarantee.

Read More... Free Download... Purchase... 

---

Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier

• Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
• Open and create multiple documents in new tabs of the same window, rather than in new windows.
• Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!

Read More... Free Download... Purchase...