Access-o-Mania

Access-Forum (Deutsch/German) => Access Programmierung => Thema gestartet von: mile85 am Januar 13, 2016, 12:05:35

Titel: VBA Filterprogramierung
Beitrag von: mile85 am Januar 13, 2016, 12:05:35
Hallo

Ich versuche vergeblich eine Schaltfläche anzulegen, die per Eingabe als Filter dient.

Mein Code:

     Dim x As String

     x = InputBox("Bitte den gewünschten MA eingeben")
     Me.Filter = "[Mitarbeiter]='" & x & "'"
     Me.FilterOn = True

Funktioniert so weit so gut, jedoch muss man  in der Inputbox den exakten Namen eingeben und mein Wunsch wäre ,dass es über die "Enthält" Funktion filtert, sodass ich z.B nur den Vornamen eingeben muss.

Kann mir da wer helfen?

Danke im Voraus
Titel: Re: VBA Filterprogramierung
Beitrag von: DF6GL am Januar 13, 2016, 12:33:39
Hallo,

etwa so:

Me.Filter = "[Mitarbeiter]  LIKE '*" & x & "*'"