Indsætte formel med VBA

Hej Experter

Jeg har følgende kode i mit regneark som jeg godt kan bruge lidt hjælp til:

Sub opdater()
    EnableCalculation = False
   
    ThisWorkbook.RefreshAll
   
    Dim cell As Range
   
    Sheets("Data_SalesLine").Select
        For Each cell In Range("F2:F10000")
        If cell.Offset(0, -1) <> "" Then
            cell.FormulaR1C1 = "=sum(rc[-3]-rc[-2])"
            Else
        End If
    Next
   
    Sheets("Data").Select
    For Each cell In Range("AB2:AB10000")
        If cell.Offset(0, -2) <> "" Then


            Her vil jeg gerne have den til at sætte følgende formel ind HVIS(ER.FEJL(FIND("Lager";AA2;1));HVIS(ER.FEJL(FIND("JVK lager";AA2;1));HVIS(ER.FEJL(FIND("lager";AA2;1));"Kundeordre";"");"");"")


            Else
        End If
    Next
       
    EnableCalculation = True
End Sub

Håber I kan hjælpe!