Vlookup works fine, but not in Macro

I'm trying to use the macro below to paste a Vlookup formula into my spreadsheet. When I run the macro, the results are all FALSE. However, if I pull out the Vlookup formula itself and apply it into the cells (in columns J and K), changing RC[9] or RC[10] to A2, it works perfectly. What am I doing wrong? I've been fooling with this for hours, and it seems so simple, but I'm not seeing it. Please help.

  Sub Test()
 Dim SrcWkb As Workbook
  Dim DstWkb As Workbook
Dim LastRow As Long
LastRow = Cells(Rows.Count, "A").End(xlUp).Row
 
   
   'Initialize the workbook object variables
   
    Set SrcWkb = Workbooks("OT Monitoring.xls")
              
    'create the vlookup tables
    SrcWkb.Worksheets("APRData").Activate
    With SrcWkb.Worksheets("APRData")
        Columns("J:J").Insert Shift:=xlToRight
        Range("J1").FormulaR1C1 = "Earned OT"
                
        Columns("K:K").Insert Shift:=xlToRight
        Range("K1").FormulaR1C1 = "Earned OT Cost"
                
        With Range("I2", Range("I" & Rows.Count).End(xlUp)).Offset(, 1)
            .Formula = FormulaR1C1 = "=VLOOKUP(RC[-9],OTEarned,9,FALSE)"
        End With
    
        With Range("J2", Range("J" & Rows.Count).End(xlUp)).Offset(, 1)
            .Formula = FormulaR1C1 = "=VLOOKUP(RC[-10],OTEarned,10,FALSE)"
                     Selection.NumberFormat = "$#,##0.00"
        End With
                
    End With
      
End Sub