Help on VBA code error

[Parth Thaker]

Hi,
I am trying to add VBA for inserting formula in a range, but compile error is coming. Can someone please help on this.
i have imported the macro in personal.xlsb file hence i am using macro free work book.

 

[Chihiro]

You need to escape double quote inside the formula string, by using ""string"".

Range("S2:S" & lastRow).Formula = "=IF(OR(L2=30003322,L2=30004056,L2=30009486,L2=30013917,B2=""CHP Hydra""),""CHP-MMD"",IF(OR(L2=30004254,L2=30007286,Q2=""ABS""),""ABS"",""CHP-Oprn""))"

 

[Parth Thaker]

You need to escape double quote inside the formula string, by using ""string"".

Range("S2:S" & lastRow).Formula = "=IF(OR(L2=30003322,L2=30004056,L2=30009486,L2=30013917,B2=""CHP Hydra""),""CHP-MMD"",IF(OR(L2=30004254,L2=30007286,Q2=""ABS""),""ABS"",""CHP-Oprn""))"

Thank you very much sir. Your solution did the job.