كود لغلق نموذج

[أبو سلمى]

الاخوه الكرام / أعضاء المنتدى 

برجاء كود خاص يعمل على غلق النموذج اذا كان غير نشط 

بمعنى عند فتح نموذج وليكن A وبعد ذلك اذا قمت بفتح النموذج B اريد غلق النموذج الاول A  تلقائيا مع حفظ التعديلات التي قمت بعملها

وجزاكم الله خيرا 

[ابوخليل]

الافضل جعل النموذج منبثق ومشروط

وحينها لا يمكن الانتقال الى اي كائن او عنصر في البرنامج الا بعد غلق النموذج الحالي

 

اما اذا فتحت نموذجا من زر داخل نموذج وتريد ان تغلق الاول فاكتب في حدث الزر  السطر التالي :

DoCmd.Close acForm, Me.Name

[أبو سلمى]

أستاذي وأخي الحبيب / جزاكم الله خيرا على مساعدتكم 

ولكن لي طلب آخر

هل يمكن جعل هذا الكود في ماكرو حتى لا أقوم بتكراره مع عدة نماذج بحيث أضع الماكرو في حدث للنموذج أو للتقرير وجزاكم الله خيرا 

بمعنى عند فتح أي نموذج أو تقرير يقوم مباشرة بغلق النموذج (او التقرير) النشط المفتوح حاليا ويفتح نموذج معين ثابت وليكن صفحة البداية للبرنامج وهكذا مع جميع النماذج والتقارير

وجزاكم الله خيرا