total no of worksheets in the workbook

G

Guest

Hi

i am trying to find out the total no of worksheets in the
workbook...i have in total 4 worksheets... but somehow its
giving me incorrect value of 9...the total count instaead
of 4 is comign to be 9........

what could be the reason..
here is how i am getting it:

cntB = Workbooks(uuWkBkName).Worksheets.Count
cntB = ActiveWorkbook.Worksheets.Count

i have used this before and was never a problem..only
today its giving me this absurd error!

thanks in advance
 
N

Nigel

Worksheets.Count will count visible and hidden sheets (both hidden and very
hidden) - is this the problem?

Cheers
Nigel
 
G

Guest

ok..yah maybe u r rite...
i wasnt aware that worksheets can also be hidden.. i tried
to findout the hidden sheets....couldnt find the way to
see hidden sheets

hwo do i see the hidden worksheets?

thanks a lot!
 
M

mudraker

To help you identify the sheets try something like this


Sub ddddd()
Dim wS As Worksheet
For Each wS In Worksheets
wS.Visible = xlSheetVisible
Debug.Print wS.Name
Next

End Su
 
Top