Reference any value in list

[Noz2k]

Basically I have a list of values which I want my code to search by dependant upon which is chosen. I have this working fine, for each specific value chosen, as well as when there is no value in the searched cell. However I also to be able to look for all values but can't figure out how script this.

the code at the moment looks like this

STE = cbo1.Value
If STE = "All" Then
    SIT = Not Empty
Else
    If STE = "None" Then
        SIT = ""
    Else
        SIT = STE
    End If
End If

The not empty part does not work though.

the code later says

Do
 if rng.offset(, -19) = SIT Then
'Actions

where rng, STE & SIT are all Strings

 

[Noz2k]

Okay a little bit of a change in direction. I have replaced the combobox with a listbox.

So I now want to amend the code to say

 Do
             If rng.Offset(,-19) = STE Then

where STE = all the values selected.

I'm not quite sure how to reference all the values selected though.

currently I have

Dim X As Long
    For X = 0 To listbox.ListCount - 1
    If listbox.Selected(X) = True Then
    MsgBox listbox.List(X)
    End If
    Next X

but am not sure where to go from there.