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