Private Sub btn_mttamam_Click()
.....
......
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
DoCmd.GoToRecord , , acNewRec
DoCmd.Close acForm, "Frm_Caritanitimkarti"
' DoCmd.OpenForm "Frm_Carilistesi"
' Forms!Frm_Carilistesi!cm_liste.Requery
MsgBox "Bilgiler Başarıyla Kaydedildi.", vbInformation, "İşlem Tamam"
End Sub
bu kodun
DoCmd.GoToRecord , , acNewRec
bunu kaldır
