Use "For" "Next" with Codenames & i through Worksheets

[TheBlademaster]

IT'S VERY SIMPLE!!! ANY IDEAS??????

Option Explicit
[U]Dim LoopingSheet As Worksheet[/U]


Sub GoThroughSeveralCODENAMES_WS()
Dim i As Integer
[B]'i have 10 ws, codename MySheet1, MySheet2, MySheet3... till 10
' want to do something like this:[/B]

[B]for i = 1 to 10
set LoopingSheet = ("MySheet" & i)
LoopingSheet .DisplayZeros = True
next[/B]

end sub

IT'S VERY SIMPLE!!! ANY IDEAS??????

 

[TheBlademaster]

i'd use this also for my checkboxes, named: checkbox&i ; for i = 1 to 20