I meant to say, or you can use:

Sheets(Cell.Value).Visible = xlSheetVeryHidden

....depending on whether or not you want your users to be able to unhide them
via Format menu.

"Charlie" wrote:

Dim Cell As Range

On Error Resume Next
For Each Cell In Range("A1:A10")
Sheets(Cell.Value).Visible = xlSheetHidden
Next Cell

' or you can use:
' Sheet1.Visible = xlSheetVeryHidden


"Steve" wrote:

Hi all. I have a list of sheets within the workbook in the range
Sheet1 A1:A10. How can I have vba hide the sheets that are listed in
that range? Thanks!