Userform; User to complete all visible fields

[dshah]

[FONT=&quot]I have a userform that depends on various data types. When the user opens the form, all fields are hidden and based on the selection from drop down cetain fields are visible and others are hidden. [/FONT]
[FONT=&quot]On data submission, data will be copied into an excel worksheet. [/FONT]
[FONT=&quot]I’m trying to write a code to check if all visible fields are completed in the userform before the user submits data and if they are blank then prompt the user to complete the field. I’m struggling with 2 things:[/FONT]
[FONT=&quot]1) How to run the code to check for blank entries on only visible fields in the form[/FONT]
[FONT=&quot]2) How to change the code to allow users to fill in missing data[/FONT]
[FONT=&quot]Thanks for your help. Below is as far as I got:[/FONT]
[FONT=&quot]Private Sub Submit_Click()[/FONT]
[FONT=&quot]Dim ctrl As Control
For Each ctrl In Me.Controls
If TypeOf ctrl Is msforms.TextBox Or TypeOf ctrl Is msforms.ComboBox Or TypeOf ctrl Is DTPicker Then
If ctrl.Value = “” Then
Cancel = 1
ctrl.BackColor = vbRed
‘MsgBox “Complete all fields in red”
‘ctrl.SetFocus
End If
End If
Next[/FONT]

 

[V_Malkoti]

You can check the Visible property of the control for that.

And I don't see anything in this code that is preventing user to fill missing data.

 

[dshah]

You can check the Visible property of the control for that.

And I don't see anything in this code that is preventing user to fill missing data.

Not sure I understand what you mean by check the visible property of the control for that..

 

[V_Malkoti]

1) How to run the code to check for blank entries on only visible fields in the form

Just like you are checking the Value property of the control, check Visible property of the control:

If ctrl.Visible Then
    ' Control is visible
End If