ارغب فى كود VBA
لحفظ البيانات
و فتح سجل جديد
تفضل أخي العزيز .. ولزيادة الخير وضعت لك أكواد جميع الإجراءات الأساسية :
الإجراءات الإعتيادية للسجلات ( حفظ - جديد - حذف - إضافة - تكرار - التالي - السابق - الأول - الأخير - .....)
'===================================== حفظ السجل والذهاب لسجل جديد
Private Sub SaveRecBtn_Click()
On Error GoTo Err_SaveRecBtn_Click
DoCmd.RunCommand acCmdSaveRecord
DoCmd.GoToRecord , , acNewRec
Exit_SaveRecBtn_Click:
Exit Sub
Err_SaveRecBtn_Click:
MsgBox Err.Description
Resume Exit_S