MSG Box based on cell values

[ryan_law2000]

Hey Everyone,

So Im looking for a MSG Box "Warning to Big"
to appear only when a cell in Range M21:M500 is a bigger number then cell P4

Once the MSG box appears i dont want it to keep appearing unless that cell value that triggered it changes again

What would i do for that?

 

[JoeMo]

Hey Everyone,

So Im looking for a MSG Box "Warning to Big"
to appear only when a cell in Range M21:M500 is a bigger number then cell P4

Once the MSG box appears i dont want it to keep appearing unless that cell value that triggered it changes again

What would i do for that?

Here's some sheet code that will do what you want.

To install the code:
1. Right-click the worksheet tab you want to apply it to and choose 'View Code'. This will open the VBE window.
2. Copy the code below from your browser window and paste it into the white space in the VBE window.
3. Close the VBE window and Save the workbook. If you are using Excel 2007 or a later version do a SaveAs and save it as a macro-enabled workbook (.xlsm file extension).
4. Make sure you have enabled macros whenever you open the file or the code will not run.

Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
If Not Intersect(Target, Range("M21:M500")) Is Nothing Then
    For Each c In Target
        If IsNumeric(c) Then
            If c.Value > Range("P4").Value Then
                MsgBox "WARNING - TOO BIG"
                Exit For
            End If
        End If
    Next c
End If
End Sub