IF formula

[MJEB]

Hello,

I'm fairly new to Excel programming. I'm trying to input the following formula into a designated cell:

ActiveCell.FormulaR1C1 = "=IF(MONTH(B2)=1,"January",IF(MONTH(B2)=2,"February",IF(MONTH(B2)=3,"March",IF(MONTH(B2)=4,"April",IF(MONTH(B2)=5,"May",IF(MONTH(B2)=6,"June",IF(MONTH(B2)=7,"July",IF(MONTH(B2)=8,"August",IF(MONTH(B2)=9,"September",IF(MONTH(B2)=10,"October",IF(MONTH(B2)=11,"November",IF(MONTH(B2)=12,"December",""))))))))))))"

Unfortunately, I get an error message saying, "Compile error: Expected: end of statement" May someone help me out with a solution please?

Many thanks.

[dilipandey]

Hi MJEB,

welcome to the forum.
Try below code:-
ActiveCell.Formula = "=LOOKUP(B2,{1,2,3,4,5,6,7,8,9,10,11,12},{""january"",""february"",""march"",""april"",""may"",""june"",""july"",""august"",""september"",""October"",""november"",""december""})"


Regards,
DILIPandey
<click on below * if this helps>