Schnelle Suche per Kombinationsfeld

Detailansichten von Datensätzen wie zum Beispiel von Artikeln haben oft den Nachteil, dass man nicht mal schnell zu einem bestimmten anderen Datensatz wechseln kann. Nachfolgend finden Sie eine Lösung, mit der Sie per Kombinationsfeld auf die Schnelle den gewünschten Datensatz anzeigen.

Beispieldatenbank

Die Beispieldatenbank verwendet die Tabellen Artikel, Kategorien und Lieferanten aus der Nordwinddatenbank. Im Beispiel finden Sie ein Formular, dass ein Kombinationsfeld zur Auswahl von eines anderen Artikels enthält.

Per Kombinationsfeld zum gewünschten Datensatz

Abbildung 1 zeigt, wie eine Datensatzsuche per Kombinationsfeld aussehen kann. Im Formularkopf des Formulars befindet sich ein ungebundenes Kombinationsfeld, dass als Datenherkunft die beiden Felder Artikel-Nr und Artikel der Tabelle Artikel enthält. Das Formular selbst ist an die Tabelle Artikel gebunden und zeigt alle vorhandenen Felder im Detailbereich an.

Abbildung 1: Datensatzauswahl per Kombinationsfeld

Damit ein Artikel nach der Auswahl per Kombinationsfeld auch im Formular angezeigt wird, legen Sie für die Ereigniseigenschaft Nach Aktualisierung des Formulars die folgende Prozedur an:

Private Sub cboArtikel_AfterUpdate()

Me.RecordsetClone.FindFirst "[Artikel-Nr] = " & Me!cboArtikel

If Not Me.RecordsetClone.NoMatch Then

Me.Bookmark = Me.RecordsetClone.Bookmark

End If

End Sub

Die Prozedur sucht im RecordsetClone des Formulars nach dem gewünschten Datensatz und setzt den Datensatzzeiger des Formulars auf den gefundenen Datensatz - sofern denn einer vorhanden ist.