title image


Smiley Besser kein FindRecord...
Halt:



Me!Ort.Setfocus

DoCmd.FindRecord X,acEntire, False,acSearchAll,False,acCurrent





Besser ist es aber, mit Filtern oder Bookmarks zu arbeiten:



Me.Filter = "Ort = '" & X & "'"

Me.FilterOn = True





bzw.



Dim RS As DAO.Recordset

Set RS = Me.recordsetclone

RS.Findfirst "Ort = '" & X & "'"

If not RS.Nomatch then Me.Bookmark = RS.Bookmark

Set RS = Nothing


Gruß aus dem Norden

Reinhard


Bitte immer die Access-Version angeben


 



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: