Are you wanting to loop thru sheets? You can use this.

Sub LoopSheets()

Dim wks As Worksheet

For Each wks In Worksheets
wks.Activate
'do something
Next wks
End Sub

If you are just wanting to activate the next sheet you can explicitly
reference the sheet.

Sheets("Sheet2").Activate
--
Cheers,
Ryan


"Bob A" wrote:

I need to write code that automatically moves from sheet to sheet and gathers
data. I have no problem gathering the data on the sheet but I don't know how
to move the pointer to the next sheet in the workbook.
I would really appreciate any help you can give.
--
Bob A