Formula fill for one column only

[Mr2017]

Hi

I'd like to copy a cell (J1) with a formula and fill it down to all cells from J13, downwards, based on data populated in column A.

The formula in cell J1 is =IFERROR(I1/G1,"")

I've used code from this site to do this for multiple columns, but I'm not sure how to do it for a single column?

Please find below code that's been used for multiple columns.

If you could advise how I can do this, it would be greatly appreciated!

I thought I could use this, but it didn't work, as expected?

Sub Fill

Range("J1").Copy
Range("j13").PasteSpecial xlPasteFormulas
Range("j13", Range("j" & Rows.Count).End(xlUp).FillDown

End Sub

 

[Scott Huish]

Sub Fill()
Range("J1").Copy Range("J13:J" & Range("A" & Rows.Count).End(xlUp).Row)
End Sub

 

[Mr2017]

This is great - Scott Huish.

Thank you!

I have one final question, though. Do you know how I can paste the formula only (and not the formatting)?

 

[Mr2017]

Actually, I've worked it out.

Sub Fill()

Range("J1").Copy
Range("J13:J" & Range("A" & Rows.Count).End(xlUp).Row).PasteSpecial xlPasteFormulas

End Sub