'/=====================================/
Sub HiddenSheets()
Dim iSheets As Long, x As Long
iSheets = ActiveWorkbook.Sheets.Count

For x = 1 To iSheets
If Sheets(x).Visible = False Then
MsgBox Sheets(x).Name & " is hidden."
End If
Next
End Sub
'/=====================================/

HTH,
Gary brown


"Jim Gordon MVP" wrote:

Hi Ian,

This question is not Mac specific, so I'm cross posting to the
excel.programming newsgroup to see whether anyone there has the answer.

-Jim

--
Jim Gordon
Mac MVP
MVP FAQ
<http://mvp.support.microsoft.com/default.aspx?scid=fh;EN-US;mvpfaqs


Ian Page wrote:
... I know, I know, I must be the last person in the world still using the
old XL5 macro language ...
1 "VBA learning curve"
2 "huge existing XL5 code"
3 "old dog .. new tricks" ;-)


Can any of the ancients tell me what function - eg. GET.????(type_code) -
will return the names of hidden worksheets, or, in particular, whether a
certain worksheet is hidden?

Surely this *must* be supported, no?
Both WORKBOOK.HIDE(sheet_text) and WORKBOOK.UNHIDE(sheet_text) both valid
functions. And they manipulate sheets, not workbooks...