اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

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

المطلوب:

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

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

قام بنشر (معدل)

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

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

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

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

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

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

وشكرا

تم تعديل بواسطه leprince2007

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information