On Error GoTo Err_Komut27_Click DoCmd.GoToRecord , , acNext Exit_Komut27_Click: Exit Sub Err_Komut27_Click: MsgBox Err.Description Resume Exit_Komut27_Click