Count number of sheets

[tc]

Hi. I want to create a macro that will count the number of sheets in a
particular workbook. Is this possible?

 

[Guest]

Try

Sub stantial()
numsheets = Worksheets.Count
end sub

Mike

 

[Guest]

Use this UDF:

Function sheetcount() As Integer
sheetcount = Worksheets.Count
End Function

 

[JE McGimpsey]

Please don't post the same message in multiple newsgroups. It only tends
to fragment your answers, and potentially waste the time of those
answering questions that have already been answered...

 

[JE McGimpsey]

Note that this will give you the number of sheet in the ACTIVE workbook,
not in "a particular" workbook...

 

[Guest]

Worksheets would be a subset of the sheets in a workbook.

if there could be chart sheets or macro sheets (less likely) as well

activeworkbook.Sheets.count