Function for determine if cell has 'mingled bold text'

I have the following formula (taken from the web) in my spreadsheet which let me know if a cell have bold text or not. But when the cell has 'mingled' text, i.e. only partly bold, he gave a #VALUE error.

Please Login or Register  to view this content.

My question is: Do someone know how to change this formula, so when a cell has 'mingled' text, the result is 'TRUE' and not #VALUE.
I enclose an example spreadsheet.

Thanks.

I wrote a function similar to this to test for strikethrough characters, here it is edited for your BOLD test:

Please Login or Register  to view this content.

One side effect of this approach is that you can also now use it to test if ALL the cells in a range all have a bold character in it:

=ISBOLD(A1:A10)

Hello Excelfriend,

The Font.Bold statement can return 3 different values. The UDF is returning a boolean value. When the characters are mixed, you get the error because you are attempting to assign a NULL value to a Boolean value.

TRUE - if all characters are bold.
FALSE - if no characters are bold
NULL - if some characters are bold

One more:

Please Login or Register  to view this content.

Everyone else's suggestions had a volatility flag in it, so I checked mine and found it needs one, too, to be 100%. So I added it above in post #2. Be sure to add it in...

Jerry

I was not aware that the FONT.BOLD statement can return 3 values.

Many properties will return Null if the data is not the same for all members of the collection, e.g., someRange.NumberFormat, someRange.Style, ...