If you really want a macro then try this worksheet code:-

Sub highlightmaximum()
Dim rcell As Range
Dim Myrange As Range
Dim maxval As Variant
Set Myrange = Range("A1:A100") '<Change to suit
maxval = Application.WorksheetFunction.Max(Myrange)
For Each rcell In Myrange
rcell.Interior.ColorIndex = xlNone
If rcell.Value < "" Then
If rcell.Value = maxval Then
rcell.Interior.ColorIndex = 6
rcell.Font.Bold = True
End If
End If
Next
End Sub

Mike

"Mamabear" wrote:

Is there a macro I could use to find the highest figure in a column and make
it bold?

Thanks