kkhalifa1960

لم أفهم طلبك ........................................... لا تبخل بالشرح وأنا ماعندي حل للنموزج المستمر أكثر من الذي عملته سابقاً .

تفضل استاذ @sabry fahmy المرفق الجديد وبه ماطلبت وأي شء أخر أنا حاضر .. ووافني بالرد . Sabry_Fahmy_Last.rar

تمام جاري العمل .

ابشر جاري العمل . ولكن لديا سؤال بالنسبة للتواريخ هل تريد حساب كسر الشهر يساوي شهر أم الحساب باليوم . .............. أم نشيل التاريخين ونخلي بدلا منهم عدد الاشهر . رجاء موافاتي سريعاً .

تقضل استاذ @ابو عبد الرحمن اشرف الشرح والكود . Private Sub txtFrom_AfterUpdate() If Me.txtFrom > Me.txtTo Then MsgBox "يجب تاريخ النهاية يكون اكبر من أو يساوي تاريخ البداية", vbCritical Undo Exit Sub End If End Sub Private Sub txtTo_AfterUpdate() If Me.txtFrom > Me.txtTo Then MsgBox "يجب تاريخ النهاية يكون اكبر من أو يساوي تاريخ البداية", vbCritical Undo Exit Sub End If End Sub

بعد اذن استاذنا @ابوخليل تفضل استاذ @sabry fahmy مشروع كامل بطلبك ادرسه جيداً . ووافني بالرد . Sabry_Fahmy.rar

ابشر وعندي محاولات شغال عليها لتوحيد التقرير لكن عطني وقت .

استاذ @طاهر اوفيسنا أنا حاولت ولم أفلح فلابد من أربع تقارير وإليك النسخة المعدلة . 9acer3-2.rar

استاذ @BRAHIM Ben aissa في النموذج المستمر لا يمكن استخدام Visible = False لذا نستخدم (Conditional Formatting)

تفضل استاذ @طاهر اوفيسنا آخر محاولاتي . ووافني بالرد . 9acer3-1.rar

مهندستا @Eng.Qassim ماانتبهت للحقل الحسابي .... وجزاكم الله كل الخير . تفضل استاذ @RAIANESAMI المرفق وبه النسختان . BRAHIMBenAissa-3.rar

ابشر وعطني فرصة لباكر .

استاذ @RAIANESAMI

لاتنسى الضغط على تمت الاجابة على مشاركتي حتي يعم الخير لغيرك .

اليك المرفق بعد التعديل بالطلب 3 أما الطلبان 1 و 2 عدل استعلامات التقارير لينتج طلبك . 9acer-2.rar