Conditional formating?

D

dbrumit

I would like the the font of the highest value of 3 cells. A1,B1,C1 to be
large.

Thanks
 
R

RagDyeR

Among other things, Conditional Formatting does not allow the size of the
font to be changed.

Don't you think that changing the font style and color are sufficient enough
to bring attention to a particular cell?

OR, if you just want a subtle change, making the cell "Bold" might suffice.

Select A1 to C1, with A1 being the cell in focus (white), then:

<Format> <Conditional Format>

Change "Cell Value Is" to "Formula Is", and enter this:

=A1=MAX($A$1:$C$1)

Then, click on "Format", and choose whatever you wish (that's available),
Then <OK> <OK>.

If 2 or 3 of the cells are the same max value, all those cells will display
in the format you chose.
--

HTH,

RD
==============================================
Please keep all correspondence within the Group, so all may benefit!
==============================================

I would like the the font of the highest value of 3 cells. A1,B1,C1 to be
large.

Thanks
 
J

JE McGimpsey

Conditional formatting cannot change font size.

You could use an event macro. Put this in your worksheet code module
(right-click on the worksheet tab and choose View Code):

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Const nREGULARSIZE = 10
Const nLARGESIZE = 14
With Range("A1:C1")
If Not Intersect(.Cells, Target) Is Nothing Then
.Font.Size = nREGULARSIZE
.Item(Application.Match(Application.Max( _
.Cells), .Cells, False)).Font.Size = nLARGESIZE
End If
End With
End Sub

Note that if there's a tie, the left-most cell will have the large size.

If you want all cells with the highest value to be large:

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Const nREGULARSIZE = 10
Const nLARGESIZE = 14
Dim rCell As Range
Dim dMax As Double
With Range("A1:C1")
If Not Intersect(.Cells, Target) Is Nothing Then
.Font.Size = nREGULARSIZE
dMax = Application.Max(.Cells)
For Each rCell In .Cells
If rCell.Value = dMax Then _
rCell.Font.Size = nLARGESIZE
Next rCell
End If
End With
End Sub

Both of these assume that A1:C1 contain numeric values.
 
D

dbrumit

I originally stated that I wanted the highest value, but it is the lowest
value that I need, so I changed max to min and that worked. I now need to
apply this to the whole column. I actually need columns D E F H

If we cant skip column G, I can have them all run together.

Thank you very much for your help!

Dan
 
D

dbrumit

Hi Don, I could not get the formula below to work

What we have are columns: D,E,F,& H which have prices, these prices change
from time to time, so we would like the lowest price to be bold.

Thanks again for all of your help

Dan
 
R

Ragdyer

Do you *really* want the entire columns of D, E, F, and H to be included in
the Conditional Format?

If you do, then click on the column header of Column H, to select the entire
column, then hold down <Ctrl>, and click in the headers of F, E, and D, in
that order, so that you end up with cell D1 in focus (white).

Then,
<Format> <Conditional Format>
Change to "Formula Is", and enter this formula:

=D1=MIN($D:$F,$H:$H)

Click on "Format", and choose your Bold (or whatever), then <OK> <OK>.

Now, the lowest number in either of those 4 columns will display with the
format that you chose.
Needless to say, ties ( for lowest) will all display the chosen format.
 
D

dbrumit

This works great on a blank sheet. But the one I have contains data. We ended
up going with a different formula:

Column D formula
=IF(AND(D1<E1, D1<F1, D1< H1),TRUE,FALSE)

Column E formula
=IF(AND(E1<D1, E1<F1, E1< H1),TRUE,FALSE)

Column F formula
=IF(AND(F1<E1, F1<D1, F1< H1),TRUE,FALSE)

Column H formula
=IF(AND(H1<E1, H1<F1, H1< D1),TRUE,FALSE)

This worked well we only had one tie. Which we changed the value as the
above formulas wont work with a tie.

I entered your formula in the sheet that contained the data and in a blank
sheet, then copied the data onto it, but could not get that to work.

I do want to thank you very much for your help.

Dan
 
Top