D Don Guillett Sep 30, 2003 #2 in code (just recorded) to HIDE. =True to UNHIDE Sub Macro4() ' ' Macro4 Macro ' Macro recorded 9/30/2003 by Don Guillett ' ' Sheets(Array("Sheet6", "Sheet9")).Select Sheets("Sheet9").Activate ActiveWindow.SelectedSheets.Visible = False End Sub
in code (just recorded) to HIDE. =True to UNHIDE Sub Macro4() ' ' Macro4 Macro ' Macro recorded 9/30/2003 by Don Guillett ' ' Sheets(Array("Sheet6", "Sheet9")).Select Sheets("Sheet9").Activate ActiveWindow.SelectedSheets.Visible = False End Sub
D Don Guillett Sep 30, 2003 #3 Sorry, What I gave will hide. You must un-hide thusly: myarray = Array("Sheet6", "sheet9") For Each sh In Sheets sh.Visible = xlSheetVisible Next
Sorry, What I gave will hide. You must un-hide thusly: myarray = Array("Sheet6", "sheet9") For Each sh In Sheets sh.Visible = xlSheetVisible Next
V Vasant Nanavati Sep 30, 2003 #4 Hi: Only by writing your own macro. I have written one that I can send you if you like. Regards, Vasant.
Hi: Only by writing your own macro. I have written one that I can send you if you like. Regards, Vasant.