الاقسام

بعد لم يكتمل الشرح
ماذا تريد ان تجمع بذلك الشروط
هل تريد ان تجمع وقت العمل او اي حقل بالضبط

وعليكم السلام 🙂   . 1. غائب<> StatusTybe  ، الظاهر اني قلبتها 🙂 5. مجموع دقائق التأخر ، من المشاركة السابقة ، 2. تحويل دقائق التأخر الى دقائق:ساعات:يوم 1. =Sum(IIf([StatusTybe]<>3,1,0)) 2. =Minutes2DHM([SumTimeDelay],DateDiff("h",[Forms]![EmployeeMovement_F]![OutTimE],[Forms]![EmployeeMovement_F]![InTimE])) اي ننادي الوحدة النمطية Minutes2DHM ونرسل لها مجموع الدقائق SumTimeDelay والتي نريد تحويلها الى دقائق:ساعات:يوم وكذلك نرسل عدد ساعات الدوام كل يوم وللتوضيح، مناداة الوحدة النمطية، حسب الارقام الحمراء لكل حقل في الصورة =Minutes2DHM(5,DateDiff("h",4,3)) . والوحدة النمطية: Public Function Minutes2DHM(minutes As Long, Working_hrs As Long) As String Dim dd As Long, hh As Integer, mm As Integer, Working_Mints As Long minutes = Abs(minutes) Working_hrs = Abs(Working_hrs) Working_Mints = Working_hrs * 60 dd = minutes \ Working_Mints minutes = minutes - dd * Working_Mints hh = minutes \ 60 mm = minutes Mod 60 Minutes2DHM = Format(dd, "000") & ":" & Format(hh, "00") & ":" & Format(mm, "00") End Function  . وطبعا ممكن تطبيق هذا على بقية الحقول 🙂   جعفر 990.Employee 04 .accdb.zip

وعليكم السلام  بارك الله فيك واشكرك  بارك الله بك ووسع في ارزاقك وجبر الله بخاطرك بالدنيا والاخره  1- اريد ان احذف الورقة بعنوان (مثال 2) 2-  ان يبدأ من سطر 14     

أهلاً بالأستاذ @Shivan Rekany اسم لنموذج EmployeeMovement_F يوجد أربعة حقول اسفل الفورم الفرعي المطلوب تجميع
عدد السجلات بشرط أن نص حقل Status يساوي كالتالي:
SumD = دوام كامل +دوام جزئي
SumK = غائب
SumS = أستئذان
SumG = أجازة تفضل المرفق: Employee 12 .rar

تم التعديل حسب المطلوب فورم اد5555خال و تعديل مرن (4).xls