Kod:
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "Str(Nz[Evci_Cikan_ID]) " = " & Me![Liste491] & " '"
If Not rs.EOF Then Me.Bookmark = rs.BookmarkDim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "Str(Nz[Evci_Cikan_ID]) " = " & Me![Liste491] & " '"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark