Hide Spreadsheets

[NIDAL]

Hi every body

I have workebook contain 42 sheets and I make Summary sheet contain Buttons
for eatch to Activate.
How can I Hide the other sheets, while Buttons in summary sheet still work

 

[Jacob Skaria]

Paste the procedure "DisplayWorksheet" and call that from the command button
click event like below example

Private Sub CommandButton1_Click()
'This will display Sheet1
DisplayWorksheet ("Sheet1")
End Sub

Sub DisplayWorksheet(strSheet As String)
'This will hide all other sheets except "Summary" and display strSheet
Application.ScreenUpdating = False
For Each wstemp In ActiveWorkbook.Sheets
If wstemp.Name <> "Summary" Then wstemp.Visible = False
Next
ActiveWorkbook.Sheets(strSheet).Visible = True
Application.ScreenUpdating = True
End Sub

 

[Don Guillett]

If you use
veryhidden
then it can only be visible again with code.