Enter formula by code.
Hi All
can anyone help. I cant seem to get this to work.
I keep getting run time error 1004
application or object defined error.
Public Sub TLIdentify()
finalrow = Worksheets("INV Bookings").Range("B65536").End(xlUp).Row
Worksheets("INV Bookings").Range("AV26:AV" & finalrow).FormulaR1C1 =
"=IF(OR(RC[-38]0,RC[-32]0,RC[-26]0,RC[-20]0,RC[-14]0,RC[-8]0,RC[-2]0),VLOOKUP(RC4,'Team Summary'!R4C3:R16C4,2,0),"")"
End Sub
--
Regards and Thanks for any assistance.
Francis Brown.
|