Looping Through Worksheets In A Workbook
 

I have a workbook with 12 worksheets named Jan-03 to Dec-03. What would be the
code to start at the first worksheet and loop through all the worksheets making
each worksheet active one at a time, doing some processing on the active
worksheet and then going to the next worksheet?

Thanks for your help!

Steve

Looping Through Worksheets In A Workbook
 

Sub test()
Dim sh As Worksheet
For Each sh In ThisWorkbook.Worksheets
'sh.Select
sh.Range("a1").Value = 30
Next sh
End Sub

Remember in the most cases you don't have to activate /select the worksheet or cells

--
Regards Ron de Bruin
(Win XP Pro SP-1 XL2002 SP-2)
www.rondebruin.nl



"Steve" wrote in message link.net...
I have a workbook with 12 worksheets named Jan-03 to Dec-03. What would be the
code to start at the first worksheet and loop through all the worksheets making
each worksheet active one at a time, doing some processing on the active
worksheet and then going to the next worksheet?

Thanks for your help!

Steve

Looping Through Worksheets In A Workbook
 

Steve,

this should do the trick. Just remember, when you are
referring to properties/ranges inside the loop, they are
properties of the wksht object, not a sheets object.

Sub StevesSheets ()
Dim wksht as Worksheet

For Each wksht in ActiveWorkBook.Worksheets
'... Steve's Code here...'
Next wksht

End Sub

Cheers, Pete

-----Original Message-----
I have a workbook with 12 worksheets named Jan-03 to Dec-
03. What would be the
code to start at the first worksheet and loop through all
the worksheets making
each worksheet active one at a time, doing some
processing on the active
worksheet and then going to the next worksheet?

Thanks for your help!

Steve


.

Looping Through Worksheets In A Workbook
 

Dim sh as Worksheet
for each sh in Worksheets
sh.Activate
' process sheet
Next

--
Regards,
Tom Ogilvy

"Steve" wrote in message
link.net...
I have a workbook with 12 worksheets named Jan-03 to Dec-03. What would be
the
code to start at the first worksheet and loop through all the worksheets
making
each worksheet active one at a time, doing some processing on the active
worksheet and then going to the next worksheet?

Thanks for your help!

Steve