Private Sub BtnGeri_Click()
'DoCmd.GoToRecord , , acPrevious
Me.Recordset.MovePrevious
End Sub
Private Sub BtnIleri_Click()
'DoCmd.GoToRecord , , acNext
Me.Recordset.MoveNext
End Sub
Private Sub BtnIlk_Click()
'DoCmd.GoToRecord , , acFirst
Me.Recordset.MoveFirst
End Sub
Private Sub btnSon_Click()
'DoCmd.GoToRecord , , acLast
Me.Recordset.MoveLast
End Sub
bu arada aşağıdaki kodlar da ben de sorunsuz çalıştı