kestrel1306
11-15-2017, 02:24 PM
Hi team,
I have a list box with about 900 entries entries in it.
For specific items (about 200 ~ 300 of them) I need a warning window to pop up.
I've got the test code done.
What I'm after is a better, tidier way to list the values I'm searching for as the search criteria THING_xx, as I've said will be 200 or 300 items.
The search text won't be sequential per my demo text (just to make life harder).
If push comes to shove, I might have to do a swag of these things :-(
Select Case True
Case (InStr(THING_List(), "(THING_01)") > 0), (InStr(THING_List(), "(THING_02)") > 0) , (InStr(THING_List(), "(THING_03)") > 0)
UserForm8.Label1123.Visible = True
UserForm8.Label1114.Visible = True
MsgBox "message box text.", , "MSGBOX TITLE"
End Select
As always your help is appreciated
Regards
Kes
I have a list box with about 900 entries entries in it.
For specific items (about 200 ~ 300 of them) I need a warning window to pop up.
I've got the test code done.
What I'm after is a better, tidier way to list the values I'm searching for as the search criteria THING_xx, as I've said will be 200 or 300 items.
The search text won't be sequential per my demo text (just to make life harder).
If push comes to shove, I might have to do a swag of these things :-(
Select Case True
Case (InStr(THING_List(), "(THING_01)") > 0), (InStr(THING_List(), "(THING_02)") > 0) , (InStr(THING_List(), "(THING_03)") > 0)
UserForm8.Label1123.Visible = True
UserForm8.Label1114.Visible = True
MsgBox "message box text.", , "MSGBOX TITLE"
End Select
As always your help is appreciated
Regards
Kes