Move through the sheets of a workbook

[Steve]

What is the code to move through the sheets of a workbook one by one and
after processing the last sheet, stop?

Thanks!

Steve

 

[Rick Rothstein \(MVP - VB\)]

What is the code to move through the sheets of a workbook one

by one and after processing the last sheet, stop?

Here is one way...

Sub TestCode3()
Dim WS As Worksheet
For Each WS In Worksheets
' Your code goes here in
' place of the following
WS.Range("A1") = WS.Name
Next
End Sub


Rick

 

[Steve]

Thanks, Rick!

Steve

Here is one way...

Sub TestCode3()
Dim WS As Worksheet
For Each WS In Worksheets
' Your code goes here in
' place of the following
WS.Range("A1") = WS.Name
Next
End Sub


Rick