Could use some VB help with dealing with combo box data from a Union All query

[spOOk123]

Sorry - No data / Nothing found if data from cboBathTypes selects data that resides [BathTypes2] - Works perfectly if selected data from sboBathTypes resides in [BathTypes1]. Did the msgbox = Me.cboBathTypes and displayed proper data regardless if data is from [BathTypes1] or [BathTypes2]

But currently it will not work correctly because I dont know how to code it - so its only responding to data from [BathTypes1]. Here is another non-working try I had hoped would work but did not

If Not IsNull(Me.cboBathTypes) Then
    SELECT CASE Me.cboBathTypes.Column(1) & vbNullString
        CASE IS = "1"
            CustomerType = CustomerType & " And ([BathTypes1] = '" & Me.cboBathTypes & "'"
        CASE IS = "2"
            CustomerType = CustomerType & " And ([BathTypes2] = '" & Me.cboBathTypes & "'"
End if