I have the following formula in a worksheet which works just fine and give me the Today month -1 in format "mmm" I.e Aug. Here is the formula

TEXT(DATE(YEAR(TODAY()),MONTH(TODAY())-1,),"MMM")

I need to have the same result in Vba. Can someone assist?

I have tried MONTH(TODAY) - 2 but obviously I got "Jan"....