macro for last months date

[buhay]

I use the following macro to display the text "at the end of september". How do I change it so that it displays last months name instead of the current month.
The text should be "at the end of august"

[VBA]Selection.TypeText Text:="at the end of" & " " & Format(Now, "mmmm")[/VBA]

Thanks in advance

[gmaxey]

Selection.TypeText Text:="at the end of" & " " & Format(DateAdd("M", -1, Now), "mmmm")

[buhay]

Selection.TypeText Text:="at the end of" & " " & Format(DateAdd("M", -1, Now), "mmmm")

Thank you so much! I love this forum