اذهب الي المحتوي
أوفيسنا

طلب معادلة لعمل قائمة من التواريخ بين تاريخين


الردود الموصى بها

السلام عليكم ورحمه الله وبركاته

المطلوب:

1- اريد معادلة لانشاء قائمة تواريخ بين تاريخين a3:b3

بشرط اذا سحبت المعادلة لأسفل لا يكرر التواريخ

المعادلة اريدها فى عمود Required

2- اريد معادلة لحساب عدد أيام الجمعة بين تاريخين

3- اريد معادلة لحساب عدد الأيام بين تاريخين

انظر المرفق

Dates Bt_Req.rar

رابط هذا التعليق
شارك

السلام عليكم و رحمة الله

طلبك الاول مش واضح

طلبك الثاني لعد أيام الجمعه بين تاريخين


=SUMPRODUCT(--(WEEKDAY(ROW(INDIRECT(G11&":"&H11)))=6))

طلبك الثالث لو وضعت معادلة عادية طرح التاريخ الاحدث من التاريخ الأقدم

=H20-G20

ستفي بالطلب و لكن يمكنك استخدام الدالة DateDif

=DATEDIF(G20,H20,"d")

دمت في حفظ الله

رابط هذا التعليق
شارك

السلام عليكم

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

في الخلية c3 ضع


=B3

و في الخلية C4 ضع المعادلة التالية ثم اسحبها للأسفل

=IF(C3="","",IF(C3+1<=$A$3,C3+1,""))

رابط هذا التعليق
شارك

السلام عليكم

هذا كود يقوم بعمل قائمة من التواريخ بين تاريخين


Sub Abu_Ahmed_Date()

x = [B3].Value

y = [A3].Value

z = 3

For i = x To y

Cells(z, 3).Value = i

z = z + 1

Next

End Sub

للعلم التاريخ 18/1/2011 خطاء

ويجب كتابته 18/1/2012

  • Like 1
رابط هذا التعليق
شارك

السلام عليكم

وهذا الكود يقوم بطلباتك الثلاثة (تم الاستعانة بكود للاستاذ عادل حنفي بنفس الفكرة)


Sub Abu_Ahmed_Date()

[I11] = ""

[C3:C500] = ""

[I20] = ""

x = [B3].Value

y = [A3].Value

Cells(20, 9) = y - x

For ii = 1 To Cells(20, 9).Value

w = x + ii

m = Month(w)

n = Year(w)

o = Day(w)

v = Weekday(m & "/" & o & "/" & n)

If v = 6 Then

[I11] = [I11] + 1

End If

'==============

z = 3

For i = x To y

Cells(z, 3).Value = i

z = z + 1

Next

Next

End Sub

رابط هذا التعليق
شارك

حلول أكثر من رائعة أخى يحيى حسين و عبد الله المجرب

هناك مشكلة فى دالة datedif وهى عند تغيير التواريخ يعطينى خطأ #NUM

لقد غيرت التاريخين إلى :

19/02/2012 18/03/2012

- ما المشكلة فى هذه الدالة ، أين معاملات هذه الدالة ؟

رابط هذا التعليق
شارك

بالنسبة لدالة datedif

فيجب ان يكون التاريخ الاصغر في البداية

وهذه هو سبب ظهور #NUM

والحل الصحيح حسب تجربتي


=DATEDIF(H20;G20;"d")

رابط هذا التعليق
شارك

شكرا أخى عبد الله المجرب

بالنسبة لموضوعى طلب انشاء يوزر فورم Attendance Roll

حيث لى 3 طلبات ، 2 منهم تخصيص ازرار فى اليوزر فورم والثالث لعمل مربع بحث

http://www.officena....pic=39614&st=20

لم أجد رد من أى أحد من الأخوة

هل هناك مشكلة فى قيامى بانشاء موضوعين بالمطلوب لتسهيل المهمة ؟

وشكرا

تم تعديل بواسطه leprince2007
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information