Can you use an if then statement to select bold values from a list?

[Rob Darby]

I have a column of data and some of the values are in bold to stand out. Can I use an if then statment to look at a cell, determine if the value is in bold font and, if it is, do an action?

example: (in cell B1)
=if(A1=bold font,"<","")
Thanks

EggHeadCafe - Software Developer Portal of Choice
Useful Google Search Tips and Tricks
http://www.eggheadcafe.com/tutorial...8-e8a148b071bf/useful-google-search-tips.aspx

 

[Dave Peterson]

One way is to use your own UserDefinedFunction that can check the formatting.

Option Explicit
Function IsBold(rng As Range) As Boolean

Application.Volatile

If IsNull(rng.Font.Bold) Then
IsBold = False
Else
IsBold = rng.Font.Bold
End If
End Function

If you're new to macros:

Debra Dalgleish has some notes how to implement macros here:
http://www.contextures.com/xlvba01.html

David McRitchie has an intro to macros:
http://www.mvps.org/dmcritchie/excel/getstarted.htm

Ron de Bruin's intro to macros:
http://www.rondebruin.nl/code.htm

(General, Regular and Standard modules all describe the same thing.)

Short course:

Open your workbook.
Hit alt-f11 to get to the VBE (where macros/UDF's live)
hit ctrl-R to view the project explorer
Find your workbook.
should look like: VBAProject (yourfilename.xls)

right click on the project name
Insert, then Module
Paste that code into the code window (usually on the righthand side)

Then back to excel:
Put something in A1. Bold (or don't) the font.
Put this in B1:
=isbold(a1)

Since formatting changes don't cause excel to recalculate, don't trust the
results of the formula until you've recalculated.

Then you can try:
=if(isbold(a1),"<","")