Run-time error '1004': application-defined or object-defined error

Getting error in vba while writing a macro at this statement ActiveCell.FormulaR1C1 =_ "=VLOOKUP (RC[-22],'[" & Shrin_FileName & "]TL and AM Wise'!C1:C4,4,0)"