Hallo,
Versuche es mit mit einem RecordsetClone.
set rst = Form_frmFahrzeugBuchungen.RecordsetClone
Andere Frage, warum verwendest du eine Prozedur in einem allgemeinen
Modul, wenn du da nicht auch das Form parametrisierst?
Ich verwende dieses
Public Sub Bookmarken( _
ByVal frm As Form, _
ByVal varID As Variant, _
ByVal edFeld As String)
'---------------------------------------------------------------------------------------
' Parameter : frm = aufrufendes Formular
' : varID = DatensatzID bzw. Suchbegriff (muss nicht unbedingt PK sein, deshalb Variant)
' : edFeld = Feld in dem die ID (bzw. der Suchbegriff) steht
' : damit ist man auch unabhängig vom PK bzw. vom Datentyp des durchsuchten Feldes,
' : da man in jedem Feld suchen/finden kann
Dim strKrit As String
Dim rst As DAO.Recordset
Set rst = frm.RecordsetClone
strKrit = BuildCriteria(edFeld, rst.Fields(edFeld).Type, "=" & varID)
rst.FindFirst strKrit
frm.Bookmark = rst.Bookmark
Ende_CleanUp:
On Error Resume Next
rst.Close
Set rst = Nothing
Exit Sub
End Sub
gruss ekkehard