How to prevent an Excel sheet from opening if macros are disabled
Private Sub ShowSheets()
Dim sh As Worksheet
For Each sh In Worksheets
sh.Visible = xlSheetVisible
Next sh
' hide the HiddenWorksheet
Sheets("HiddenWorksheet").Visible = xlVeryHidden
End Sub
Private Sub HideSheets()
Dim sh As Worksheet
' hide the HiddenWorksheet
Sheets("HiddenWorksheet").Visible = xlSheetVisible
For Each sh In Worksheets
If Not sh.Name = "HiddenWorksheet" Then sh.Visible = xlVeryHidden
Next sh
End SubLast updated