To have a message box for highlighted cell by conditional formatting

Hi All,

I hope you guys are really able to help as I am at my wit's end.
I am trying to compare Column I to Column E, and highlight it if it is more than 50% PLUS a message box is to appear just to alert the user.

I've used conditional formatting of this equation:

= OR(I12>E12*0.5)


And message box specific for this line:

Private Sub Worksheet_Calculate()
Dim myMessage As String

myMessage = ""

If Range("I12").Value > Range("E12").Value * 0.5 Then
If (myMessage <> "") Then myMessage = myMessage & vbCrLf
myMessage = myMessage & "Please note that the number is greater than 50% of the athletes"

End If

If (myMessage <> "") Then MsgBox (myMessage)
End Sub

The above is only for specifically line 12. How do I check for every row to highlight if each cell in column I is not greater than E and if it is greater than E, a message box should appear?

My first post Thanks!

try this,

Please Login or Register  to view this content.

Then you can't use worksheet calculate.
What column are you entering, that you want to trigger a code?