Counters

Hi folks:

I have some code I need to run let's say 10 times on the same sheet.
How can I use counters s I don't have to retype the code 10 times?

Also, how can I go to the following sheet to the right after the code executes the 10th time on that sheet?

thanks

ok I figured out the Counter

for i = 1 to 10
code here
next i


Now how can I go to the next work sheet, assuming I have 150 worksheets?

thanks

halem2 wrote:
> Hi folks:
>
> I have some code I need to run let's say 10 times on the same sheet.
> How can I use counters s I don't have to retype the code 10 times?
>
> Also, how can I go to the following sheet to the right after the code
> executes the 10th time on that sheet?
>
> thanks
>
>
> --
> halem2
> ------------------------------------------------------------------------
> halem2's Profile: http://www.excelforum.com/member.php...fo&userid=9930
> View this thread: http://www.excelforum.com/showthread...hreadid=557473

Dear Halem2,

You can use the following code :-

Sub Repeat1()
Dim N
N = 1
Do Until N = 10
'enter the code which needs to be repeated
N = N + 1
Loop
'Next sheet Selection
ActiveSheet.Next.Select
End Sub



Regards
Thyagaraj Shetty C.N
Bangalore

thanks!!! I just got it working using

For Each SH In ActiveWorkbook.Worksheets
SH.Activate
my code
Next

thanks a lot