Workbook property telling number of sheets

[michael_mcclellan]

Gentlemen and ladies,

Does anyone know of a way to obtain in VB the number of sheets that
exist in a given workbook?

 

[JE McGimpsey]

One way:

nNumSheets = Workbooks("Workbook1.xls").Worksheets.Count

 

[Paul B]

Michael, use Sheets.Count something like this
Sub sheetcount()
MsgBox "There Are " & Sheets.Count & " Sheet(s) in this workbook"
End Sub


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

 

[michael_mcclellan]

Excellent. I am very grateful for your expertise.

 

[michael_mcclellan]

Excellent. I am very grateful for your expertise.