VBA code that you can use to highlight the maximum value in a range in Excel.
VBA Code:
Sub HighlightMaxValue()
Dim rng As Range
Dim cell As Range
Dim maxVal As Double
' Set the range where you want to find the maximum value
Set rng = Range("A1:D10")
' Initialize maxVal with the minimum possible value
maxVal = -1E+20
' Find the maximum value in the range
For Each cell In rng
If IsNumeric(cell.Value) Then
If cell.Value > maxVal Then
maxVal = cell.Value
End If
End If
Next cell
' Highlight the cell(s) with the maximum value
For Each cell In rng
If cell.Value = maxVal Then
cell.Interior.Color = RGB(255, 255, 0)
End If
Next cell
' Inform the user that the highlighting is complete
MsgBox "The cell(s) with the maximum value have been highlighted!"
End Sub
Join Our Telegram Group
Join Our WhatsApp Group
