Range("E2").FormulaR1C1 = _ "=VLOOKUP(RC[-1],'[CBP Port and Other Agency Listing.xlsx]Combined'!C4:C5,2,FALSE)" Range("E2:E" & Cells(2, "E").End(xlDown).Row - 1).FillDown