Weitersuchen im Access Formular

In meiner Access-2.0-Datenbank benutze ich die Standardsuchfunktion (das Fernglas-Symbol) zum Suchen. Nun möchte ich jedoch die Schaltfläche zum Weitersuchen in das Formular einfügen, da das Fenster zum Suchen zuviel von meinem Formular verdeckt. Wie kann ich dies bewerkstelligen?

!Das hier vorgestellte Lösungsbeispiel benutzt die Tabelle Artikel aus der Beispieldatenbank NWIND.MDB von Access. (Unter Access 7.0 heißt diese Datenbank NORDWIND.MDB). Sollten Sie diese Datenbank nicht mit installiert haben, so installieren Sie sie bitte nach, damit sie das Beispiel einfacher nachvollziehen können.Legen Sie mit dem Befehl Datei - Neues Objekt erstellen - Formular ein neues Formular an. Wählen Sie dann die Tabelle Artikel aus und klicken auf die Schaltfläche Formularassistent. Im Fenster Formularassistenten wählen Sie die Option AutoFormular und klicken dann auf die Schaltfläche OK. Das nun automatisch von Access generierte Formular öffnen Sie in der Formularansicht mit dem Befehl Ansicht - Formularentwurf. Klicken Sie in der Toolbox mit den Design-Elementen auf das Symbol für Schaltfläche und zeichnen dann diese in den Formularkopf ein. Falls die Toolbox nicht eingeblendet ist, können Sie sie über das Menü Ansicht - Toolbox einblenden. Im Einzelfall kann es auch notwendig sein, den Zeichenbereich der Kopfzeile zu vergrößern.Blenden Sie dann das Eigenschaftsfenster über den Befehl Ansicht - Eigenschaften ein und ändern die Eigenschaften der Schaltfläche wie folgt:Name: Weitersuchen...Beschriftung: Weitersuchen...Beim Klicken: Ereignisprozedur \xDie Eigenschaft Beim Klicken unterlegen Sie mit folgender Ereignisprozedur, indem Sie auf die Schaltfläche mit den drei Punkten klicken: Sub Weitersuchen_Click () DoCmd GoToControl Screen.PreviousControl.name DoCmd FindNext End Sub. Nun können Sie das Weitersuchen in der Formularansicht testen. Wechseln Sie dazu die Ansicht mit dem Befehl Ansicht - Formular und klicken mit der Maus auf das Feld, in dem Sie suchen möchten (etwa Liefereinheit). Aktivieren Sie mit dem Befehl Bearbeiten - Suchen den Standardsuchdialog von Access. Geben Sie beispielsweise in das Feld Suchen nach das Wort gläser ein. Wählen Sie im Feld Vergleichen den Text Teil des Feldinhaltes aus. Stellen Sie außerdem sicher, daß die Option Formatierung beachten nicht aktiviert ist. Klicken Sie dann nacheinander auf die Schaltfläche Suchen und auf die Schaltfläche Schließen. Access sucht nun nach dem ersten zutreffenden Satz und zeigt ihn an. Wenn Sie jetzt auf die neue Schaltfläche Weitersuchen im Formular klicken, zeigt Access den nächsten zutreffenden Datensatz an.Möchten Sie den Standardsuchdialog von Access auch durch eine Schaltfläche ihres Formulars aufrufen, dann zeichnen Sie eine zweite Schaltfläche in der Entwurfsansicht des Formulars mit folgenden Eigenschaften ein:Name:Suchen...Beschriftung:Suchen...Beim Klicken:[Ereignisprozedur] \x Die Ereignisprozedur muß diesmal folgendermaßen aussehen: Sub Suchen_Click () DoCmd GoToControl Screen.PreviousControl.name DoCmd DoMenuItem A_FORMBAR, A_EDIT, 9 End Sub. In Access 7.0 können Sie das Problem ebenso lösen. Allerdings unterstützt Sie der Befehlsschaltflächen-Assistent, indem er beim Anlegen der Schaltfläche in der Kategorie Datensatznavigation schon die Aktionen Datensatz suchen und Weitersuchen anbietet.