VBA: Count the sheets in a Workbook
If you ever need to count the number of sheets in a workbook, use Application.Sheets.Count
Put this in a module:
Public Sub CountMySheets() MsgBox Application.Sheets.Count End Sub
Can't get the tutorial to work for you? Need help with your code?
Get answers right away at our AE Excel Support Forums!
Get answers right away at our AE Excel Support Forums!



Dim objExcel As Excel.Application
Dim objWb As Workbook
Set objExcel = New Excel.Application
objExcel.Workbooks.Open “File Path”
intNoOfSheets = objExcel.Sheets.Count