Multiple validations

[Homegrownandy]

I have three textboxes for data entry. If they ALL = 0 then I want a message box. If ANY of them have a value then I want the code to continue.



I can do this myself but probably not elegantly.

Would these be dealt with individually with three separate if scenarios or is there a way of doing this in one piece of code?

I understand this isn't a necessity its just my OCD and a chance to understand some more VBA

[Missinglinq]

What code to continue? Your post is really lacking in details.

When, for example, do you want the validation to be done and the warning to pop...just before saving a Record?

Presumably your Record has other Controls, as well, and if the above guess is correct, you do the validation in the Form_BeforeUpdate event:

Private Sub Form_BeforeUpdate(Cancel As Integer)
 If Me.TextboxA + Me.TextboxB + Me.TextboxC = 0 Then
  MsgBox "All Three Textboxes are Empty!"
  Cancel = True
 End If
End Sub

IF the above guess, isn't correct, you'll need to give a more detailed explanation of what you're trying to do.

Linq ;0)>

[Bob Fitz]

This code in the forms BeforeUpdate event does what you asked for:

Private Sub Form_BeforeUpdate(Cancel As Integer)    If Me.one = 0 And Me.two = 0 And Me.three = 0 Then
        MsgBox "this is your msg"
        Cancel = True 'This stops the form from updating
    End If
End Sub

However, if any of the boxes a ZLS you would need this code:

Private Sub Form_BeforeUpdate(Cancel As Integer)    If Nz(Me.one, 0) = 0 And Nz(Me.two, 0) = 0 And Nz(Me.three, 0) = 0 Then
        MsgBox "this is your msg"
        Cancel = True 'This stops the form from updating
    End If
End Sub

Edit:
Sorry. didn't notice that Linq had already replied

[Homegrownandy]

There is no code yet. I thought I would ask before I started. But your answer seems to be exactly what I'm after. Ill have a go.

[Homegrownandy]

Thanks both. Worked fine and default value is zero so no problems.