convert 1-12 into January, Feb...etc

[Guest]

I would like to store months only and convert them into
texts in my report.

Thank you

 

[Steve]

The code below uses the DateSerial function to get the
relevant Month.

Dim Mth As String
Dim inMonth As Integer

intmonth = 1

Mth = Format(DateSerial(0, intmonth, 1), "mmmm")


Hope this helps,
Steve.

 

[Wayne Morgan]

Try the MonthName function.

?MonthName(9)
September

 

[Guest]

Thanks Steve.

-----Original Message-----
The code below uses the DateSerial function to get the
relevant Month.

Dim Mth As String
Dim inMonth As Integer

intmonth = 1

Mth = Format(DateSerial(0, intmonth, 1), "mmmm")


Hope this helps,
Steve.


.