A simple UDF will do it

Function IsBold(rng As Range) As Boolean
Application.Volatile
IsBold = rng.Font.Bold
End Function

and use like

=IF(ISBold(A1),...)

--

HTH

Bob Phillips

(remove nothere from the email address if mailing direct)

"Dmitry Kopnichev" wrote in message
...
Hello experts!
How to check for a bold text formatting through (in) a formula?