If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Require Field if another field is not blank
I am having some troble with my code within a form. What I am trying to do
is diplay a message box and require entry for a field when another field has an amount greater than zero. Here is my code that is not working. Private Sub Sun_Hours_1_Exit(Cancel As Integer) Dim strMsg As String If (Me.[Sun PR OUS 1] = "" And Me.[Sunday Hours 1] 0) Then Beep MsgBox "If hours are entered for sunday a corresponding PR OUS job number is required.", vbOKOnly, "Entry Required" Cancel = True End If End Sub Can someone please help me? |
#2
|
|||
|
|||
Require Field if another field is not blank
"OsmoseTom" wrote in message ... I am having some troble with my code within a form. What I am trying to do is diplay a message box and require entry for a field when another field has an amount greater than zero. Here is my code that is not working. Private Sub Sun_Hours_1_Exit(Cancel As Integer) Dim strMsg As String If (Me.[Sun PR OUS 1] = "" And Me.[Sunday Hours 1] 0) Then Beep MsgBox "If hours are entered for sunday a corresponding PR OUS job number is required.", vbOKOnly, "Entry Required" Cancel = True End If End Sub Can someone please help me? Try this: If (IsNull(Me.[Sun PR OUS 1]) And Me.[Sunday Hours 1] 0) Then Tom Lake |
#3
|
|||
|
|||
Require Field if another field is not blank
Along with Tom's suggestion, if you're going to leave this in the
Sun_Hours_1_Exit event, you'll have to remove the Cancel = True line! If you don't, you will not be able to move to the Sun PR OUS 1 textbox to enter the needed data! Focus will remain in the Sunday Hours 1 textbox as long as it is greater the 0 and Sun PR OUS 1 is empty! In point of fact, this type of Validation code should really be in the Form_BeforeUpdate event. That way your user will only be warned if they try to save the record with the conditions IsNull(Me.[Sun PR OUS 1]) And Me.[Sunday Hours 1] 0 being true. Your users may simply wnat to enter the [Sun PR OUS 1] data after entering Sundy's hours. In this case, with the code being in the Form_BeforeUpdate event, it would then be appropriate to have the Cancel = True line, to cancel the Save until the correction is made. -- Message posted via http://www.accessmonster.com |
Thread Tools | |
Display Modes | |
|
|