Selecting Hidden Sheets

[dej222]

I have the following code which works fine when all of the sheets are not hidden:

Sub CurrencyEuro()
Dim i As Integer
Application.ScreenUpdating = False

For i = 8 To 43
    Sheets(i).Select
    Range("A502").Select
    ActiveWindow.ScrollRow = 498
    Next i

...

However, depending on other factors another macro sometimes hides some of the sheets from 8-43. Then the code doesn't work. How can I still run this macro when some of the sheets are hidden?

Preferably I don't want to use the names of the worksheets, because those are dynamic.

[shg]

Delete those three lines of code. It's almost never necessary to Select anything to operate with or on it.

[dej222]

I just made all of the sheets visible, then ran the macro above, then called the macro that was hiding some of the sheets.

Works fine now.

[shg]

But still better (faster, shorter) to not select at all.