You can easily edit the macro code to cause it to use a for ... next loop.

Dim I
For I = 1 To 40000
' ... Inner part of the loop, i.e., your recorded macro

Next I

variable I is the loop counter, with an initial value of 1. The counter is incremented by 1 at the end of each pass. When variable I equals the final value (40000), the loop stops.

Doug

Jonathon Blake wrote:
All:

I've got a  couple of tables with 40 000 rows [10 columns wide] that
needs to be reformatted thusly:

style_1
style_2
style_3
style_4
style_5
style_6
style_1
style_2
style_3
style_4
style_5
style_6
style_1
style_2
style_3
style_4
style_5
style_6
etc.

Using "record macro", I have a macro that will restyle 12 rows at a time.
Does anybody have any suggestions on how to reformat that table,
without hitting F12 --- which the macro is tied to ---  the 6660 or so
times that are required?

[One feature that was available in my Apple //e text editor, and is
not available in OOo is the ability to tell a macro  to repeat "n"
times, where "n" is any integer.]

[Putting something on F12 to auto repeat doesn't work --- it skips
rows, does half a row in one style, a quarter in second style, and the
rest in a third style.  Done manually, waiting for the macro to
finish, does not produce those errors.]

Note:  this is using Write, _not_ Calc.

xan

jonathon

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to