أخ مصلح جزاك الله خير على المثال. بس فيه أختلاف عن مرادي , شوف أنت كاتب أيه في الكود :
If Me.lesson_id = R2 And Me.day_id = R3 And Me.classroom_no = R4 Then
MsgBox "áÇ íãßä ÊßÑÇÑ ÇáÈíÇäÇÊ ", vbMsgBoxRight, ""
DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70
الرسالة تفيد أن الحقول مكررة . والأجراء المتخذ هو Undo .
أنا عايزة أترك حرية الأختيار أما
DoCmd.GoToRecord , , acNewRec أو
DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70
يعني تضيف السجل أو تتراجع . مش كذا أحسن !!!
حاولت تعديل الكود بس ماتوفقت . فهل من الممكن وفضلا وليس أمرا بعمل ذلك .