From: booshi on
How to put the total number of sheets in a work cell?
Thanks


From: T. Valko on
One way...

Create this defined name...
Goto the menu Insert>Name>Define
Name: SheetNames
Refers to: =GET.WORKBOOK(1)&T(NOW())
OK

Then, to get the count of worksheets:

=COUNTA(INDEX(SheetNames,0))

--
Biff
Microsoft Excel MVP


"booshi" <booshi(a)presidency.com> wrote in message
news:OJ4SLtmuKHA.4492(a)TK2MSFTNGP05.phx.gbl...
> How to put the total number of sheets in a work cell?
> Thanks
>


From: FSt1 on
hi
i don't think there is a function that will do that. there used to be a call
function but that was removed in xl2k (i think) due to security issues.
here is a vb solutlions that works
Sub countworksheets()
Range("A1").Value = ActiveWorkbook.Sheets.Count
End Sub

paste the macro in a standard modual.

regards
FSt1

"booshi" wrote:

> How to put the total number of sheets in a work cell?
> Thanks
>
>
> .
>