اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

السلام عليكم

اخي ابوعمر75

ضع الكود ادناه في حدث قبل التحديث للنموذج

If MsgBox("هل ترغب في حفظ التعديلات ؟", vbYesNo + vbInformation + vbMsgBoxRight, "تاكيد الحفظ") <> vbYes Then
  Cancel = True
  Me.Undo
  Exit Sub
End If

واليك مثال على ذلك

بالتوفيق

CancelAutoSaving.rar

قام بنشر

اخي يوسف جزاك الله خير الجزاء وزادك علما وفهما المثال ممتاز جدا لكن اعذرني لكثرة الطلبات باقي شي بسيط وهو عند الخروج ف المثال اذا ظغط عدم الحفظ فقط يمسح السجل الاخير والمطلوب اذا كان الاختيار لا لايتم الحفظ في الرئيسي والفرعي وشكرا

قام بنشر

الاخ يوسف بارك الله فيك على صبرك واستحمالي كثرة الاسئله . لم يتغير شي و ملاحظاتي اولا

اعلى النموذج يجب ان لايسالني الحفظ او الالغاء

ايضا في الفرعي لايجب يسالني عن كل سجل فقط في الخروج والاغلاق

عموما انا استفدت من تعديلاتك واذا في امكانيه للتحسين والا جزاك الله خير

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information