Hallo!
Hallo!
ich habe ein Problem und komme nicht weiter. Ich möchte in
einem Formular einen Button einfügen, der es mir ermöglicht,
direkt zu einem anderen Datensatz zu springen, den ich vorher
in ein Feld eingegeben habe. Jeder Datensatz ist eindeutig
gekennzeichnet (lfd. Nr.). Welche Möglichkeiten gibt es dazu?
Leider hab ich so gut wie keine Ahnung von Visual Basic.
Probier mal folgendes Makro an die Schaltfläche zu binden (Ereignis: beim Klicken) :
Private Sub SpringeZuDatensatz\_Click()
Dim a As DAO.Recordset
Set a = Me.RecordsetClone
a.Findfirst "[Nummer]=" & Me!SuchNr.Value
If Not a.NoMatch Then
Me.Bookmark = a.Bookmark
Else
MsgBox "Datensatz nicht gefunden!"
End If
a.Close
Me!SuchNr.Value = ""
End Sub
[Nummer] ist der Feldname der zu durchsuchenden Nummern in der zugrundeliegenden Tabelle. „SuchNr“ ist der Name des Formularfeldes, in dem die Suchnummer eingetragen wird. Ggf. musst Du diese Bezeichnungen noch anpassen.
Du musst anschliessend noch unter Extras->Verweise die Microsoft DAO 3.6 Bibliothek aktivieren, dass das Makro läuft.
Viel Spaß beim Probieren und
viele Grüße, tester!