ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   Marco (https://www.excelbanter.com/excel-discussion-misc-queries/152229-marco.html)

Puzzled

Marco
 
How does one repeat a recorded macro!

John Bundy

Marco
 
what do you mean by repeat? You just play it from the command bar with the
run button beside the record button you used to record it. If this is not
what you mean please specify
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"Puzzled" wrote:

How does one repeat a recorded macro!


Puzzled

Marco
 
John,

Please refer to "Repeat a recorded macro" below.

I need to munipulate 3 rows of data into 1 and then repeat the process for
some 1500 records. The records are standard in their format.

"John Bundy" wrote:

what do you mean by repeat? You just play it from the command bar with the
run button beside the record button you used to record it. If this is not
what you mean please specify
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"Puzzled" wrote:

How does one repeat a recorded macro!


Bob Phillips

Marco
 
You modify the code so that it is index based, not absolute, then ssetup a
loopp to manage it.

Say the recorder gave

Range("A2").Select
Selection.Value = 22
Range("B2").Select
Selection.Value = "Red"
Range("B2").Select
Selection.Value = "I dunno now"

first tidy it up

Range("A2").Value = 22
Range("B2").Value = "Red"
Range("B2").Value = "I dunno now"

then base it around one cell

With Range("A2")
.Value = 22
.Offset(0,1).Value = "Red" '1 column right
.Offset(0,2).Value = "I dunno now" '2 columns
End With

then put it in a loop

For i = 2 To 2
With Range("A" & i)
.Value = 22
.Offset(0,1).Value = "Red" '1 column right
.Offset(0,2).Value = "I dunno now" '2 columns
End With
Next i

then make the loop bigger

For i = 2 To 1500
With Range("A" & i)
.Value = 22
.Offset(0,1).Value = "Red" '1 column right
.Offset(0,2).Value = "I dunno now" '2 columns
End With
Next i



--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)



"Puzzled" wrote in message
...
How does one repeat a recorded macro!





All times are GMT +1. The time now is 06:15 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com