Change month format

[kevbez1969]

I have a cell say A1 containing a month in the short format (apr)

what vba scripting can i use to make cell A2 equal the same month but in the long format (April)

or even add it to some text in another cell as in the example below:

A1 = apr

so with the script run:

B1 = April
C1 = The month is April

Thanks

 

[Jonmo1]

Welcome to the board..

You can skip the intermediate cell B1...

In C1, put
="The month is "&TEXT((A1&YEAR(TODAY()))+0,"mmmm")

or if you want

B1: =TEXT((A1&YEAR(TODAY()))+0,"mmmm")
C1 ="The month is " & B1

Hope that helps.

 

[VoG]

If A1 contains a date formatted to show just the short month, try

Sub atest()
With Range("A1")
    .Offset(, 1).Value = Format(.Value, "mmmm")
    .Offset(, 2).Value = "The month is " & Format(.Value, "mmmm")
End With
End Sub

 

[kevbez1969]

Thanks for your help, all sorted now