السلام عليكم السؤال هو اننى اريد اضافة حدث لكل النماذج فى حدث عن التحميل اضافة كود فى بى فى حدث عند التحميل والكود هو call Color_V(me) وللتسهيل لقد وجدت كود اضافة استاذى @صالح حمادي ببرنامج انشاء شريط القوائم ولم اتمكن من تديلة وكان هذا هو الكود : DoCmd.OpenForm new_name, acDesign For i1 = 1 To nombre_subliste t = 0 + (453.5433070866) * (i1 - 1) ' الأعلى L = 0 ' اليسار Set crt = CreateControl(new_name, acCommandButton, acDetail, , , L, t, "1700.78740