كريمو2

شكرا لك استاذ على الإصغاء وايجاد الحل مافهمت شيئا بالملف المهم حاولت توضيح اكثر من صورة الأكسل بالمرفق

اعجز الأساتذة عن معالجة طلبي ؟

وينك استاذ جعفر ...

لا اخي الكريم كيف تقول هذا ! انت كنت اخا رائعا في مساعدتك لي طوال سنوات واتمنى مانتحرم منك فبارك الله لك فيما مددت فيه يد المساعدة لإخوانك الحقول المعنية وهي : hiredate تاريخ التوظيف ejmaleEjazat الإستحقاق الإجمالي وهي التي بها المشكلة زيادة يوم او اكثر ودالتها على هذا المنوال : ejmaleEjazat: Int(((Date()-[hiredate])/7.3)) مدة الإستحقاق : aja_B " تنقص من قيمة الإستحقاق الإجمالي " نوعية الإجازة : ejazaID (بها عدة خيارات وشروط ) تجدها في جدول tblEjaza mhsop = "تنقص من قيمة الإستحاق" mhsop: DSum("aja_B";"TB_Ath6rary";"IDmozf=" & [IDmozf] & "And ejazaID<200") Unmhsop = " لا تنقص من قيمة الإستحاق" Unmhsop: DSum("aja_B";"TB_Ath6rary";"IDmozf=" & [IDmozf] & "And ejazaID>200") تاريخ نهاية العمل : هذا التاريخ يشترط ان توقف فيه زيادة مدة الإستحقاقات " لان العامل قد تم توقيف عمله "

مافيش مشكلة اخي الحبيب حقل الاستحقاق

الدليل واضج كل موظف يحتاج الى اجازة سنوية كل سنة 50 يوم هذه الإجازة تعطى له كاملة بعد قضاء سنة من تاريخ تنصيبه والصورة توضح اما بخصوص On Timer فلك صلاحية ان توقف مهامها المهم ايجاد حل استاذي العزيز جعفر وفقك الله لما يحبه ويرضاه

شكرا لك استاذي العزيز جعفر ... ممكن نجرب الفكرة على المرفق التالي حساب اجازة.rar

فيه معادلة اخرة يمكن استعمالها استاذي العزيز المفهوم المطلوب الإجازة السنوية تقدر ب 50 يوم كل سنة من تاريخ التوظيف يعني بمقدار كل شهر 4.16 يوم 4.16 يوم × 12 شهر = 49.92 يوم وليست 50 يوم وهنا المشكلة

وهو كذالك اخي شيفان بارك الله فيك هل تم التعديل في مربع التحرير PTetatCivil لم يترك غير منظم

السلام عليكم تحية طيبة بناء على المواضيع التي تحدثت عن الاجازات وخاصة هذا الموضوع لم اتمكن من ضبط الاستحقاق بالصورة الصحيحة آمل مساعدتي جزاكم الله خيرا ejmaleEjazat: Int(((Date()-[hiredate])/30)*4.16) كلما دخلت سنة جديدة تزيد مدة الإجازة يوم نعرف ان قسمة 50/12 تساوي 4.16667 هل من كود اخر يعطي 50 يوم كل سنة

نعم تم التصحيح ولكن يوجد لخبطة في الفورم انظر الصورة هل اترك مربع النص " PTetatCivil " غير منظم يبدو ان المشكلة فيه

نعم هو المطلوب ولكن وقع مشكل في إضافة منحة منصب لعامل ما عند تخصيص منصب شغل في مربع التحرير والسرد 'منصب الشغل للحالة المدنية ' يظهر مشكل لاحظ الصورة

لا بالعكس اخي شيفان كل اريده هو الحذف من الجدول

لاحظ الصورة وتمعن المطلوب سامحني اخي شيفان اثقلت عليك

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

اخي شيفان اتضح لي انه عندما يتم الغاء المنصب في الفورم لم يتم الحذف في الجدول فكيف ذالك ؟

شكرا لك اخي شيفان انا كنت ابحث في الفورم وليس في الجدول والصورة ادركتني بأني كنت خاطيء اسمه بالعربي 'السماح يطول صفري'

وحدد حقل PTetatCivil وغير خاصية Allow Zero Length الى yes Allow Zero Length ما اسمها بالعربية ؟

شكرا اخي شيفان ولكن بقي عندما ننزع المؤشر في خانة الإختيار لايتم المسح في مربعات التحرير والسرد 1 و 3

السلام عليكم إخواني الصورة والمرفق يوضح المطلوب ارجو منكم المساعدة دالة شرطية.rar

نعم هو المطلوب استاذي العزيز جعفر

شكرا لك استاذ جعفر الكود يعمل صحيح اما بالنسبة للفورم "إستفسار" عملت هذا الكود عند بعد التحديث في مربع السرد Question ولكن يبدو انه لايفي بالغرض امطلوب Private Sub Question_AfterUpdate() If Me.Question.Value = "أسباب اخرى" Then Me.Autre.Visible = True Else Me.Autre.Visible = False End If End Sub

السلام عليكم ممكن مساعدة بخصوص اخفاء مربع تحرير وسرد بالتقرير بشرط كما في الصورة تلوين مربع نص.rar

هل الأساتذة عجزو عن تلبية المطلب ؟

لا نفقد الامل