Excel VBA, ошибка времени выполнения «1004» при применении формулы

Question

Я получаю сообщение об ошибке при попытке применить формулу в ячейке недавно открытого листа. Ошибка возникает в третьей строке. Что является причиной проблемы?

ActiveWorkbook.SaveAs "Z:\Daily Mainsource Macros\NIS.xlsx"
Workbooks.Open Filename:="file path\roster.xlsx"
Range("F2").FormulaR1C1 = "=VLOOKUP(RC[-2],'[NIS.xlsx]NIS'!C2:C5,4,0)"
Range("F2").AutoFill Destination:=Range("F2:F" & Cells(Rows.Count, "B").End(xlUp).Row)
Columns("F").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False
Selection.Replace What:="0", Replacement:="REWORK", LookAt:=xlWhole, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
    ReplaceFormat:=False