Taher DZ

والله اتعبتك استاذي - سامحني - لا شي تغير فما مشكلة منعرف اين تكمن اساتذتي الكرام ارجو منكم ان تمرو على الموضوع عسى لديكم العصا السحرية لحل هذا الاشكال الذي ارهق الاستاذ Foksh وهو بدوره مابخل من تجارب وهو مشكور على ذلك وبارك الله فيه على المجهود المبذولة ولكن لم نصل معا الى حل نهائي

بارك الله فيك استاذي العزيز Foksh نتمنى من الاخوة الاساتذة مراجعة الموضوع حتى يتسنى لنا الخروج بحل

هاو استاذ ماعملت شيء غير فتحت المرفق وهذا بعد المسح المعلومات المؤجلة وتنفيذ الكود بجهازي

استاذ ي العزيز ممكن إرسال نسخة بها التأجيل اي اعمل تأجيل لمدة مثلا 3 اشهر ابتداء من تاريخ 2025/05/01 لكي اقارن ملاحظة غير تسمية النسخة لى اسم اخرا

ياسبحان الله والله شيء غريب حقا الفيديو به المطلوب 100 % اما المرفق فلا تغيير عليه واني لا اشك ان الاصدار اوفيس 2010 هو السبب عموما سامحني استاذ على تعبك واهتمامك الكبير بالموضوع نتمنى من الاخوة الاساتذة معالجة هذا الشيء

تقبل الله منا ومنكم سائر الاعمال وكل عام وانتم بالف خير لم إفهم اي تنسيق تقصد وثاني كلمة wada3 = "تم التأجيل" لم اراها في الكود المهم بعد التجربة الاشهر الاقتطاع المعفاة لم يتغير المبلغ الى 0 ومع الوضعية السداد لم تكتب " تم التأجيل"

استاذ ممكن اعرف أين تم التعديل من حضرتك لان حسب الصورة الي ارسلتها مؤخرا هو المطلوب ولكن المرفق مابه اي تغيير

تقبل الله منا الصيام والقيام وكل عام والامة الاسلامية بالف خير

اي صورة صورتك التي ارفقتها ام صورتي

العمل الصحيح كما في الصورة علما ان اشهر التاجيل شهر 5 و 6

استاذي لقد غيرت كلمة And ب Or واصبح الكود يدخل للجميع اي يوافق على منح المنح للكل حتى اذا ظهر لك الميساج لايمكنك الاستفادة يخرج بعدها ميساج هل تريد تثبيت المنحة

جربت مسحت التاجيل ونفذت الكود وبقي نفس المشكلة استاذ مع العلم ان اصدار اوفيس 2010

حسب الصورة الاولى هو المطلوب استاذي ساجرب المرفق واتبع خطوات الكود وسارى النتيجة بعد حين

عفوا استاذ لم انتبه للمرفق لقد تم تحميله وهاهي النتيجة مزال ناقص تعديل

شكرا استاذ على الرد من قبل كان الكود يضيف السجلات المؤجلة ليست المشكلة هنا انظر لما نسخت الكود ونفذته "تاجيل لمدة 02 اشهر ابتداء من تاريخ : 2025/04/01 " ايش سوى حسب الصورة

ان شاء الله استاذ

شكرا استاذي العزيز ربي يبارك فيك الكود يزيد عادي عذذ السجلات التي تعطيها له ولكن المشكلة عندما يزيد عدد السجلات يزيد المبلغ وهذا هو الخطا يلزم الاشهر المعفاه تبحول مبالغها الى 0 ويكتب عند السداد تم تأجيل وتعوض مبلغها عند السجلات الجديدة والصورة هي المطلوب

السلام عليكم اساتذتي بالمرفق يا حبذا التعديل على كود اعادة ترتيب الاقتطاع (تاجيل الاقتطاع لمدة زمنية معينة) اولا الدخول على فورم FrmCridi نلاخظ العامل كريمو4 لديه قرض بقيمة 50.000.00 دج بداية الاقتطاع : 2025/03/01 نهاية الاقتطاع : 2025/12/01 وتم اقتطاع شهرين مارس وافريل 2025 مثلا وطلب مني تاجيل الاقتطاع لمدة 02 اشهر ابتداء من تاريخ : 2025/05/01 (زر اعادة ترتيب الاقتطاع) المطلوب اضافة تعديلات على الكود ليصبح عند الشهرين المؤجلين 2025/05/01 قيمة الاقتطاع كانت 5000.00 قبل التأجيل وتصبح 0.00 بعد التأجيل ويكتب في وضعية التسديد "تم التأجيل" 2025/06/01 قيمة الاقتطاع كانت 5000.00 قبل التأجيل وتصبح 0.00 بعد التأجيل ويكتب في وضعية التسديد "تم التأجيل" والصورة توضح مع العلم ان الكود حاليا يشتغل كما في الصورة تأجيل الاقتطاع.rar

اساتذتي الكرام حاولت اعمل تعديلات في Msg وفلحت فيها الا ان النهاية مؤسفة الميساج يقول يمكنك الاستفادة وفي الاخير الكود يرفض هل من تعديل على القاعدة وشكرا Taher_20250325.rar

وهذا لم تجيني عليه ام فيه عمل شاق استاذي العزيز

شكرا استاذ على التعديل الصحيح الان استاذي العزيز القيم المالية 3000 و 1500 قهي ربما تكون غير ثابتة مستقبلا فكيف يتم جلبها من الجدول بدلا من كتابتها في MsgBox تقليدي message = "عزيزي المنخرط(ة)، يمكنك الاستفادة من " & menhaType & ": " & menhaName & Etar & " حتى تاريخ 30/06 للعام الحالي لأنك سددت 3000 للعام السابق و1500 لشهر مارس للعام الحالي." صح لسانك استاذي الاكسوارات على صاحب البرنامج فعلا ولكن ياريت تجربة لهذه الدالة vbMsgBoxRight على الاقل حتى لميساج واحد وا لباقي اكمله بنفسي وشكرا لكم

شكرا استاذتي على الرد ولكن عند ظهور هذا الميساج ومن خلالة يقول أنه لايمكن الاستفادة بعد تاريخ جويلية لاحظ عند الضغط على زر موافق سيخرج لك ميساج هل تريد تثبيت تاريخ المنحة وهنا النقص في الكود واذا تم التعديل فياريت ارفاق القاعدة المعدل عليها للتجربة اما رد الاستاذ Foksh بحصوص ضمان عرض الرسالة بشكل منطقي وسهل القراءة ، اعتقد اضافة الجزء vbMsgBoxRight لتحويل نص الرسالة من اليمين الى اليسار كقراءة لللغة العربية سيكون أفضل أيضاً فياريت مبادرة منك استاذ لانه في الحقيقة صعب تحويل النص بالعربية بالموديل وشكرا لكم

وياريت كتابة شهر مارس او جويلية في MsgBox تكون مصدرها الجدول tbl،_loans و بالاخص حقل Month(Paiment_Month)لانه فيه تاريخ بداية دفع الانخراط

شكرا استاذ على الاهتمام والتعديل استاذ انت عدلت على msgBox فقط ولم تتطرق الى تنفيذ الكود بموافقة منح " المنحة او رفضها" حسب الشروط لاحظ الصورة كعينة MsgBox يقول احقية الاستفادة الى غاية 2025/06/30 اي بعد هذا التاريخ لايحق له وانظر تاريخ الجهاز 2025/07/23 ونلاحظ الكود ينفذ اعطاء المنحة "فما تناقض" وكأن شيء لم يكن اتمنى انك فهمت النقائص وشكرا

شكرا استاذي العزيز على التعديل وحمد لله على سلامتك والله وحشتنا جربت الكود بعد مارس 2025 وبعد جويلية 2025 حسب التعديل الصحيح غير في كريمو1 و كريمو 2 والاخطاء في : كريمو3 لايستفيد عند دخول شهر جويلية وبعده كريمو4 لايستفيد عند دخول شهر مارس وبعده كريمو5 لايستفيد عند دخول شهر جويلية وبعده كريمو6 يكون مثل كريمو2 ولكن الميساج يتغير بشهر جويلية آمل ان اجد حلا في القريب العاجل