Function monthName(myMonth As Integer)
' if you are in an English dating system (m/d/y) then change the code
to:
'MsgBox StrConv(Format(myMonth & "/1/2006", "mmmm"), vbProperCase)
MsgBox Format("1/" & myMonth & "/2006", "mmmm")
End Function
Sub testMonth()
'here you supply the month number you want the name for
monthName (5)
End Sub