dim ws as Worksheet
for each ws in Worksheets
if ws.name<"Sheet1" then
ws.Hide
end if
nxt ws

HTH
--
AP

"Kris" a écrit dans le message de news:
...
I know how to hide worksheets using VBA but I am unsure how to hide all
the worksheets in a workbook except for a specific one. The name of
this worksheet will never change. Any ideas? I would appreciate any
help.


Thank you,