Anyone can help me correct on below code:
i need the answer in row 4


Untitled.jpg


Dim lastcol As Long

lastcol = Cells(Columns.Count, "xfd").End(xlToLeft).Column

Range("a4:XFD" & lastcol).FormulaR1C1 = "=R[-3]C+R[-2]C"