I need to be able to find the max value in a spreadsheet and highlight(bold)
that number. I need this to happen even when new data is entered

Try this worksheet event macro:

Private Sub Worksheet_Change(ByVal Target As Range)
v = Application.WorksheetFunction.Max(ActiveSheet.Used Range)
ActiveSheet.UsedRange.Interior.ColorIndex = xlNone
For Each r In ActiveSheet.UsedRange
If r.Value = v Then
r.Interior.ColorIndex = 6
Exit Sub
End If
Next
End Sub

--
Gary''s Student - gsnu200795


"Mark" wrote:

I need to be able to find the max value in a spreadsheet and highlight(bold)
that number. I need this to happen even when new data is entered

http://xldynamic.com/source/xld.CF.html#top3

--
__________________________________
HTH

Bob

"Mark" wrote in message
...
I need to be able to find the max value in a spreadsheet and
highlight(bold)
that number. I need this to happen even when new data is entered