String für Filtersuche per VBA übergeben

Computer: Software & Programmierung Microsoft Access
#1

Hallo zusammen,

ich habe folgendes Problem.

Ich möchte in einem Formular eine auswahlbasierte Filtersuche realisieren. Dabei soll nach mehreren Begriffen gesucht werden. Es soll möglich sein die Begriffe mit „And“ und „Or“ zu verknüpfen. Bisher ganz einfach:
Kombinationsfeld mit Begriffen und Optionsschalter für „And“ und „Or“ Verknüpfung -> Zusammengefügt an ein Listenfeld übergeben. OK

Der erzeugte String funktioniert einwandfrei, wenn ich ihn kopiere und dann die original Filtersuche von Access nutze. Wenn ich folgende Anweisung ausführen lasse, sucht er nur nach Übereinstimmungen mit dem ersten Begriff -> z.B. Dose

Inhalt des Listenfeldes:

Me.Liste_Suchstring.Value
ist „Like ‚*Dose*‘ And ‚*Flasche*‘“

Filterbasierte Suche:

Me.Filter = "[Tabelle].[Feld] " & Me.Liste_Suchstring.Value
Me.FilterOn = True

Ich hoffe Ihr könnt mir helfen.

Beste Grüsse

#2

Hallo, Klaschl!

Me.Filter = "[Tabelle].[Feld] " & Me.Liste_Suchstring.Value
Me.FilterOn = True

Das liegt daran, dass der Filter etwas wie „Feld1 like ‚*Test1*‘ or like ‚*Test2*‘“ nicht versteht, im Gegensatz zur Eingabe über z. B. Kontextmenüfilter in einer Tabelle. Da ist nämlich klar, dass nur in diesem Feld gesucht werden soll. Für den Formularfilter müsste das Ding heißen: „Feld1 like ‚*Test1*‘ or Feld1 like ‚*Test2*‘“, d. h. für jedes Kriterium muss das zugehörige Feld mit angegeben werden.

Gruß, Manfred

#3

Besten Dank für den Tip.
Hallo Manfred,

Besten Dank für den Tip.
Funktionierte sofort!

Beste Grüsse