How to check Required field Not Empty with "Tag = Optional"

Hello,

I have a Multi-Page Userform with text, list, and combo boxes. The non-required fields have Tag = "Optional". How do I run a [field <> Empty] check on the required controls? I'd like to pause the check, SetFocus on the empty field so the user can fill it out, and then resume the check.

Thank you.

Thank you for this. I will try it.

Question -- why TextBox2.Tag = "Must" ?

so if I want to search for empty "required" fields, then this?

Private Sub UserForm_Activate()
For Each c In Me.Controls
If c.Tag <> "Optional" Then
if c.value = "" then c.SetFocus: Exit For
Next
End Sub

Thanks for your help!

Hi Mike,
Thanks for this -- Question: why NotFilled = (c.Text = vbNullString) ?

Also, how do I make it SetFocus at each empty required field?

Thanks for any light you can shed.

I got it to work with code below. However, SetFocus no longer works.
I get this error: Capture.PNG

Please Login or Register  to view this content.

Any suggestions would be much appreciated.
Thanks again!

Thank you. This sub will run when User gets ready to save & send back to me--so it checks all the "REQUIRED" controls and then changes the background of field (and ControlSource) to yellow if empty [FieldEmpty Ctrl]. Then once the User fills out the fields and tries to save & send again, it'll run through the controls again and clears background color if field is filled [NotEmpty Ctrl].

So should I SetFocus and pause the sub until the field has been filled out? If so, how do I loop it until it checks all the controls?
Thanks again.