abedgo قام بنشر نوفمبر 11, 2018 مشاركة قام بنشر نوفمبر 11, 2018 السلام علسكم أعظاء المنتدى الكرام لي طلب عندكم وإن شاء الله أجد جوابا له أريد كود يغلق لي كافة النماذج المفتوحة ثم يفتح لي بعد ذلك نموذجا محدد وجزاكم الله خيرا رابط هذا التعليق شارك More sharing options...
kanory قام بنشر نوفمبر 11, 2018 مشاركة قام بنشر نوفمبر 11, 2018 تفضل .... Dim FormCount As Integer Dim i As Integer FormCount = Forms.Count For i = FormCount - 1 To 0 Step -1 If Forms(i).Name <> FormName Then DoCmd.Close acForm, Forms(i).Name End If Next i DoCmd.OpenForm "kanory" 1 رابط هذا التعليق شارك More sharing options...
abedgo قام بنشر نوفمبر 11, 2018 الكاتب مشاركة قام بنشر نوفمبر 11, 2018 جزيت خيرا الكود شغال 100% رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان