Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

Formular durchsuchen und Ergebnisse anzeigen

Begonnen von pkoenig, August 30, 2011, 08:23:30

⏪ vorheriges - nächstes ⏩

pkoenig

Hallo.
Ich hab ein Formular, in das eine Abfragetabelle integriert ist.
Ich hätte gern eine Suchfunktion, die alle Felder aller Datensätze durchsucht und dann in der Tabelle alle Felder anzeigt, die den gesuchten Begriff enthalten. Ich bastle schon lange an einer Makrolösung aber bisher hatte es nicht den gewünschten Erfolg.
Könnt ihr mit weiter helfen?

Grüße

Jonny

Hallo,
wie hab ich das zu verstehen, dass in ein Formular eine Abfrage sein soll?
Oder hast du ein Formualar basierend auf eine Abfrage?
Willst du eine Funktion die einen Wert sucht und bei gefunden einen DS erzeugt?

Grundsätzlich wirst du mit Makro´s deine Probleme bekommen. Ich rate immer dazu sich
nicht mit den Makro´s groß aufzuhalten sonder direkt in VBA einzuarbeiten.

Gruß

Johann

pkoenig

Ok, Sorry, ich hab mich da zu unklar ausgedrückt :D
Im Anhang ist der Aufbau meines Formulars zu sehen. Ich habe ein Textfeld und einen Suchen-Button. Wenn ich beispielsweise im Nach "4" suche, soll nur der Datensatz mit der Nummer 4 angezeigt werden, da im Datensatz 6 nirgends "4" vorkommt.
Versteht man das?
Und in VBA kenn ich mich bisher leider nicht aus, deswegen die Makros

Danke

Philipp

[Anhang gelöscht durch Administrator]

Jonny

Hallo,
wirklich alle Felder im DS oder kann man das einschränken auf bestimmte Felder?
Es besteht die Möglichkeit hier mit einen Filter zu arbeiten der viele oder bekommen würde.
Dabei muss aber jeweils der Feldtyp bekannt sein.
Ansatz:
Dim ZwFilter as String
ZwFilter = "Textfeld like '" & deinSuchfeld & " or Zahlenfeld like " & deinSuchfeld " or usw.
me.Filter = ZwFilter
me.Filteron = true
und das alles beim Ereignis "Nach Aktualsierung" vom Suchfeld.
Bei Zahlenfelder kann es da zu Probleme führen.
Datumsfeld können aber so nicht gefunden werden.

Gruß

Johann

pkoenig

Na mal schauen ob ich das hinbekomme!
Danke erstmal! :)