Macro repeat

[decimal]

How do you make a macro repeat over and over until you tell it to stop. In
lotus you could make it loop back on itself until you hit ctrl somehting to
interupt it. I have 3000 lines in groups of 10, doing something to each of
the 10, then the same thing to the next 10. Since a macro always starts in
its original cell(a bug?), I need to just keep moving down, like I had it
learn to move down 10 times. In this case I would have it move the 11th, and
repeat itself. I don't know how to do that...
-Decimal

 

[Don Guillett]

Not exaclty sure what you want but test this to see if if helps.

Sub doovereach10()
lr = Cells(Rows.Count, "k").End(xlUp).Row
For i = 1 To lr Step 10
For j = 1 To 10
Cells(i, "k").Offset(j) = i
Next j
Next i
End Sub

 

[Sheeloo]

In VBA you can use FOR loop or DO WHILE loop
see http://www.angelfire.com/biz7/julian_s/julian/julians_macros.htm
An example:

Sub example()
for i = 1 to 3000 Step 10
for j = 1 to 10
' Do what you want to cell referenced by using i and j
' You can call a macro too by writing its name
Next j
Next i
End Sub