problem with Check for ListBox required field

[shedragon713]

Hello,

All of sudden, Excel VBA is not finding the ListBox when I do the following search (it does find the ComboBox):
Dim Ctrl As MSForms.Control
If Ctrl.Tag = "REQUIRED" Then
Select Case TypeName(Ctrl)
Case "ComboBox", "ListBox"
If Ctrl.ListIndex = -1 Then

However, if I do it this way, it finds the ListBox, but marks it as empty (even though it's not).
Case "TextBox", "ListBox"
If Ctrl.Text = "" Then

How can I fix this so it finds only the empty ListBox?

Thanks very much for your help.

[Kenneth Hobson]

This works for me.

Please Login or Register  to view this content.

TIP: Paste code between code tags for structure and required by forum rules. Click the # icon on the reply toolbar to insert tags.

[shedragon713]

Hi Kenneth,

This sub finds everything *except* the ListBoxes. Help!