Too Many Cell Formats- how can you count Formats?

[JakeD]

I have a very large file 100+sheets and am geting the "Too Many File Formats" error. I have been trying to reduce the number of formats but I don't know if my cleanup is actually reducing the number of formats in the file. Is there any way to get a count of the number of formats in a file? That way I could know how close I am to the limit of 4000 and if my cleanup is actually helping. Thanks

 

[Al Chara]

You can use the following to count the number of styles in a workbook:

MsgBox ActiveWorkbook.Styles.Count

 

[JakeD]

Thanks Al, when I run that line I only get a result of 49 bu I am still getting the error that I have too many formats. Is a Style the same as a Format? Any thoughts?

 

[Mark W.]

See http://support.microsoft.com/default.aspx?scid=kb;en-us;Q213904.