verifying multiple text boxes are not empty

I have a form and I am trying to do the following:

I have many text boxes on a form and if any of them are empty then I want a msgbox to popup and exit sub

I know how to do the following

If txtExample1 is "" then msgbox and exit sub
if txt....2
if txt...3

and so on

Is there anyway to group the text boxes to test for empty so you don't have to list 20 textboxes

thanks,

JJ

hello.

you can loop the textbox controlls like.

 Dim oCtrl      As MSForms.Control ' Textbox Data Cheek
        For Each oCtrl In Me.Controls
            If TypeOf oCtrl Is MSForms.TextBox Then MsgBox "The Textbox " & oCtrl.Name & " Needs A valid entry"
        Next oCtrl

you could add code to this to skip certian textboxs based on the controll name.
hope this helps

here is the other method that i know to loop the controls

Dim txtArray As Variant
Dim LpArr As Integer
txtArray = Array("Textbox1", "Textbox2", "Textbox3")
For LpArr = LBound(txtArray) To UBound(txtArray)
    If Me.Controls(LpArr).Value = "" Then
        Select Case LpArr
            Case 0
                MsgBox "This it the 1st control in array"
            Case 1
                MsgBox "this is the second control in array"
            Case 2
                MsgBox "this is the 3rd control in array"
            Case Else
                MsgBox "This message sould not get seen"
        End Select
    End If
Next LpArr

del double post