Looping through sheets

[Guest]

I have code (Excel 2000) that loops through all the visible sheets in a
workbook. Problem is, when the code gets to the "next.sh" line, the next
worksheet is not selected.

For Each sh In mybook.Worksheets
if sh.visible = xlsheetvisible then

 

[JE McGimpsey]

Why do you want to select the sheets? Using worksheet and range objects
directly is faster and easier to maintain.

However, if you really want to select, then

For Each sh in mybook.Worksheets
If sh.Visible = xlSheetVisible Then
sh.Select
'...
End If
Next sh

 

[Guest]

try this:

For Each sh In mybook.Worksheets
If sh.Visible = True Then

 

[Guest]

I don't think my earlier reply was received...but in any case...I need to do
a lot of consolidating of non-standardized data on every sheet, so I have
nested loops and if..thens. I tried your suggestion and it worked.

Thank you.

 

[Guest]

Thanks for the suggestion. I tried what the earlier post recommended and it
worked. It's nice to know there are folks out there that are knowledgeable
and willing to assist.

Again, thanks.