Macro ActiveSheet.Formula Object doesn't support this property or method error

[starheartbeam]

I am trying to do the following:

ActiveSheet.Formula = "=IF(TEXT(E2,""YYYYMM"")< text(m2,""yyyymm""),b2&""-""&c2&""-""&d2&""-""&""01-""&(text(m2,""mmm""))&""-""&(text(m2,""yy"")),b2&""-""&c2&""-""&d2&""-""&e2)"



This works when I put it in an excel formula but when I put it in my macro I get "Object doesn't support this property or method" error and I do not know what I need to do to get this to work? Any help would be very helpful.

 

[Fluff]

This works for me

ActiveSheet.Range("[COLOR=#ff0000]A2[/COLOR]").Formula = "=IF(TEXT(E2,""YYYYMM"")< text(m2,""yyyymm""),b2&""-""&c2&""-""&d2&""-""&""01-""&(text(m2,""mmm""))&""-""&(text(m2,""yy"")),b2&""-""&c2&""-""&d2&""-""&e2)"

Just change the value in red to the cell you want the formula in

 

[starheartbeam]

Things can get tricky when you are trying to add in a formula that has literal quote marks, as those are also used for Text delimiters in VBA. If you do not do it correctly, VBA cannot tell if you want literal quotes marks, or you are just denoting text.

I find that the easiest thing to do in these situations is to turn on your Macro Recorder, and enter one of these formulas on your spreadsheet. Then stop the Macro Recorder and view your recorded code. Thois will show you EXACTLY how the formula needs to look in VBA. So you can just copy and paste that recorded formula into your VBA code.

Thank you! I did this and got it to work.

 

[Joe4]

Thank you! I did this and got it to work.

You are welcome.
And you learned a new little trick for getting VBA code!