ساعات العمل

[بلال اليامين]

السلام عليكم

مساعدة في طريقة جمع ساعات العمل  المحدد بالون الاخضر

اليك البرنامج والصورة

ساعات .rar

[بلال اليامين]

السلام عليكم 

لقد حاولت في الاستعلام ان تقوم بجمع الساعات 

التي تظهر في الصورة 

اريد طريقة لي حسابها في الاستعلام

[بلال اليامين]

السلام عليكم 

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

وتوقيت أيام الفترة المسائية  في الاستعلام

اريد معادلة مجموع ساعات العمل الفترتين

 

 

[jjafferr]

وعليكم السلام 🙂

 

في الاستعلام ، المعادلة التالية ، انت حصلت على نتيجة TotalTime و TotalTime2 بعد ان ارسلت قيمها الى الدالة SubTotalTime ، فما تقدر تنادي الدالة مرة اخرى للنتائج :

TotalTime222: SubTotalTime((DateDiff("n",0,[TotalTime]+[TotalTime2])))

 

والصحيح انها تُكتب هكذا :

T2: SubTotalTime(((DateDiff("n",[TimeIn1],[TimeOut1])-0)+(DateDiff("n",[TimeIn2],[TimeOut2])-0)+(DateDiff("n",[TimeIn3],[TimeOut3])-0)+(DateDiff("n",[TimeIn4],[TimeOut4])-0)+(DateDiff("n",[TimeIn5],[TimeOut5])-0))+((DateDiff("n",[TimeIn11],[TimeOut11])-0)+(DateDiff("n",[TimeIn12],[TimeOut12])-0)+(DateDiff("n",[TimeIn13],[TimeOut13])-0)+(DateDiff("n",[TimeIn14],[TimeOut14])-0)+(DateDiff("n",[TimeIn15],[TimeOut15])-0)))

 

جعفر

[بلال اليامين]

اخي لقد قمت بجمع الفترة الصباحية في الاستعلام المعادلة الاولى

TotalTime442: SubTotalTime((DateDiff("n";[TimeIn11];[TimeOut11])-15)+(DateDiff("n";[TimeIn12];[TimeOut12])-15)+(DateDiff("n";[TimeIn13];[TimeOut13])-15)+(DateDiff("n";

[TimeIn14];[TimeOut14])-15)+(DateDiff("n";[TimeIn15];[TimeOut15])-

وهذه المعادلة الثانية الفترة المسائية
Tot2: Format(([TimeI]+[TimI]+[Tme]+[Time]);" " & "h" & " " & "سا" & " " & "" & " " & "" & "" & " ")

 

اريد جمع الفترتين معا

تم تعديل أغسطس 27, 2022 بواسطه jjafferr
استعمال <> من القائمة ، ثم وضع الكود في نافذته

[jjafferr]

اخي بلال 🙂

 

عملت لك المطلوب حسب مرفقك وشرحك ،

ولكن بعد تغييرك المعادلة ، رجاء ارفق المرفق الجديد والذي به المعادلات الاخيرة ، ثم اخبرنا الحقول التي تريد جمعها ، واخبرنا النتيجة النهائية 🙂

فالمعادلات اعلاه غير كاملة !!

 

جعفر

[بلال اليامين]

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

ساعات .rar