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

البحث في الموقع

Showing results for 'datedif'.

  • Search By Tags

    اكتب الكلمات المفتاحيه بينها علامه الفاصله
  • Search By Author

نوع المحتوي


الاقسام

  • الترحيب
  • قسم تطبيقات و لغات مايكروسوفت
    • قنوات تعليمية شخصية و دورات تدريبية مجانية و مدفوعة
    • إعلانات شخصية بأجر للاعضاء
    • المنتدى المفتوح
    • منتدى الاكسيل Excel
    • قسم الأكسيس Access
    • دعم أنظمة الويندوز المختلفة
    • منتدي الوورد Word
    • منتدى الباوربوينت
    • منتدى الاوتلوك Outlook
    • منتدى الفيزيو Visio
    • منتدي مايكروسوفت بروجكت Ms Project
    • منتدى الفرنت بيج العام Frontpage
    • تطبيقات Power Apps
    • وان نوت One Note
    • الناشر بابليشر Publisher
    • Communicator
    • Expression Web
    • SQL Server
    • VB.net
    • C#.net
    • Asp.net
  • الغات و أدوات البرمجة الأخرى
    • حوارات الويب العامة
    • Delphi
    • PHP
    • برمجة الاندرويد
  • أقسام الإدارة و إدارة المشاريع و تطبيقاتها
    • الاستراتيجية وإدارة محافظ المشاريع
    • إدارة المشاريع
    • Scaled Agile SAFe
    • إدارة الجودة
    • القيادة و تنمية المهارات
    • Primavera Enterprise
    • Primavera 3.1
  • البحث العلمي و علوم البيانات
    • مناهج البحث العلمي
    • علم الإحصاء
    • الذكاء الإصطناعي و التنقيب فى البيانات
    • Orange
    • R
    • SPSS
    • Python
  • القسم العام
    • مشاركات المدونات
    • نرحب بزوار الموقع
    • قسم الاقتراحات و الملاحظات
    • أوفيسنا على الفيسبوك

الاقسام

  • VBA Code Library
  • قسم الإكسيل
  • قسم الأكسيس
  • قسم الوورد
  • Project Management
  • Self development التطويرالذاتي
  • EFQM & DGEP
  • معلومات مفيدة
  • أدوات عامة

مدونات

  • M-Taher's Blog
  • مدونة محمد طاهر
  • Officena
  • اا الفاروق اا
  • ‎مدونة أخبار التكنولوجيا
  • M-Taher's Blog
  • يحيى حسين's Blog
  • خبور خير's Blog
  • Dr. AbdelMalek Abu Sheikh's Blog
  • m.hindawi's Blog
  • احمدزمان's Blog
  • الحسامي
  • مدونة أ / محمد صالح
  • yahiaoui's Blog
  • عبدالله المجرب's Blog
  • صيد الخواطر
  • حمادة عمر مدونة
  • مدونة جعفر
  • مدونة عادل حنقي
  • مجدى يونس: لمسة وفاء لمنتدى اوفيسنا
  • Excel Expert Financial&Accounting
  • مدونة اعمال ايقونات الماس لمنتدى اوفيسنا
  • رقائق فى دقائق
  • Shivan Rekany

ابحث عن النتائج فى ......

ابحث عن النتائج التي تحوي ....


تاريخ الانشاء

  • بدايه

    End


اخر تحديث

  • بدايه

    End


Filter by number of...

انضم

  • بدايه

    End


مجموعه


Job Title


البلد


الإهتمامات


AIM


MSN


Website URL


ICQ


Yahoo


Jabber


Skype

  1. عندى سؤال فى الدالة datedif اريد ان احسب الفرق بين تاريخين بالايام فقط فمثلا من تاريخ 1/1/2022 حتى 31/12/2022 الذى اريده ان يحسب عدد ايام كل الشهور 20 يوم فقط ولايحسبها على انها 30 او 31 فهل من طريقة
  2. استخدم المعادلة التالية باعتبار أن الرقم القومي في الخلية B3 =DATEDIF(DATE(IF(LEFT(B3;1)*1=3;20;19)&MID(B3;2;2);MID(B3;4;2);MID(B3;6;2));TODAY();"y") حيث يتم تقسيم الرقم القومي إلى شهر وسنة وأيام وبعدها يتم طرحه من اليوم الحالي today واظهار الناتج بالسنة y
  3. تحياتي تم استعمال الدالة DATEDIF في الملف المرفق مع تصحيح طفيف لخطأ (عدد الأيام) مع التعليل... 3.xlsx
  4. السلام عليكم و رحمة الله ربما تفيدك هذه المعادلة =IFERROR(DATEDIF(NOW();DATE(VALUE(1960+MID($B2;2;2));VALUE(MID($B2;4;2));VALUE(MID($B2;6;2)));"m");"على المعاش")
  5. السلام عليكم ور حمة الله اكتب المعادلة التالية فى الخلية D4 ثم اسحب نزولا =DATEDIF($A4;$B4;"y") اما المعادلة التالية اكتبها فى الخلية E4 ثم اسحب نزولا =DATEDIF($A4;$B4;"ym") اما المعادلة الاخيرة اكتبها فى اى خلية تشاء =SUM(D4:D7;INT(SUM($E$4:$E$6)/12))&" Years,"& MOD(SUM($E$4:$E$6);12)&" Months,"
  6. عليكم السلام ورحمة الله وبركاته تفضل أخي الكريم Sub test() With Sheets("يومية الحضور والإنصراف").Range("B4:C" & Sheets("يومية الحضور والإنصراف").Cells(Rows.Count, 1).End(xlUp).Row) .Formula = "=IFERROR(VLOOKUP($A:$A,Table9,COLUMN(),0),"""")" .Value = .Value End With With Sheets("رصيد الأجازات").Range("B3:D" & Sheets("رصيد الأجازات").Cells(Rows.Count, 2).End(xlUp).Row) .Formula = "=IFERROR(VLOOKUP($A:$A,Table9,COLUMN(),0),"""")" .Offset(, 3).Resize(, 1).Formula = "=IFERROR(IF(DATEDIF([@[تاريخ التعيين]],$D$1,""D"")/30>3.1,""يستحق"",""""),"""")" .Offset(, 5).Resize(, 1).Formula = "=IF([@[معادلة الرصيد]]=""يستحق"",$O$1+[@[معالجة الرصيد]],0)" .Offset(, 6).Resize(, 1).Formula = "=[@[الرصيد المرحل]]+[@[رصيد 2023]]" .Offset(, 7).Resize(, 1).Formula = "=(COUNTIFS('يومية الحضور والإنصراف'!$A:$A,$A3,'يومية الحضور والإنصراف'!$H:$H,""أجازة"")+(COUNTIFS('يومية الحضور والإنصراف'!$A:$A,$A3,'يومية الحضور والإنصراف'!$H:$H,""أجازة مجمعة"")))" .Offset(, 8).Resize(, 1).Formula = "=(COUNTIFS('يومية الحضور والإنصراف'!$A:$A,$A4,'يومية الحضور والإنصراف'!$H:$H,""أجازة عارضة""))" .Offset(, 9).Resize(, 1).Formula = "=IF(E3=""يستحق"",$N$1-[@[ عارضة]],0)" .Offset(, 10).Resize(, 1).Formula = "=(([@[إجمالي الرصيد المستحق]]-([@[ سنوي]]+[@[ عارضة]]+[@[تسوية نقدي]])))-[@[باقي رصيد العارضة]]" .Offset(, 11).Resize(, 1).Formula = "=([@[باقي رصيد السنوي ]]+[@[باقي رصيد العارضة]])" With .Resize(, 12) .Value = .Value End With End With End Sub
  7. السلام عليكم ورحمة الله وللحساب أكثر دقة (ليست دقة مطلقة) وبطريقة منطقية عما سبق نتبع الطريقة التالية : استعمال الدالة DATEDIF بين تاريخ اليوم (تاريخ البداية) وتاريخ آخر ترقية مضاف إلية 04 سنوات (تاريخ النهاية). قمت بتطبيق ذلك في الملف المرفق... حساب مدة اخر ترقية (1).xlsx
  8. وعليكم السلام ورحمة الله وبركاته بعد اذن استاذنا الاستاذ محمد بالمرفقات محاولة لعلها المطلوب باستخدام الدالة (DateDif) ارجو التجربة. حساب مدة اخر ترقية.xlsx
  9. يمكنك استخدام معادلة شرطية لتظهر رسالة خطأ فى حال كون تاريخ آخر قسط قبل تاريخ أول قسط استبدل المعادلة فى الخلية حمراء اللون بما يلي: =IF(G16>F16,"هناك خطأ تاريخ اخر قسط لا يجب ان يكون بعد تاريخ اول قسط",DATEDIF(G16,F16,"m"))
  10. يمكنك استخدام المعادلة التالية لاستخراج الفرق بالشهور =DATEDIF(H2;P2;"m") مثال 12/4/2022____27/4/2029________النتيجة هي 96 شهر وهده ادا كانت لك رغبة باستخراج النتيجة بالاعداد الكسرية =FRACTION.ANNEE(H2;P2)*12 12/4/2022____27/4/2029________ النتيجة هي 96.5 شهر ونصف Copy of Book13(2).xlsx
  11. على حسب ما فهمت من طلبك ضع هذه المعادلة في الخلية B10 =SIERREUR(SI(B10="";"";DATEDIF(B10;D10;"d"));"") و اسحبها حتى آخر صف وفي الخلية E10 =SI(C10="";"";SI(C10<=25;"Pending";SI(C10=26;"Notify";SI(C10=27;"Notify";SI(C10=28;"Notify";SI(C10=29;"Notify";SI(C10>=30;"Done"))))))) و اسحبها حتى آخر صف Test-M-H.xlsx
  12. جرب استعمال هذه المعادلة في الخلية G6 =IF(B6="","",IF(DATEDIF(D6,E6,"md")>=30,IF(DATEDIF(D6,E6,"ym")+1=12,0,DATEDIF(D6,E6,"ym")+1),DATEDIF(D6,E6,"ym"))) وهذه في الخلية F6 =IF(B6="","",IF(DATEDIF(D6,E6,"ym")+1=12,1,0))+DATEDIF(D6,E6,"y") بالتوفيق
  13. السلام عليكم ورحمة الله بارك الله فيك اخى الكريم على كلماتك الرقيقة بالنسبة للدوائر لا ترحل مع ترحيل النتيجة بل يوجد زر فى شيت الدور الثانى لرسم دائرة وشرطة بالنسبة للشيت لا يوجد كود لمسح الدوائر اثناء الترحيل لكن يوجد زر لمسح الدوائر يمكنك استخدامه من عدمه بالنسبة لورقة العملى ليس الغرض منها جلب درجات العملى من و لكن الغرض من ذلك هو ان امتحانات العملى تكون قبل امتحانات التحريرى فيتم امتحان العملى عن طريق الفصول و ليس اللجان ( حسبما كان يحدث فى مدارسنا ) فكنا نطبع هذه الاوراق و نسلمها للقائم بعمل الامتحان العملى ليقوم بتسجيل الدرجات فيها و من ثم تسليمها للكنترول و الذى بدوره يقوم بتسجيلها بالشيت و الى هنا تنتهى مهمة هذه الورقة اما بالنسبة لحساب السن حاولت فى هذا الكود اصلاح الدالة الرسمية لبرنامج الاكسل و هى دالة (Datedif) و عيبها انها تعطى الايام صفر اذا كانت تاريخ الميلاد آخر الشهر او اول الشهر التالى يعنى نفس النتيجة لتاريخين ميلاد مختلفين و عندما حاولت التعديل و جدت ان البديل اسوأ و فشلت فشلا زريعا - لذا عدت و عدلت الكود ليعطينى نفس نتائج الدالة المذكورة اليك ملف به كود السن بعد التعديل الاخير و النهائى كنترول - السن.xlsm
  14. السلام عليكم أخي الكريم بعد دراسة الموضوع الذي عرضته يحتاج عند التفكير للوهلة الأولى لإضافة الشهور الناتجة إلى عدد الشهور الأصلية وبذلك قد يكون عندك كم هائل من الأشهر حسب أي من الشرطين ولذلك أحببت أن أضيف تحقق أي من الشرطين لتاريخ نهاية الخدمة المبين لديك في الملف ثم استخدام معادلة Datedif لحساب الفرق بين تاريخ بدء الخدمة والتاريخ الناتج عن أحد الشرطين كما يلي: حيث تم الضرب بعدد السنوات بغضّ النظر عن الأشهر حتى لو بلغت 11 شهراً و 30يوماً. =IF(B13<=10;$E$11+(60*E13);$E$11+(90*E13)) حساب نتيجة اقدمية.xlsx
  15. اخواني اريد طريقة جمع قيمتين محسوبتين بدالة datedif مع أخذ بعين الاعتبار الأشهر و الأيام، أي في حالة وصول الأشهر ازيد من 12 شهر يزداد تلقائيا 1 الى السنوات، وحين الوصول الى 30 يوم كذلك يزداد شهر الى الأشهر .. معادلة1 DATEDIF.xlsx
  16. بإذن الله يكون هذا الكود هو المطلوب تم استعمال dateadd لاضافة الايام والشهور والاعوام لتاريخ معين واستعمال دالة datedif لحساب الفرق بين تاريخين Private Sub CommandButton1_Click() TextBox2 = DateAdd("d", Val(TextBox6), TextBox1) TextBox2 = DateAdd("m", Val(TextBox5), TextBox2) TextBox2 = DateAdd("yyyy", Val(TextBox4), TextBox2) TextBox3 = DateAdd("m", (Val(TextBox4) * -3), TextBox2) TextBox7 = Evaluate("DATEDIF(" & CDbl(Date) & "," & CDbl(CDate(TextBox3)) & ", ""md"")") TextBox9 = Evaluate("DATEDIF(" & CDbl(Date) & "," & CDbl(CDate(TextBox3)) & ", ""ym"")") TextBox8 = Evaluate("DATEDIF(" & CDbl(Date) & "," & CDbl(CDate(TextBox3)) & ", ""y"")") MsgBox "Done by mr-mas.com" End Sub Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) TextBox1.Text = Format(TextBox1, "yyyy/mm/dd") End Sub Private Sub TextBox2_Change() TextBox2.Text = Format(TextBox2, "yyyy/mm/dd") End Sub Private Sub TextBox3_Change() TextBox3.Text = Format(TextBox3, "yyyy/mm/dd") End Sub بالتوفيق
  17. أولا أشكر صاحب الملف الأصلي أ / @مجدى يونس وثانيا إن شاء الله يفيدك هذا التعديل تم الاعتماد على دالة datedif الموجودة في دوال الشيت وحذف مربع النص الذي به تاريخ اليوم والاكتفاء بالمربع الأول فإذا كان فارغا يتم الحساب على تاريخ اليوم وإذا كان مكتوبا به تاريخ يتم الحساب على هذا التاريخ بالتوفيق حساب السن في النموذج.xlsb
  18. يمكنك استعمال دالتك وبعدها زائد واحد =DATEDIF(Start_date,End_date,"D")+1 بالتوفيق
  19. السلام عليكم ورحمة الله وبركته بعد البحث في المنتدى لم اجد جواب لسوالي وهو عند تسجيل دالة datedif لحساب الفرق بين تاريخين يعطيني النتيجة ولكن عندما اقوم بتسجيل نفس التاريخ في الخلينين يعطيني الناتج 0 واريد الناتج 1 هل يمكن اعطائي الدالة الصحيحة
  20. وعليكم السلام ورحمة الله وبركاته المعادله الاولى =iferror(DATE(IF(LEFT(C1232;1)="2";MID(C1232;2;2);"20"&MID(C1232;2;2));MID(C1232;4;2);MID(C1232;6;2));"") المعادله الثانيه =iferror(IF(Q1232>1;DATEDIF(Q1232;$P$1;"md");"");"")
  21. السلام عليكم يا اساتذتي الكرام لو سمحتم عايز أضع دالة IFERROR قبل هذه الدالة =DATE(IF(LEFT(C1232;1)="2";MID(C1232;2;2);"20"&MID(C1232;2;2));MID(C1232;4;2);MID(C1232;6;2)) عشان لا تكتب لي VALUE وهكذا الدالة دي =IF(Q1232>1;DATEDIF(Q1232;$P$1;"md");"") كما في الصورة
  22. إذا كان المطلوب مجرد فرق بين تاريخين يمكنك استعمال دالة datedif بالتوفيق
  23. حاولت استخدام دالة datedif لكن الدالة لا تعمل معي في اكسل 2019 . ارجو المساعدة . B5 C5 20/12/2021 20/5/2020 =DATEDIF(B5,C5,"d") النتيجة #VALUE! =DATEDIF(B5,C5,"MD") النتيجة #VALUE!
  24. هذه المعادلة لكنها طويلة جدا =IF(MONTH(A2)>=MONTH($B$2);IF(C2>(DATEDIF(B2;A2;"ym")+1)*IF(ROUND(SUM(D2)-SUM(E2:F2;H2:K2);2)*25%<=C2;ROUND(SUM(D2)-SUM(E2:F2;H2:K2);2)*25%;C2);IF(ROUND(SUM(D2)-SUM(E2:F2;H2:K2);2)*25%<=C2;ROUND(SUM(D2)-SUM(E2:F2;H2:K2);2)*25%;C2);IF(C2-DATEDIF(B2;A2;"ym")*IF(ROUND(SUM(D2)-SUM(E2:F2;H2:K2);2)*25%<=C2;ROUND(SUM(D2)-SUM(E2:F2;H2:K2);2)*25%;C2)>0;C2-DATEDIF(B2;A2;"ym")*IF(ROUND(SUM(D2)-SUM(E2:F2;H2:K2);2)*25%<=C2;ROUND(SUM(D2)-SUM(E2:F2;H2:K2);2)*25%;C2);""));"") وعليه إقترحت صياغة دالة معرفة إن أمكن ذلك **** أرجو الإفادة وجزاكم الله خيرا
×
×
  • اضف...

Important Information