Dim WS As Worksheet
For Each WS In Worksheets
If WS.Name < "Detail" Then
WS.Visible = xlSheetVeryHidden
End If
Next WS


But when I have three Charts in the workbook it is not hidden?!

How I get both charts and sheets Hidden except sheet ("Details")

Thanks

Abdul, try this,

For Each Sheet In ActiveWorkbook.Sheets
If Sheet.Name < "Detail" Then
Sheet.Visible = xlSheetVeryHidden
End If
Next Sheet


--
Paul B
Always backup your data before trying something new
Please post any response to the newsgroups so others can benefit from it
Feedback on answers is always appreciated!
Using Excel 2002 & 2003

"Abdul" wrote in message
ups.com...
Dim WS As Worksheet
For Each WS In Worksheets
If WS.Name < "Detail" Then
WS.Visible = xlSheetVeryHidden
End If
Next WS


But when I have three Charts in the workbook it is not hidden?!

How I get both charts and sheets Hidden except sheet ("Details")

Thanks