اغلاق التقرير

[sabmov]

السلام عليكم

لدى عدد من التقارير

اريد ان اضع فى شريط ادوات خاص بى زر او زر لمكرو لاغلاق اى تقرير مفتوح

وللجميع خالص الشكر مع اطيب الامانى بشهر رمضان الكريم

[يوسف أحمد]

وعليكم السلام ورحمة الله وبركاته

تفضل اخي الكريم

ارجو ان يكون هو المطلوب

db1.zip

[sabmov]

السلام عليكم

الاخ العزيز يوسف

تحية تقدير لشحصك الكريم فقد لبيت طلبى بسرعة

اشكرك مرة اخرى

ولى سؤال اخر.. ارجو الا اثقل عليك

كيف استعيد شريط القوائم

مع تمنياتى لك بمزيد من التقدم

[sabmov]

السلام عليكم

الاخ العزيز يوسف

تحية تقدير لشحصك الكريم فقد لبيت طلبى بسرعة

اشكرك مرة اخرى

ولى سؤال اخر.. ارجو الا اثقل عليك

كيف استعيد شريط القوائم

مع تمنياتى لك بمزيد من التقدم

[عمار زيد]

جزاك الله خيراً أخي يوسف على هذا الحل الرائع

وكل عام وأنت بألف خير

[يوسف أحمد]

اخي sabmov

اولاً استمر بالضغط على مفتاح الشفت اثناء فتح قاعدة البيانات

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

----------------------------------------------------

شكراً لك اخي عمار زيد على المرور وجزاك الله خيراً

كل عام والجميع بالف خير

[hegzy]

هل يمكن تطبيق المثال على النماذج أيضا

وشكرا

[يوسف أحمد]

نظراً لان نوع الكائن هو نموذج في هذه الحالة سيتم اغلاق النموذج النشط ايضاً مع باقي النماذج

استبدل الكود بالكود ادناه

Dim k As Integer
For k = Forms.Count - 1 To 0 Step -1
        DoCmd.Close acForm, Forms(k).Name, acSaveNo
Next k