Make a MSG BOX POPUP FOR A NUMBER FIELD

[nunu]

Question - Is there any way I can make a msg box appear when the value of a field is greater than 2?

I can't seem to get the macro setvalue to work right for me.

Mary, thanks

 

[missinglinq]

Assuming the field is named "EnteredNumber", the following code will display the message "The Current Value is Greater than Two!" when the value is greater than 2 and the user moves out of the field:

Private Sub EnteredNumber_LostFocus()
If [EnteredNumber].Value > 2 Then
Dim Msg As String
Msg = "The Current Value is Greater than Two!"
MsgBox Msg, vbOKOnly + vbInformation
End If
End Sub

Hope this helps.

Missinglinq "It's got to be the going,
not the getting there that's good!"
-Harry Chapin

 

[chubby]

Thanks a million your a life saver!!!!

Mary....