Ali Tawfeek قام بنشر مارس 4, 2009 قام بنشر مارس 4, 2009 اخوانى الكرام انا لدى ملف مطلوب من الذى يمله ادخال تاريخ الدخول و تاريخ الخروج و هناك عمود اخر يحسب الفرق بين التاريخين المشكلة التى تواجهنى هو عندما يتم حسبه الفرق فانه ياخذ الفرق كعدد فعلى للايام و لكن سؤالى اليوم كيف لى ان احسب هذا الفارق كعدد ايام عمل اي بدون حسبه ايام الجمعة و السبت من كل اسبوع فهل من معادل شرطية لفرق تاريخين و اخذ فى الاعتبا عدم عدد هذه الايام وشكرا لكم لمساعدتكم
عبدالله باقشير قام بنشر مارس 5, 2009 قام بنشر مارس 5, 2009 السلام عليكم ' بسم الله الرحمن الرحيم " '======================================" ' دالة لعدد الايام بين فترتين " ' واستثناء ايام العطل الاسبوعية " ' باختيار الايام المطلوبة " '======================================" 'Constant Value Description '"""""""" """"" """"""""""" 'vbSunday 1 Sunday 'vbMonday 2 Monday 'vbTuesday 3 Tuesday 'vbWednesday 4 Wednesday 'vbThursday 5 Thursday 'vbFriday 6 Friday 'vbSaturday 7 Saturday '======================================" ' في حالة انك لم تختار الايام " ' ستعطيك فارق الايام كاملا " '======================================" Function KhCountDay(MyDate_Min, MyDate_Max, ParamArray My_DayNO()) Dim X As Long, M As Long, R As Long, C As Integer N = UBound(My_DayNO) X = CDate(MyDate_Max) - CDate(MyDate_Min) For R = 0 To X For C = 0 To N If Weekday(MyDate_Min + R) = My_DayNO(C) Then M = M + 1 End If Next C Next R KhCountDay = X + 1 - M End Function __________________________________________________.rar
Ali Tawfeek قام بنشر مارس 7, 2009 الكاتب قام بنشر مارس 7, 2009 عذرا اخى و هل في مثالك السابق هل تم اختيار ايام عطلات ام لا ؟؟ و اذا كنت اختارت فاين وقع الاختيار ؟ و اذا كنت لم تختار فكيف لى الاختيار ؟ شكرا للمساعدة
amoudi قام بنشر مارس 8, 2009 قام بنشر مارس 8, 2009 السلام عليكم حل آخر للفائدة بفرض A1 تحتوي على تاريخ بداية الفترة و B1 تحتوي على تاريخ نهاية الفترة ولجمع الأيام بدون سبت وجمعة المعادلة تصبح =SUMPRODUCT(--(WEEKDAY(ROW(INDIRECT("1:"&(B1-A1)+1))+(A1)-1)<6)) تحياتي
Ali Tawfeek قام بنشر مارس 8, 2009 الكاتب قام بنشر مارس 8, 2009 (معدل) السلام عليكم حل آخر للفائدة بفرض A1 تحتوي على تاريخ بداية الفترة و B1 تحتوي على تاريخ نهاية الفترة ولجمع الأيام بدون سبت وجمعة المعادلة تصبح =SUMPRODUCT(--(WEEKDAY(ROW(INDIRECT("1:"&(B1-A1)+1))+(A1)-1)<6)) تحياتي شكرا اخى الكريم على تفاعلك و لكن هل لى ان اتسال كيف لى ان اعرف من المعادلة السابقة ان المستبعد من الايام هما الجمعه و السبت ؟ كيف لى اذا اردت ان استبعاد الاحد او الاثنين او اى يوم اخر من ايام الاسبوع فكيف لى تعديل معادلة ؟ فى انتظارك ردك و يفضل ان امكن ان يكون بالشرح حتى يمكننى تعديل المعادلة كيفما اشاء و شكرا تم تعديل مارس 8, 2009 بواسطه ali fathi
amoudi قام بنشر مارس 8, 2009 قام بنشر مارس 8, 2009 السلام عليكم شكرا اخى الكريم على تفاعلك و لكن هل لى ان اتسال العفو ياسيدي واتفضل اسأل كيف لى ان اعرف من المعادلة السابقة ان المستبعد من الايام هما الجمعه و السبت ؟ جربها واختبرها على عينة بيانات وشوف النتيجة . كيف لى اذا اردت ان استبعاد الاحد او الاثنين او اى يوم اخر من ايام الاسبوع فكيف لى تعديل معادلة ؟ توضييح الدالة weekday بشكل افتراضي تعيد رقم 1 أحد 2 أثنين 3 ثلاثاء 4 أربعاء 5 خميس 6 جمعة 7 سبت وانا في المعادلة كتبت 6 > اقل من ستة يعني 6 و7 غير مشملولين واذا اردت استبعاد يوم الأثنين كمثال بدل 6> تكتب 2<> هذا بفرض استخدام الدالة بشكل افتراضي فالدلة يمكن تمرير لها قيمة 1 أو 2 أو 3 =WEEKDAY(A1) =WEEKDAY(A1,1) =WEEKDAY(A1,2) =WEEKDAY(A1,3) الأول والثاني افتراضي يعني اذا ما وضعت شي حيفترض 1 المعادلة الثالثة(تمرير رقم 2) 1 الأثنين 2 الثلاثا وهكذا الى 7 المعادلة الرابعة (تمرير 3) 0 الأثنين 1 الثلاثاء وهكذا الى 6 فأنت شوف بطريقتك اي شكل يناسبك لأستخدامه تحياتي
Ali Tawfeek قام بنشر مارس 9, 2009 الكاتب قام بنشر مارس 9, 2009 مشكور اخى الكريم على شرحك الوافي و لكن كيف لى ان اطبق هذه المعادلة على العمود باكلمه
amoudi قام بنشر مارس 9, 2009 قام بنشر مارس 9, 2009 السلام عليكم مشكور اخى الكريم على شرحك الوافي و لكن كيف لى ان اطبق هذه المعادلة على العمود باكلمه المعادلة مثل اي معادلة عادي تضعها في الأول وتسحبها للأسفل يعني مثلا معادلة A1-B1= كيف كنت حتطبقها على كامل العامود ؟ حيكون نفس الشي للمعادلة السابقة . تحياتي
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.