ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   Using font elements as condition criteria (https://www.excelbanter.com/excel-worksheet-functions/188589-using-font-elements-condition-criteria.html)

StorageHawk

Using font elements as condition criteria
 
Does anyone know how to use font elements like bold, italic, underline, etc.
as criteria for a formula to return the value from a cell? I am trying to
use bold $ values as the criterion for pulling the $ value into another cell.
I can do the entire column but all I want are the cells with totals and not
the individual component sales figures. This is in a very large spreadsheet
and was already formatted when I received it, so I just wanted to gather the
data I want and pull it into another column. ???? Thanks in advance for any
help.

Gary''s Student

Using font elements as condition criteria
 
Here is part of your answer. We create a UDF that will return 1 if the
reference is currency and the font is bold:

Function hawk(r As Range) As Integer
v = r.Text
If Left(v, 1) = "$" And r.Font.Bold = True Then
hawk = 1
Else
hawk = 0
End If
End Function

So if A50 is dollars/bold then
=hawk(A50) will give a 1.

Is this of any help??
--
Gary''s Student - gsnu200787


"StorageHawk" wrote:

Does anyone know how to use font elements like bold, italic, underline, etc.
as criteria for a formula to return the value from a cell? I am trying to
use bold $ values as the criterion for pulling the $ value into another cell.
I can do the entire column but all I want are the cells with totals and not
the individual component sales figures. This is in a very large spreadsheet
and was already formatted when I received it, so I just wanted to gather the
data I want and pull it into another column. ???? Thanks in advance for any
help.


StorageHawk

Using font elements as condition criteria
 
I will have to try that and see if I can get the answer to pick up the value
in that cell. Thanks.

"Gary''s Student" wrote:

Here is part of your answer. We create a UDF that will return 1 if the
reference is currency and the font is bold:

Function hawk(r As Range) As Integer
v = r.Text
If Left(v, 1) = "$" And r.Font.Bold = True Then
hawk = 1
Else
hawk = 0
End If
End Function

So if A50 is dollars/bold then
=hawk(A50) will give a 1.

Is this of any help??
--
Gary''s Student - gsnu200787


"StorageHawk" wrote:

Does anyone know how to use font elements like bold, italic, underline, etc.
as criteria for a formula to return the value from a cell? I am trying to
use bold $ values as the criterion for pulling the $ value into another cell.
I can do the entire column but all I want are the cells with totals and not
the individual component sales figures. This is in a very large spreadsheet
and was already formatted when I received it, so I just wanted to gather the
data I want and pull it into another column. ???? Thanks in advance for any
help.



All times are GMT +1. The time now is 10:48 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com