Stuck myself - can't bring back "VeryHidden"

  • Thread starter Thread starter Ed
  • Start date Start date
E

Ed

I coded a Workbook_Open event that included
Worksheets("Sheet1").Visible = xlVeryHidden
Worksheets("TIRs").Visible = xlVeryHidden
leaving Sheet3 visible. I have a Command button on Sheet3 that is supposed
to unhide Sheet1 and make Sheet3 VeryHidden, leaving TIRs VeryHidden. But I
can't make it work!

Some thoughts - but I don't know if they have any significance:
* The Open event is in ThisWorkbook, but the CommandButton1 is in Sheet3
* The code for the button is trying to VeryHide the sheet the button is
on, which includes the code module

I've tried just about every combination of commands from the NG and the help
files, and even had a VB programmer standing here - but it won't go! Can
someone please point me in the right direction?

Ed
 
Ed,

I couldn't reproduce your problem, maybe if you posted your code someone
would be able to help more easily.

Dan E
 
Ed, I might miss the problem but this worked on my system:

Sub test() ' in module
Worksheets("Sheet1").Visible = True
Worksheets("Sheet3").Visible = xlVeryHidden
End Sub

Private Sub Workbook_Open() 'in this workbook
Worksheets("Sheet1").Visible = xlVeryHidden
Worksheets("TIRs").Visible = xlVeryHidden
End Sub

John
 
open the workbook with the veryhidden sheet, then run the following macro:

sub unhide()
for each x in activeworkbook.sheets
x.visible = true
next x
end sub

Lynn S
 
Back
Top