brunces
05-11-2005, 01:03 PM
Friends,
I've got this code to organize my sheets...
Sub OrganizeSheets()
Dim TargetSheet As Worksheet
For Each TargetSheet In ActiveWorkbook.Sheets
TargetSheet.Select
Range("A1").Select
Next TargetSheet
Sheets("FirstSheet").Select
End Sub
But there's one problem... There's one HIDDEN sheet. So, when I run this macro, it doesn't work correctly.
How can I run this code SKIPPING hidden sheets?
or
How can I run this code SKIPPING a specific sheet?
Thank you for your attention, guys. :)
Hugs.
Bruno
I've got this code to organize my sheets...
Sub OrganizeSheets()
Dim TargetSheet As Worksheet
For Each TargetSheet In ActiveWorkbook.Sheets
TargetSheet.Select
Range("A1").Select
Next TargetSheet
Sheets("FirstSheet").Select
End Sub
But there's one problem... There's one HIDDEN sheet. So, when I run this macro, it doesn't work correctly.
How can I run this code SKIPPING hidden sheets?
or
How can I run this code SKIPPING a specific sheet?
Thank you for your attention, guys. :)
Hugs.
Bruno