Format mystery????

[Rudi]

Can anyone tell me what is happening to the formatting in this workbook?
It has a single sheet with data in cell A1 and A2
Change font colour, fill colour, font type...any formatting you want....
Save and close the file
Open the file

All the formatting is reset to Arial size 10 and black with not fill colours...???

There are no macros to reset the file...
Any ideas

TX

I did notice if I upgrade the format to *.xlsx the issue disappears. But I am still interested to know what is causing the initial "reformatting".
Another thing I just noticed...
The file is 1MB in size?????????? Yet there is nothing in the file. It's the darndest thing!!
(Don't worry...there is no virus in it!)

[HansV]

I don't really have an idea, but the workbook must be corrupt.
If I insert a new sheet into the workbook, it behaves the same way: all formatting is removed when you save, close and reopen the workbook.
If I copy the Summary sheet to a new workbook, it doesn't behave that way, but if I try to save the workbook as an Excel 97-2003 workbook, Excel warns that the workbook contains external links, yet File > Info doesn't show any links, and ActiveWorkbook.LinkSources is empty.
I'd copy the data that you need, and throw the workbook away.

[Rudi]

TX for the confirmation. I thought I was going :bonkers:

I have successfully transferred the data to a blank new (xlsx) format file.
Cheers

[rory]

Too many styles I think. Running this seems to fix it for me:

Code: Select all

Sub cleanStyles()
    Dim oStyle As Style
    For Each oStyle In ActiveWorkbook.Styles
        If Not oStyle.BuiltIn Then oStyle.Delete
    Next oStyle
End Sub

[Rudi]

Woah.....

Good find Rory...
I concur.

1.jpg

[Leif]

I would never have put Rory down as a Style guru...

[rory]

My wife always says I have a style, just not Style.