One way ..

Roger Govier gave me this sub a few years ago ..

The following will carry out the unhide
for all sheets within the workbook

Sub ShowSheets()
Dim s As Worksheet
For Each s In ActiveWorkbook.Worksheets
s.Visible = True
Next
End Sub

--
Rgds
Max
xl 97
---
GMT+8, 1° 22' N 103° 45' E
xdemechanik <atyahoo<dotcom
----
"CWH" wrote in message
...
I am using Excell 2003

If I have a file with several tabs hidden is there a way to unhide them
all
at once, rather than using Format, Sheet, Unhide for each tab?
--
CWH