COUNTHIDDENSHEETS

Returns the number of hidden worksheets sheets in the active workbook.

Remarks

* For instructions on how to add a function to a workbook refer to the page under Inserting Functions

Public Function COUNTHIDDENSHEETS() As Integer 

End Function 

You can use the built-in worksheet function SHEETS() in Excel 2013 to return the number of sheets in the active workbook.