find last row in column c and fill out column A and B untill last row found in C

[rkb1510]

how can I find last row in column c and auto fill out column A and B based by drag down formulas present in row A2 and B2 until last row found in Column C using VBA / Macro?

 

[alansidman]

Option Explicit

Sub foo()
    Dim lr As Long
    lr = Range("C" & Rows.Count).End(xlUp).Row
    Range("A2:C2").Copy Range("A3:C" & lr)
End Sub