Variante 1
' Button auf Formular ' Ereignis: Beim Klicken -> Makro-Generator (Eingebettetes Makro) ' Makro: SuchenNachDatensatz ' Aufnahme: Erster ' Bedingung: ="[FeldName] = " & Str(Nz([TextFeld.Text];0))
Variante 2
Private Sub btnSearch_Click()
TextFeld1.SetFocus
' Stringwert suchen, daher die ''
Me.Recordset.FindFirst "[TextSpalte] = '" & TextFeld1.Text & "'"
End Sub
Variante 3
Private Sub btnSearch_Click()
TextFeld1.SetFocus
' mit RecordsetClone suchen
' Stringwert suchen, daher die ''
Me.RecordsetClone.FindFirst "[TextSpalte] = '" & TextFeld1.Text & "'"
' Datensatzzeiger vom Recordset anpassen
Me.Recordset.Bookmark = Me.RecordsetClone.Bookmark
End Sub