VBA numberformat doesn't get saved

[Eyeson15]

Hi guys
I got a strange problem. Here is the code to change the columns into 'accounting' numberformat then tries to save and close the workbook.

With ActiveSheet
        .Range("G:I,Q:T").NumberFormat = "_($* #,##0.00_);_($* (#,##0.00);_($* ""-""??_);_(@_)"
End With

ThisWorkbook.Save
ThisWorkbook.Close

But it never gets saved and reverts back to old numberformat. If I save the workbook manually by Ctrl + S then it gets saved fine.

Any ideas?

Regards,
James

 

[MARK858]

Have you got the code in your personal workbook?

 

[Norie]

James

Are you sure the formatting is being applied to the correct workbook/sheet?

 

[StephenCrump]

Where is your code sitting?

Where is the ActiveSheet?