Format

[chiragggg]

Hi,

I have a macro which is supposed to create the month (-1) and change format to "mmm" however it seems to change to Jan,

Code below - the formula gives a number.

Range("A2").Select
Selection.NumberFormat = "mmm"
ActiveCell.FormulaR1C1 = "=MONTH(NOW())-1"

 

[VoG]

Should it be?

With Range("A2")
    .NumberFormat = "mmm"
    .Formula = "=DATE(YEAR(TODAY()),MONTH(TODAY())-1,DAY(TODAY()))"
End With

 

[chiragggg]

thanks, will give it a bash.

 

[jasonb75]

To show where you've gone wrong, your formula is basically "=7-1" which in date format returns 06/01/1900, formatted to month returns Jan.

try

with range("a2")
.numberformat = "mmm"
.formula="=today()-(day(today()+1))
end with