تفضل
DoCmd.DeleteObject acQuery , Ql1"
هذا الكود غير حسب الآتي
acTable جدول
acForm نموذج
acMacro ماكرو
acModule وحدة نمطية
acQuery استعلام
acReport تقرير
اهلا بك ... حسب علمي القاصر ... اعتقد ان الكود افضل من حيث ثبات الامر . لان من تجربتي البسيطة قد يضرب الامر الموجود في الماكروا ... اما الفعل هو واحد ... وايضا الكود يعطيك مساحة اوسع في التحكم في الامر . والله اعلم
السلام عليكم ورحمة الله وبركانه
أخي الكريم مثالك بعد التعديل
طبعا قمنا بانشاء وحدة نمطية فيها التأثيرالمطلوب وبامكانك التعديل في الالوان حسب ماتراه مناسب لك ثم يتم استدعائه من أي نموذج تريدعن طريق حدث عند فتح النموذج ... بالتوفيق
اتمنى اني وفقت في الاجابة
Ka_test.accdb