-
test
test test test
[vba]
Private Sub Auto_Close()
Application.ScreenUpdating = False
Dim WS As Worksheet
For Each WS In ActiveWorkbook.Worksheets
WS.Visible = xlSheetVisible
Next WS
Sheets("Rackage Working Model").Visible = xlSheetVeryHidden
Sheets("DataWorkbook").Visible = xlSheetVeryHidden
Sheets("TextronDemo").Visible = xlSheetVeryHidden
Sheets("Sage&Onion").Visible = xlSheetVeryHidden
Sheets("UserLog").Visible = xlSheetVeryHidden
Sheets("FindWord").Visible = xlSheetVeryHidden
Application.ScreenUpdating = True
End Sub
[/vba]
Last edited by markmrw; 10-10-2008 at 04:50 AM.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules