Jim,

Final note: I have successfully implemented the fix I mentioned coding to a
text string and parsing the string instead of parsing characters. I'm still
setting the font colour as before but not reading it. The worst case scenario
formerly took 25 seconds to process after first opening the wb. It now takes
a tad under 1 second !!! For most cases, the macro is now so fast that it
looks like the text is always there and I'm only toggling the visible status.
I am willing to bet that the worksheet freezing issue is history also. So
parsing characters and READING properties is a very bad idea. All take note:
Avoid this at all costs.

Your post gave me the gumption to do this. Thanks a million !!!!

Greg



"Jim Cone" wrote:

Greg,

For what it's worth, you can check if the font in a cell has more that
one color applied by checking if the ColorIndex returns Null...

If IsNull(c.Font.ColorIndex) then
' more than one color

Jim Cone
http://www.officeletter.com/blink/specialsort.html