Autofill Values only

[rizabdullah]

Hi Guys

I am stuck with a coda and was wondering if somebody could assist me please.
I am selecting a call and entering value "77000" in cell E11. I then find next blank row, depending on the column F, then I like to copy value "77000" from E11 and paste value to last row found from column F. The below is working, however its autofilling series, I just want autofill value. Any suggestions please:

ActiveCell.FormulaR1C1 = "77000"
Range("E11").Select

LR = Range("F" & Rows.Count).End(xlUp).Row
Range("E11").AutoFill Destination:=Range("E11:E" & LR), type:=xlFillValues

Many thanks in advance

 

[mikerickson]

I think this might work

LR = Range("F" & Rows.Count).End(xlUp).Row
Range("E11:E" & LR).Value = 77000

 

[rizabdullah]

Many thanks for that, yes it works. However, if I like to keep it more dynamic and not use E11 cell reference; how would I achieve that.

Thanks

 

[mikerickson]

What range of cells do you want the value to go into?