undlade blanke vaerdier i search

Hej eksperter

Jeg har lige en lille hyggopgave som I sikkert kan loese lynhurtigt.

Jeg har lavet en search combobox, som har foelgende kode:

-------------

Private Sub Combo243_AfterUpdate()
    ' Find the record that matches the control.
    Dim rs As Object

    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Supplier ID] = " & Str(Nz(Me![Combo243], 0))
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub

-------------

Problemet er at hvis en af felterne er indtastet blank kommer denne ogsaa op naar man viser mulighederne i comboboxen (I ved naar man klikker paa pilen ned og faar en liste af muligheder£©. De blanke vaerdier vil jeg gerne undlade at vise...

Hvordan goeres det?

Paa forhaand tak.