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

[Hawiii]

في حالة الحصول على نتائج الدالتين بالناقص تحدف دالة Abs

[عمر ضاحى]

منذ ساعه, Hawiii said:

ارفع لي ملفك مرة أخرى بإصدار 2007 أو أقل.

لما باحاول احفظه لاصدار 2003 بيرفض بسس ان هناك اكود ودوال تعمل على نظام احدث او هكذا

[Eng.Qassim]

14 hours ago, عمر ضاحى said:

لا اكذب عليك لم تكن هكذا رؤيتى للبرنامج 

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

بل كنت اريد ان اجعل النظام من الكود نفسه

اى 

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

  Netholidyas = holidaysdat - Fri_Days - sat_Days

حيث ان لكل عنصر من الثلاثه داله خاصه به 

holidaysdat بيستمد معلوماته من جدوله 

Fri_Days يستمد معلوماته من عدد ايام الجمعه بين التاريخين 

sat_Days يستمد معلوماته من عدد ايام السبت بين التاريخين 

فكيف اعيد الصياغه من جديد مع الشرح علشان افهم ليه انا هختار الداله دي واترك الداله دي 

هذا اذا كان لن يتعبكم 

فانا اشعر بالاحراج انى اتعبت كل العمالقه امثالكم 

 

 

السلام عليكم

لا اعلم ان كنت قد فهمتك ام لا..حسبما فهمت انك تريد حقل من داخل الجدول يحسب الفرق بين تاريخين وهذا يمكن من خلال حقل محسوب وتضع الفرق بين التاريخين ([ToDate]-[FromDate])...لكن حسب ما اعلم انه لايمكن استخدام دالة DateDiff داخل حقل محسوب

 

[عمر ضاحى]

4 ساعات مضت, Eng.Qassim said:

 

 

 

 

السلام عليكم

 

لا اعلم ان كنت قد فهمتك ام لا..حسبما فهمت انك تريد حقل من داخل الجدول يحسب الفرق بين تاريخين وهذا يمكن من خلال حقل محسوب وتضع الفرق بين التاريخين ([ToDate]-[FromDate])...لكن حسب ما اعلم انه لايمكن استخدام دالة DateDiff داخل حقل محسوب

 

 

 

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

لكن حضرتك اعطيتنى فكرة الابشن 

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

او عن طريق ملف ini يكون بجوار ملف الاكسيل يحفظ فيه مثل هذه الاعدادات

[Hawiii]

20 ساعات مضت, عمر ضاحى said:

sat_Days = DCount("[HoliDays]", "tblHoliDays", _
                  "WeekdayName(weekday([HoliDays]),true)= 'السبت'" & _
                  " and [HoliDays] between #" & begdate & "# and #" & enddate & "#")

 

لا داعي لاستخدام اسم اليوم يكفي استخدام رقمه
 

  sat_Days = DCount("HoliDays", "tblHoliDays", _
                    "weekday(HoliDays)=7 and " & _
                    "HoliDays between #" & begdate & "# and #" & enddate & "#")