عمر ضاحى

الاستاذ Barna اول حاجه هو عملها انه حول نظام التاريخ بهذه الدالة D: Format([date1];"dd/mm/yyyy") ثم قام بوضع الشرط Between #01/01/2021# And #10/01/2021# للتصفيه واظهار النتائج طبعا انت ممكن تستبدل التاريخ باسم حقل فى نموذج عندك علشان تقدر تغير فى التواريخ لكن انتبه من التاريخ الاصغر والاكبر فى الترتيب فانت لما تقوم بالنقل قم بنقل الدالة والمعيار معا

السلام عليكم اساتذتي الكرام كما هو موضع من عنوان الموضوع طلب عمل استعلام لجمع اوقات الاضافى للموظفين وحساب مستحقاتهم من الاضافى اريد ان اعرف ليه مش قادر اعمل كده انا جربت اعمل استعلام جمع لكن معرفتش اوصل للنتيجه من الممكن اكون باعمل استعلام خطأ انا اريد ان اوصل للحل (اسم الاستعلام المراد تعديله هو SumOTandAppsent ) مرفق برنامج مع اخر تعديل تم فيه حتى الان حضور وانصراف موظفينV2010.rar

ربنا هداني للصيغه دي واستطعت حل مشكلة الاضافى فى الاستعلام OTH: IIf([T_WHours]-9>0.8 And [T_WHours]-9>0;[T_WHours]-9;"0") مع انى جربت اعملها كده بس فى الاول ما ظبطة معايا الحين تعمل كويس

اتفضل اخى الكريم انا عملتها بنفس طريقة فى الموضوع هذا اعلان.accdb

الحمد لله عرفت اوصل لاصل المشكله وحليتها لكن باقى معايا انى اطلع ارقام اضافى صحيحه مثلا اذا كان الاضافى اقل من 1 ساعه مثل يعطينى القيمه صفر 0 عاوز اعمل عمود تكون قيمته 8 او 9 حسب الايام ( يوم الخميس 8 و يوم الجمعه 9) علشان اقدر اطرح هذا الرقم من اوقات العمل واكمل باقى العمليات الحسابيه مرفق الملف بعد حل المشكله التى كنت واقع فيها حضور وانصراف موظفينV2010.rar

تم بحمد الله اعادة بناء البرنامج على اوفيس 2010 علشان باقي الاعضاء وبالنسبه للاستعلام الذى كنت اتحدث عنه هو موجود فى هذا البرنامج المرفق باسم PrintDowam1 ؛ فانا بحاجة الى اصلاح الداله الموجوده او ايجاد طرق تكون ايسر لى علشان اقدر استفاد من الاستعلام فى امور اخري حضور وانصراف موظفينV2010.rar

انا محتاج احسب الاضافى فى استعلام انا ظبطتها فى الفورم لكن لما حبيت اطبق على الاستعلام اداني نتائج غريبه مريبه كده 😅 وارقام فلاكيه بس انا عاوز الداله اذا كان الاضافى بالسالب او بالموجب فترة ربع او نصف ساعه يعطينى النتيجه صفر واذا كان اكبر يعطينى النتيجه كيف اعمل ده ؟

طيب هو بداية الاسبوع عندك يوم ايه ؟

اولا باشكر حضرتك بس مش عارف ليه مش شغاله جربت انى احط رقم اخر غير رقم 5 برضه مفيش تغير هو انا لما غيرت الرقم الى 2 اشتغل بس ليه !! كيف يوم الخميس عندي هو رقم 2

استاذي @ناقل ممكن بعد اذن حضرتك اذا لم اثقل عليك اريد ان اضيف شئ فى الكود ان يراجع تسجيل الانصراف اذا كان اليوم الخميس يسجل مثلا انصراف للجميع الساعه 3 عصرا اما باقي الايام يسجل 4 بعد العصر كيف ممكن اعمل ده

هذا هو المطلوب الله يبارك فيك وفى جميع احبابك واهلك والمسلمين جميعا

انا حاليا جاري اعادة بناء البرنامج من جديد على اصدار 2010

هل فى طريقة لتحويلها الى 2010 ؟

اولا باشكر حضرتك على الرد ثانيا بالفعل انا عامل كده انا هرفع المشروع كامل علشان الباقى يستفاد منه حضور وانصراف موظفين.rar

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

up

السلام عليكم بعد اذن اساتذتي المحترمين حفظكم الله فى نموذج عندي لحضور وانصراف الموظفين كنت عاوز اعمل مفتاح لتسجيل الحضور للجميع او الانصراف للجميع مره واحده وانا باقوم بالاتى (خطوات العمل) اولا اراجع الغياب للموظفين واسجله وهذا من اختيارى لمربع اختيار(نعم / لا ) اسمه فى البرنامج Emp_ABSCENT ومن ثم اقوم بتسجيل الحضور للباقى اريد ان ابرمج مفتاح عند الضغط عليه اولا ينظر الى الاختيار غياب هل تم التأشير عليه بنعم ام لا فى حالة لا يقوم بتسجيل الحضور للموظف ويكرر هذا تلقائيا ما باقى الموظفين فى النموذج جربت استخدم هذا الكود txtTimeIn.Value = Time لكنه بيسجل لموظف واحد فقط كيف استطيع تنفيذ هذا الكود لجعله يسجل للجميع مره واحده ولكم جزيل الشكر

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

up

تم حل مشكلة عدم تكرار التسجيل باستخدام دالة If DLookup("date()", "Dwam_Emp_ALL", "Dwam_Date=date()") = Me.Date_today Then MsgBox "áÞÏ ÓÈÞ ÇáÊÓÌíá åÐÇ Çáíæã ãä ÞÈá", vbCritical, "ÇäÊÈå" Else مش عارف اذا كان هناك اشياء افضل من هذا لكن ده ال قدرة افكر فيها الان

باشكر حضرتك على المداخلة ومحاولة مساعدتي لكن كنت اريد ان اتعلم حلها بدل من نسخها

السلام عليكم الحمد لله الذاكرة رجعتلى شوي ^_^ وعرفة اعمل موضوع الحضور والانصراف نموذج باسم ( frm_DwamToday ) لكن محتاج احسب مدة العمل والاضافي حسب فترة العمل الطبيعيه (هناك جدول به فترة العمل خلال الاسبوع باسم (WorkingTime) ) وايضا اريد حساب التأخير مرفق الملف باخر حالة توصلتلها وبعد التحديثات التى عملتها حتى يستفاد منها باقي الاعضاء بالمنتدي واريد ان ابرمج (2 مفتاح لتسجيل الحضور والانصراف للجميع مره واحده) وايضا اريد لما اقوم بالضغط على مفتاح تحضير او ترحيل ويظهر لى القائمة من جديد ان يسجل لى تاريخ اليوم فى مربع التاريخ Date واذا كان قد سبق التحضير والترحيل للهذا اليوم ان لا يحضره مره اخرى حضور وانصراف موظفين.rar

up

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

السلام عليكم مرفق برنامج لحضور وانصراف العاملين بدأت فى البرنامج وانشأت الجداول وبعض الاستعلامات والنماذج لكن وقفت ومش عارف اكمل انا عاوز اصمم نموذج يظهر لى جميع الموظفين من جدول معلومات الموظفين (Emp_Info) بشرط ان يكون حالة العامل نشط (وتم انشاء استعلام لهذا الغرض باسم (Dwam_Today) ) واسم النموذج المرتبط به هو (frm_DwamToday) لكن فى النموذج تم اظهار جميع الموظفين النشطين بس انا عاوز لما اجي اسجل الحضور للجميع اولا اختار اذا كان هناك غياب ام لا عن طريق التأشير على نعم للغياب وتلقائيا يختفى اسم من علمت عليه او سجلت له حضور (او لو فى طريقه افضل) ثانيا عاوز اعمل زرار يسجل الحضور للجميع مره واحده بعد ما استثني الغائبين ثالثا اريد ان انشأ استعلام لعدد ايام الغياب والاضافى لكل موظف علما ان ايام العطلات هى يوم الجمعه فقط واريد ان اربط بين الاستعلامات والنماذج والتقارير ---وايضا فى مشكله فى فورم اضافة الموظف ---لما باختار رقم الموظف بيجلب لى بعض البيانات والباقى لا يظهر معي (مش عارف السبب فين) انا عارف انى ممكن اكون طالب كثير لكن ممكن نبدأ بيها جذء جذء واجعل هذه الطلبات كمسودة عمل ومن الممكن انى استطيع ان احل نقاط بعد ما افهم حل اول او ثاني نقطه ولكم جزيل الشكر حضور وانصراف موظفين.rar