Office: (Office 2016) Suchfunktion

Hi Kurt
Anfänger bin ich auch. Von Profis wie sehr viele hier, bin ich meilenweit entfernt.
Versuche mal folgendes: Der oberste Codeabschnitt bewirkt das du im Kombo NIX eingeben kannst.
Der 2. Abschnitt war ja vorhanden und bleibt so.

PHP:

         Private Sub Kombinationsfeld25_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyReturn, vbKeyTab
Case Else
KeyCode = 0
End Select
End Sub
Private Sub Kombinationsfeld25_AfterUpdate()
Den mit dem Steuerelement übereinstimmenden Datensatz suchen.
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[KundeID] = " & Str(Nz(Me![Kombinationsfeld25], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub


 

Hallo,

zu Code:

• aufräumen
• Laichen
• einrücken
• und vieles mehr

empfehle ich gerne MZ-Tools

Wer einmal damit arbeitet, möchte es nicht missen.

 

Guten Morgen LindaMcKinney,
danke für das Makro.
Leider kann man den ausgewählten Namen nicht löschen und natürlich Richtigerweise keine Nummer eingeben.

mfg
kurt

 

Was du hiermit gemeint hast habe ich dir als Beispiel Code gezeigt. Nur eben auf das Feld "Namen_suchen".
Der Code bewirkt das man in das Feld nichts rein schreiben kann sondern nur mit der Maus den gewünschten Eintrag wählt.
Das geht auch beim Feld "Nummer suchen" wenn man den Code ändert.
Das Ganze ist aber Unsinn, weil : Wenn du z.B. im Kombo den Buchstaben S drückst landest du sofort beim Kunden "Saal" und kannst dann weiter wählen.
Deswegen ist das "Sperren der Eingabe" nicht sinnvoll.
Du kannst eh keine Ziffern beim NAMEN eingeben oder Buchstaben im NUMMER Feld.

Vermutlich willst du vom Suchformular, nachdem du etwas im Rep.Text gefunden hast. zurück in deine KD Datenbank, genau auf dem aktuell gewählten Kunden springen.
Wenn nicht dann beschreibe mal genau was du willst.

Anfangs ging es nur um das "suchen" im Bereich "Reparatur_Text". Das geht ja sicher jetzt recht einfach.

 

Hallo
ein paar Denkanstöße wie ich es immer mache:

- In jeder Tabelle habe ich ein Feld "Suchstring". Da kommen alle Werte des jeweiligen Datensatzes hinein (getrennt mit " "). Durchsucht wird dann immer nur dieses Feld.
- Im Suchformular wird nach jedem Tastenanschlag die Suche ausgelöst. Dh. du hast eine spaltenübergreifende Echtzeitsuche mit jeder Eingabe.
- Das Feld Suchstring muss nur nach jeder Datensatzänderung aktualisiert werden.

 

Hi, Kurt
falls du noch interessiert bist, an deinem Projekt, schau dir das Beispiel (im Anhang) mal an.
Den Sperrcode hab ich entfernt. Du kannst jetzt mittels Button jetzt von einem Suchergebnis direkt wieder in deine KD_Datenbank springen und bist sofort beim richtigen Kunden.
Vorausgesetzt du hast den richtigen Datensatz im Suchformular auch markiert.

Denn bei einer Suche kannst du ja mehrere Kunden als Ergebnis bekommen.
Ob das erwünscht ist, weiß ich nicht, ist nur mal so ein Schuss ins Blaue. Die Codeleichen hab ich mal auskommentiert (amEnde)

Generell zu Post20:
Es gibt ne riesige Auswahl an Möglichkeiten Dinge zu bewerkstelligen. Aber einem Anfänger wie Kurt nutzen deine nett gemeinten Hinweise glaube ich nicht allzu viel. Es sei denn du baust im deine Lösung mal in seine DB ein.*Smilie

 

Hallo LindaMcKinney,
genau das habe ich gesucht !
Nummer anklicken und in die Orginal Datenbank springen,
klappt einwandfrei !!!
Recht herzlichen Dank für deine Mühe !

mfg
kurt

 

Servus Kurt K,
Dein Verhalten ist ein ganz typisches für zu kurz gedachte Konzepte.
Du suchst nach einer kleinen schnellen Suchmöglichkeit für nur einen Teil deiner Daten.
Danach fällt Dir ein, dass es doch auch schön wäre, wenn es auch eine Suchmöglichkeit gäbe in anderen Teilen Deiner Daten.
Plötzlich bemerkst Du im Laufe dieser Suchen, dass es auch wichtig wäre, wenn man in den Suchen auch die Möglichkeit hätte,
eine Suche zu haben, welche in mehreren Spalten nach pro Spalte einstellbaren Suchparameter funktioniert und
entsprechende Ergebnisse dann zeigt.
Dafür gibt es inzwischen seit Jahren das Filterformular von Bitsqueezer, welcher das so programmiert hat,
dass auch Access-Anfänger es sich installieren können und für ihre Belange einfachst anpassen können.
Wer Interesse hat, bekommt alle Codes offen mitgeliefert und darf sie problemlos anpassen.
Er bekommt eine einfache Bedienungsanleitung.
Ich bin kein Lobbyist von Bitsqueezer, aber überzeugt von seinem Filterformular und verwende es sei Jahren.
Schau's Dir doch einfach mal an.
Bitsqueezers Downloads
lade Dir dort: CCFilterV2_7
uhnd probier es mal sportiv aus.

 

Hallo Orchester,
dann für die Information und den Vorschlag.
Schönes Wochenende,

Mit freundlichen Grüßen
Kurt

 

Das ist aber sicher keine Absicht. Das geht sicher vielen Anfängern so. Auch mir.
Den CCFilter wollte ich Kurt auch schon warm ans Herz legen, aber ich denke das er damit nicht klarkommen wird.
Warte mal auf seine Info, ob er das Teil zum laufen bringt oder nicht.

Ich selbst benutze den CC Filter schon länger in vielen meiner Formulare mit Erfolg. Das beste daran ist die "OnChange" suche.*grins
(ich fand den CC Filter per Zufall in einem Beitrag)
Das Dingelchen hat aber auch seine Tücken. Man muss sich auch als Anfänger hier stark damit beschäftigen bevor er richtig funktioniert.

Ich glaube, so wie Kurt geht es vielen, die beginnen. Zuerst war das Huhn und später das Ei...usw.

Schönes Wochenende

 

Eine solche macht dann besonderen Spaß, wenn man es mit richtigen (größeren) Datenherkünften zu tun hat, wenn also nicht mehr das Lämmchen mit dem Schwanz wackelt, sondern dann eher der Schwanz mit dem Lämmchen ...

 

Der war gut*Smilie

OT.
Eine meiner kleinen Datenbanken hat 6 Tabellen+35 Abfragen+32 Formulare und zig Seiten Codes. Manches könnte man auch zusammenfassen, aber ist so wie es ist schön bequem.
Da ist schon etwas Überblick und System nötig.

Bei Kurt : > der Anfang ist schon mal lobenswert für ihn.*redface

 

Guten Abend,
habe mal ein Formular selbst erstellt, leider funktioniert es nicht,
wenn ich nach dem Ort suchen möchte.

LindaMcKinney, hatte mir ein super Formular erstellt: "Datenbanksuche" funktioniert,
mein Formular: "DatenbankOrtSuche" leider nicht.

Was habe ich verkehrt bzw. vergessen ?

mfg kurt

 

Wenn Du Dein Suchfeld OrtSuche mit dem umfangreichen Code
Code:

ausstattest - was erwartest Du?

 

Hallo Maxel,
entweder ich bin "Blind" bzw. habe das nicht verstanden.
Das ist doch genau so eingesetzt wie beim Reparaturtext.

mfg
kurt