How do make a macro activate the next sheet?

[pauloreiss]

I have a macro that i want to run in many files that have the same structure but diferent number of sheets. I can only change sheets by writing:

Sheets("Sheet1").Activate

I would like to know if there is a command that would work, something like:

ActiveSheet.Activatenext (I tried this and didn't work)

Can someone tell me how to do this?

[Bob Phillips]

Almost got it.

activesheet.next.activate

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"pauloreiss" <pauloreiss.2141sy_1136378701.8605@excelforum-nospam.com> wrote
in message news:pauloreiss.2141sy_1136378701.8605@excelforum-nospam.com...
>
> I have a macro that i want to run in many files that have the same
> structure but diferent number of sheets. I can only change sheets by
> writing:
>
> Sheets("Sheet1").Activate
>
> I would like to know if there is a command that would work, something
> like:
>
> ActiveSheet.Activatenext (I tried this and didn't work)
>
> Can someone tell me how to do this?
>
>
> --
> pauloreiss
> ------------------------------------------------------------------------
> pauloreiss's Profile:
http://www.excelforum.com/member.php...o&userid=29820
> View this thread: http://www.excelforum.com/showthread...hreadid=497860
>

[Norman Jones]

Hi Paul,

Try:

'=============>>
Public Sub Tester01()
Sub TestA()
With ActiveSheet
If .Index < Sheets.Count Then
.Next.Activate
Else
Sheets(1).Activate
End If
End With
End Sub
'<<=============

---
Regards,
Norman



"pauloreiss" <pauloreiss.2141sy_1136378701.8605@excelforum-nospam.com> wrote
in message news:pauloreiss.2141sy_1136378701.8605@excelforum-nospam.com...
>
> I have a macro that i want to run in many files that have the same
> structure but diferent number of sheets. I can only change sheets by
> writing:
>
> Sheets("Sheet1").Activate
>
> I would like to know if there is a command that would work, something
> like:
>
> ActiveSheet.Activatenext (I tried this and didn't work)
>
> Can someone tell me how to do this?
>
>
> --
> pauloreiss
> ------------------------------------------------------------------------
> pauloreiss's Profile:
> http://www.excelforum.com/member.php...o&userid=29820
> View this thread: http://www.excelforum.com/showthread...hreadid=497860
>