Datensatzsuche

Hallo zusammen,

komme einfach nicht weiter, hoffe ihr könnt mir helfen.

Habe eine Tabelle und ein dazugehöriges Formular erstellt.
Über einen Button möchte ich nach einem Bestimmten Datensatz suchen was mit folgendem Code auch funktioniert:

Dim strText As String
strText = InputBox(„Patientenname eingeben“, „Nach Patientenname suchen“)
If strText „“ Then
Me.Filter = „Patientenname LIKE '*“ & strText & „*’“
Me.FilterOn = True
End If

Es soll nun möglich sein, über ein Kombinationsfeld auszuwählen ob nach dem Patientenname oder dem Besitzer gesucht werden soll.
Auswahlmöglichkeiten im Kombinationsfeld sollen sein:

  • Patient
  • Besitzer

Nach Klick soll nun die entsprechende Inputbox erscheinen in der man den Suchbegriff eingeben kann.

Kann mir da jemand helfen?

Gruß

SV2709

Hallo,

Es soll nun möglich sein, über ein Kombinationsfeld
auszuwählen ob nach dem Patientenname oder dem Besitzer
gesucht werden soll.
Auswahlmöglichkeiten im Kombinationsfeld sollen sein:

  • Patient
  • Besitzer

Nach Klick soll nun die entsprechende Inputbox erscheinen in
der man den Suchbegriff eingeben kann.

Dim strText As String

Dim strText As String
If Me!Kombi1=„Patient“ then
strText = InputBox(„Patientenname eingeben“, „Nach Patientenname suchen“)
If strText „“ Then
Me.Filter = „Patientenname LIKE '*“ & strText & „*’“
End If
ElseIf Me!Kombi1=„Besitzer“ then
strText = InputBox(„Besitzername eingeben“, „Nach Besitzername suchen“)
If strText „“ Then
Me.Filter = „Besitzername LIKE '*“ & strText & „*’“
End If
End If

Me.FilterOn = True

Viele Grüße vom Bodensee
Franz , DF6GL

PS: Feedback erwünscht!

Hallo,

hier in den FAQ:2768 findest du eine Lösung für das Suchen in einem Formular.

Deine jetzige Version mit Inputbox als Filter finde ich nicht so sinnvoll.

Wenn du nach unterschiedlichen Dingen suchen willst, erstelle einfach zwei Kombifelder, oder schalte die Datenbasis für ein Kombifeld per Taste (VBA Code) um.

Grüße aus Rostock
Wolfgang
(Netwolf)

Hallo,

vielen Dank für die schnelle Hilfe.
Es funktioniert wenn man „Patient“ auswählt. Dann erscheint die Inputbox und der Datensatz wird angezeigt.
Wenn allerdings „Besitzer“ ausgewählt wird, erscheint zwar auch die Inputbox, aber nach Eingabe des Namens und klick auf OK erscheint erneut eine Inputbox in der man einen Parameter eingeben soll.
Gibt es dafür Abhilfe?

Danke und Gruß

SV2709

Hallo,

vielen Dank für die schnelle Hilfe.
Es funktioniert wenn man „Patient“ auswählt. Dann erscheint
die Inputbox und der Datensatz wird angezeigt.
Wenn allerdings „Besitzer“ ausgewählt wird, erscheint zwar
auch die Inputbox, aber nach Eingabe des Namens und klick auf
OK erscheint erneut eine Inputbox in der man einen Parameter
eingeben soll.
Gibt es dafür Abhilfe?

sicher…

die zweite „Inputbox“ dürfe das „Parameterfenster“ sein…

Gibt es denn das Feld „Besitzername“ überhaupt (in der Datenherkunft des Forms)??

Viele Grüße vom Bodensee
Franz , DF6GL

PS: Feedback erwünscht!

Hallo…

Nachdem ich das Feld „Besitzername“ entsprechend umbenannt habe funktioniert es problemlos.
Vielen Dank für die Hilfe…

Sascha