[grigoris1]

nasos 23
όλα καλα με την φόρμα, είναι όπως την ήθελα.
αυτό που ψαχνω είναι οτι θέλω οταν κανείς αναζήτηση να γράφεις ενα γράμμα η αριθμό και να φιλτράρει όλα με αυτό

Public Sub FilterForm()
Dim sFilter As String
If Nz(Me.cbo_eidos, "") <> "0" Then
sFilter = "[ΕΙΔΟΣ ΟΧΗΜΑΤΟΣ] LIKE '*" & Me.cbo_eidos & "*'"
End If

If Nz(Me.pinakida, "") <> "" Then
If sFilter <> "" Then
sFilter = sFilter & " And "
End If
sFilter = sFilter & "[OximaID] LIKE '*" & Me.pinakida & "*'"

End If
If Nz(Me.cbo_onepon, "") <> "" Then
If sFilter <> "" Then
sFilter = sFilter & " And "
End If
sFilter = sFilter & "[πελατηςID] LIKE '*" & Me.cbo_onepon & "*'"

End If
If Nz(Me.marka1, "") <> "" Then
If sFilter <> "" Then
sFilter = sFilter & " And "
End If
sFilter = sFilter & "[ΜΑΡΚΑ] LIKE '*" & Me.marka1 & "*'"
End If
Me.Filter = sFilter
Me.FilterOn = sFilter <> ""
End Sub

έφτιαξα έτσι αλλά τίποτα τα μπερδεβει.
και κατι ακόμα στα ονοματεπώνυμο υπάρχουν ονόματα 2 φορες αν γίνεται να φιλτράρει σε1 . εγώ το εχω ξεχωριστά όνομα και επώνυμο. και το ονομα Δημήτρης είναι 2 φορες αλλά δεν το φιλτράρει και να βάλει και τα 2 ονόματα.