Looping - Copying Formulas & pasting

[Excellover123]

Hello Message Board.
I have a formula that lives in row 5 (Actually is many formuals between Q5:DC5).
I would like to copy these down the sheet & paste them (first as formula then as the value (Once calculated).
I have tried using "Range(i & counter1 & ":" & o & counter1).Formula = Range("Q5:DC5").Formula"
(For ref: - i = Column Q, o = column DC)
This is coping the formula but the cell references are not moving relatively.
Any ideas how to do this?
Many thanks.
Gary

 

[Joe4]

If you just want to copy the formulas in Q5:DC5 down to the last row (let's call it "LR"), then you could simply do this:

Range("QC5:DC5").Copy Range("Q6:Q" & LR)

and then you could change these to hard-code values like this:

Range("QC5:DC" & LR).Value = Range("QC5:DC" & LR).Value

 

[Excellover123]

If you just want to copy the formulas in Q5:DC5 down to the last row (let's call it "LR"), then you could simply do this:

Range("QC5:DC5").Copy Range("Q6:Q" & LR)

and then you could change these to hard-code values like this:

Range("QC5:DC" & LR).Value = Range("QC5:DC" & LR).Value

Thank you, Joe. I will give that i blast.