I have a copy and paste code right now

example:
Sub CopyTo()
 
    Workbooks("CN2.xls").Sheets("Sheet1").Range("J2:J9000").Copy
    ThisWorkbook.Sheets("Total").Range("B949").PasteSpecial Paste:=xlPasteValues
    Workbooks("CN2.xls").Sheets("Sheet1").Range("E2:E9000").Copy
    ThisWorkbook.Sheets("Total").Range("C949").PasteSpecial Paste:=xlPasteValues
    Workbooks("CN2.xls").Sheets("Sheet1").Range("A2:A9000").Copy
    ThisWorkbook.Sheets("Total").Range("D949").PasteSpecial Paste:=xlPasteValues
 
End Sub

And based on that copied data, I would like to insert a VB code based on my excel formulas

examples:

E2 =IF(A2<140%,"WITHIN SLA","ABOVE SLA")
and
F2 =IF(G2=0,0,ROUND((AL2/G2),2))
and
=IF(F2>VLOOKUP(A2,'SLA Agreements'!$A:$C,MATCH(Total!U2,'SLA Agreements'!$A$2:$C$2,0),0)*G2,F2-VLOOKUP(A2,'SLA Agreements'!$A:$C,MATCH(Total!U2,'SLA Agreements'!$A$2:$C$2,0),0)*G2,0)
and I want to do that from row 2 all the way down

Thanks!