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

يمكنك استخدام معادلة شرطية لتظهر رسالة خطأ فى حال كون تاريخ آخر قسط قبل تاريخ أول قسط استبدل المعادلة فى الخلية حمراء اللون بما يلي: =IF(G16>F16,"هناك خطأ تاريخ اخر قسط لا يجب ان يكون بعد تاريخ اول قسط",DATEDIF(G16,F16,"m"))

السلام عليكم ورحمة الله وبركاته الفرق بين تاريخين باستخدام الدالة DATEDIF اتمنى ان يفيدكم جميعا تعريف الدالة امثلة على استخدام الدالة مدونة خبير اكسيل http://excelfinancial1.blogspot.com.eg/ تحميل الملف الفرق بين تاريخين.rar

عليكم السلام ورحمة الله وبركاته أساتذتي الفاضل / بن علية كل الشكر والتقدير لشخصكم الكريم رد حضرتك في الجزء المشار اليه هو المطلوب تماما وجزاكم الله خيرا عليه اما الجزء الاخر فأوضحه لحضرتك في التالي المعادلة التاليه :- =IF(OR(DATE($C$14;12;31)<K16;DATE($C$14;1;1)>L16);0;IF(AND(DATE($C$14;1;1)>=K16;DATE($C$14;12;31)<=L16);12;IF(AND(DATE($C$14;1;1)<=K16;DATE($C$14;12;31)>=L16);DATEDIF(K16;L16;"d")/30;IF(AND(DATE($C$14;1;1)<=K16;DATE($C$14;12;31)<=L16);DATEDIF(K16;DATE($C$14;12;31);"d")/30;IF(AND(DATE($C$14;1;1)>=K16;DATE($C$14;12;31)>=L16);DATEDIF(DATE($C$14;1;1);L16;"d")/30;"??"))))) في الخليه R16 ومبنية علي الخلايا C14 و K16 و L16 والمطلوب تعديل المعادلة لاعتبار التاريخ هو تاريخ اليوم today في الخليه L16 في حالة كونها خاليه من اي تاريخ بالاضافة الي حساب المعادلة في الوضع الحالي أخيرا جزيل الشكر والعرفان

يمكنك استخدام المعادلة التالية لاستخراج الفرق بالشهور =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

مجهود رائع بارك الله فيك أنا شخصيا لم أذكرها في ملفي للعلم بها وبالنسبة لملف حضرتك يمكن اختصار معادلة تاريخ الميلاد مع الاهتمام بما بعد 2100 إلى =DATE(MID(B4,1,1)*100+1700+ MID(B4,2,2),MID(B4,4,2),MID(B4,6,2)) ويمكن اختصار معادلة السن حاليا سنة - شهر إلى =DATEDIF(C4,TODAY(),"y") & " - " &DATEDIF(C4,TODAY(),"ym") بالتوفيق

على حسب ما فهمت من طلبك ضع هذه المعادلة في الخلية 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

وليه الاكواد ممكن تستخدم الدوال التالية =DATEDIF(B3;$C$1;"y") أو =IF(B3="";"";DATEDIF(B3;$C$1;"y")) لحساب السنة =DATEDIF(B3;$C$1;"ym") أو =IF(B3="";"";DATEDIF(B3;$C$1;"ym")) لحساب الشهر =DATEDIF(B3;$C$1;"md") أو =IF(B3="";"";DATEDIF(B3;$C$1;"md")) لحساب اليوم Datedif.rar

يمكنك استعمال المعادلة التالية في الخلية C2 =IF(B2="",DATEDIF(A2,TODAY(),"d"),DATEDIF(A2,B2,"d")) وبالنسبة للتنسيق الشرطي يمكنك استعمال المعادلة =b2="" وتطبق على العمود C بالتوفيق

نعم اتضح عدم تجاوز الأشهر المسددة مدة العقد جرب كتابة هذه المعادلة في الأشهر المسددة =IF(DATEDIF(M14,NOW(),"m")+1>L14,L14,DATEDIF(M14,NOW(),"m")+1) ومعناها إذا كان ناتج المعادلة أكبر من عدد شهور العقد فتكون قيمة الخلية عدد شهور العقد فقط ولا يزيد بالتوفيق

أخي الكريم أبو فادي أعلم أني تأخرت عليك ولكن شغلتني بعض الأمور الخاصة إليك الشرح بالصور لكيفية التعامل مع التنسيق الشرطي والآن بعد أن اطلعت على الصور إليك المعادلات التي ستقوم بإدخالها إلى التنسيق الشرطي .. سأذكر لك المعادلة واللون المصاحب (مع إمكانية أن تغير الألوان حسب رغبتك) ملحوظة : إذا أدرجت المعادلة ووجد خطأ قم باستبدال الفاصلة العادية بفاصلة منقوطة والأفضل أن تغير الإعدادات الإقليمية بحيث تكون الفاصلة العادية هي الافتراضية .. حتى يمكنك نسخ ولصق المعادلات بسهولة من المشاركة (إذا لم تكن تعرف بالأمر أخبرني وسأشرح لك كيفية عمله إن شاء الله) المعادلات : المعادلة الأولى (اللون الأحمر لمن انتهت فترة الصلاحية له) =AND($H4<>"",IFERROR(DATEDIF(TODAY(),$H4,"d"),-1)=-1) المعادلة الثانية (اللون الأزرق) =AND(DATEDIF(TODAY(),$H4,"d")>20,DATEDIF(TODAY(),$H4,"d")<=30) المعادلة الثالثة (اللون الأخضر) =AND(DATEDIF(TODAY(),$H4,"d")>30,DATEDIF(TODAY(),$H4,"d")<=60) المعادلة الرابعة (اللون البنفسجي لأقل من 10 أيام) =AND(DATEDIF(TODAY(),$H4,"d")>=0,DATEDIF(TODAY(),$H4,"d")<=10) المعادلة الخامسة (اللون الأصفر) =AND(DATEDIF(TODAY(),$H4,"d")>10,DATEDIF(TODAY(),$H4,"d")<=20) كان من الممكن أن أرفق لك ملف ولكني أحب الطريق الصعب لأنه الأسهل في الوصول .... تقبل تحياتي

السلام عليكم في المرفق ظهرت لي مشكلة في خانة اليوم لا يمكن أن يكون اليوم أكبر من القيمة 30 أو 31 المشكلة في الأسطر من رقم 34 إلى 44 الرجاء التعديل datedit.rar

10/05/2012 09/05/2013 عند اختيار التاريخين وعمل الدالة datedif لمعرفة عدد الأيام اواجه مشكلة حيث ان الجواب خاطئ هل من الممكن توضيح السبب حيث ان السنة لم تكتمل ولاكن الجواب 272 وهو خاطئ حيث ان عدد أيام السنة 365 او 366 اذا كانت السنة كبيسة فما هذا الرقم 272

سوف ارفق ملف الاكسيل حيث يوجد مثال واضح عن المشكلة التواريخ والمعادلات واحدة والجواب مختلف تجربه واحد.rar

وعليكم السلام ورحمة الله وبركاته هناك عدة طرق منها 3 موضحة بالجدول المرفق وطريقتك الموجودة =DATEDIF(F2,G2,"MD") احذف m من MD بهذا الشكل =DATEDIF(F2,G2,"D") 0الفرق بين تاريخ.xlsx

السلام عليكم ورحمة الله بارك الله فيك اخى الكريم على كلماتك الرقيقة بالنسبة للدوائر لا ترحل مع ترحيل النتيجة بل يوجد زر فى شيت الدور الثانى لرسم دائرة وشرطة بالنسبة للشيت لا يوجد كود لمسح الدوائر اثناء الترحيل لكن يوجد زر لمسح الدوائر يمكنك استخدامه من عدمه بالنسبة لورقة العملى ليس الغرض منها جلب درجات العملى من و لكن الغرض من ذلك هو ان امتحانات العملى تكون قبل امتحانات التحريرى فيتم امتحان العملى عن طريق الفصول و ليس اللجان ( حسبما كان يحدث فى مدارسنا ) فكنا نطبع هذه الاوراق و نسلمها للقائم بعمل الامتحان العملى ليقوم بتسجيل الدرجات فيها و من ثم تسليمها للكنترول و الذى بدوره يقوم بتسجيلها بالشيت و الى هنا تنتهى مهمة هذه الورقة اما بالنسبة لحساب السن حاولت فى هذا الكود اصلاح الدالة الرسمية لبرنامج الاكسل و هى دالة (Datedif) و عيبها انها تعطى الايام صفر اذا كانت تاريخ الميلاد آخر الشهر او اول الشهر التالى يعنى نفس النتيجة لتاريخين ميلاد مختلفين و عندما حاولت التعديل و جدت ان البديل اسوأ و فشلت فشلا زريعا - لذا عدت و عدلت الكود ليعطينى نفس نتائج الدالة المذكورة اليك ملف به كود السن بعد التعديل الاخير و النهائى كنترول - السن.xlsm

سلام عليكم.... احتاج الى استخدام الدالة () dateif لكنني لم أجدها في الأكسل الخاص بي ( نسخة 2007) فهل يمكن إضافتها الى الاكسل وشكرا

السلام عليكم ورحمة الله وبركاته احبائي اعضاء المنتدى الاعزاء اود المساعدة من اعضاء المنتدى وذلك في شيت مرفق لحساب فترتين لموظف اشتغل في شركتين وكل فترة محسوبة بمعادلة DATEDIF وشكرا جزيلا معادلة DATEDIF.xlsx

بسم الله الرحمن الرحيم الحمد لله و الشكر له اذي أنعم علينا بنعم لاتعد و لاتحصى ومن هذه النعم وجود هذا المنتدى القيم وانعم علينا بوجود هذه الزمرة المتميزة في المنتدى التي تعمل وتقدم الخير ولاتنتظر إلا الجزاء من الله عز وجل كافأهم الله بكل خير وأنعم علينا أيضا بوجود ساحر الاكسيل ومهندسه العالم العلامة والبحر الفهامة بمشيئة الله عبد الله باقشير وهو من أحب الناس إلى قلب اخيه الأستاذ / محمدي عبد السميع عبد الغني حفظه الله ورعاه وحفظ الجميع من كل سوء ......... آمين يارب العالمين وبعد : أقدم هذا العمل الفذ وهو عبارة عن تجميع لأكواد معينة والشرح لكي نحصل في النهاية على عمل ولا أروع منه في مجال أعمال الكنترول الخاص برجال التربية والتعليم وسنطلق على هذا العمل " درة أعمال الكنترول " بسم الله نبدأ أولا : عند تصميم أي برنامج لأعمال الكنترول نحتاج الى صفحة بيانات أساسية وفي هذه الصفحة نحتاج الى *** حساب العمر عند يوم واحد أكوبر من العام الدراسي القادم وتوجد معادلات كثيرة لكن أفضلها وأسهلها على الإطلاق هذه المعادلات =IF($E7<>"";DATEDIF($E7;$J$5;"Y");"") لحساب عدد السنوات =IF($E7<>"";DATEDIF($E7;$J$5;"Ym");"") لحساب عدد الشهور =IF($E7<>"";DATEDIF($E7;$J$5;"MD");"") لحساب عدد الأيام أما إذا كنت من هواة الأكواد فهذا الكود للبطل الهمام بضم الهاء وفتح الميم الأولى عبد الله ياقشير '============================================" ' دالة حساب العمر بالتقويم الميلادي تاريخ الميلاد Mydate_Birth التاريخ الذي تريد حساب العمر عنده Mydate اذا كان فارغا سيتم احتساب اليوم '============================================" Function kh_count_y_m_d(Mydate_Birth As Date, Optional Mydate_Now, Optional Y_M_D As String = "Y_M_D") Dim MyDate As Date Dim D_1 As Integer, D_2 As Integer, M_1 As Integer, M_2 As Integer, Y_1 As Integer _ , Y_2 As Integer, d As Integer, M As Integer, Y As Integer If IsDate(Mydate_Now) Then MyDate = Mydate_Now Else MyDate = Date If IsDate(Mydate_Birth) And CDate(Mydate_Birth) <= CDate(MyDate) Then D_1 = Day(MyDate): D_2 = Day(Mydate_Birth) M_1 = Month(MyDate): M_2 = Month(Mydate_Birth) Y_1 = Year(MyDate): Y_2 = Year(Mydate_Birth) If D_1 >= D_2 Then d = D_1 - D_2: M = 0 Else d = D_1 + 30 - D_2: M = -1 If M_1 + M >= M_2 Then M = M_1 + M - M_2: Y = 0 Else M = M_1 + M + 12 - M_2: Y = -1 Y = Y_1 + Y - Y_2 If Y_M_D = "Y_M_D" Then kh_count_y_m_d = d & "d-" & M & "m-" & Y & "y" If Y_M_D = "Y" Then kh_count_y_m_d = Y If Y_M_D = "M" Then kh_count_y_m_d = M If Y_M_D = "D" Then kh_count_y_m_d = d End If End Function *** ونحتاج أيضا الخلية النشطة : وهي آخر حلية مكتوب فيها في آخر صف و تسهل لنا الوصول الى الصف الأخير الفارغ لإضافة بيانات أخرى إذا أردنا Sub nasheta() Dim U As Integer U = ActiveCell.Row Dim LastRow As Integer LastRow = Cells(Rows.Count, "B").End(xlUp).Row + 1 If U = LastRow Then Range("B7").Select Else Range("B" & LastRow).Select End If ActiveWindow.View = xlNormalView End Sub ماعليك إلا أن تربط زر بهذا الكود وهذه هي Sub kh_Hidden() With Range("A2:A5") If .EntireRow.Hidden Then .EntireRow.Hidden = False Else .EntireRow.Hidden = True End If End With End Sub *** سنجتاج أيضا إلى Private Sub Worksheet_Activate() Set WW = Application.WorksheetFunction SS = WW.CountA(Range("B7:B1000")) + 6 EE = WW.CountA(Range("C7:C1000")) + 6 Application.ScreenUpdating = False Range("B7:Z1000").Sort [c7], xlAscending Range("B7:Z1000").Sort [D7], xlDescending For U = 7 To EE Cells(U, 4).NumberFormat = "yyyy/mm/dd" Next Range("B7:B1000").ClearContents [B7] = 1 [B8] = 2 Range("B7:B8").Select On Error Resume Next Selection.AutoFill Destination:=Range("B7:B" & EE) Application.GoTo [B7] 'Application.ScreenUpdating = True End Sub حساب العمر.rar حساب السن بالكود.rar كود اخفاء الصفوف.rar الخلية النشطة.rar طريقة ربط زر بكود اختر أي زر يعجبك منظره ثم اضغط عليه بيمين الماوس واختر نسخ ( copy) ثم حدد المكان الذي تريد اللصق فيه أو إنشاء الزر فيه واضغط بيمين الماوس واختر لصق ( past ) حرك الماوس في اتجاه الإطار الموجود حول الزر الذي لصقته ستظهر علامة الزائد و في كل اتجاه من علامة الزائد يوجد ايضا علامة زائد أخرى ثم اضغط بيمين الماوس واختر تعيين ماكر و ستطهر اسماء الماكروهات اختر الماكرو المطلوب ثم أوكي طريقة تحريك زر ملحوظه عند وجود علامة الزائد و في كل اتجاه منها يوجد ايضا علامة الزائد يمكنك الضغط بيسار الماوس وأنت مستمر بالضغط حركها إلى أي مكان جرب عمل ذلك واحمد الله *** سنجتاج أيضا الى كود يخفي عدد من الأسطر حتى نجصل عل أكبر مساحة ممكنه من الصفحة للرؤية و الكتابه بها وهذا هو الكود الخاص بذلك " كود الاخفاء" كود لعمل المسلسل أوتوماتيكي وهذ الكود سنضعه في حدث الورقة لكي يتم التسلسل بعد انتقالك الى ورقة أخرى والعودة لصفحة بيانات أساسية بدون الضفط على أية أزرار وسنضيف عليه كود لترتيب الطلاب حسب النوع أولا ثم ترتيب الطلاب تصاعديا بدون زر في نفس اللحظة وهذا الكود سنضعه في حدث الورقة لكي يتم الترتيب بعد انتقالك الى ورقة أخرى والعودة لصفحة بيانات أساسية وهذا هو الكود الخاص بذلك " كود التسلسل الاوتوماتيكي والترتيب الهجائي"

السلام عليكم أخي الكريم بعد دراسة الموضوع الذي عرضته يحتاج عند التفكير للوهلة الأولى لإضافة الشهور الناتجة إلى عدد الشهور الأصلية وبذلك قد يكون عندك كم هائل من الأشهر حسب أي من الشرطين ولذلك أحببت أن أضيف تحقق أي من الشرطين لتاريخ نهاية الخدمة المبين لديك في الملف ثم استخدام معادلة Datedif لحساب الفرق بين تاريخ بدء الخدمة والتاريخ الناتج عن أحد الشرطين كما يلي: حيث تم الضرب بعدد السنوات بغضّ النظر عن الأشهر حتى لو بلغت 11 شهراً و 30يوماً. =IF(B13<=10;$E$11+(60*E13);$E$11+(90*E13)) حساب نتيجة اقدمية.xlsx

معليش ورد خطأ بسيط في المعادلة المعادلة الصحيحة =DATEDIF(G4,H4,"y")&" "&"Years"&" "&DATEDIF(G4,H4,"ym")&" "&"Months"&" "&DATEDIF(G4,H4,"MD")&" "&"Days"

السلام عليكم يمكنك استخدام هذه المعادلة لحساب السنوات =DATEDIF(B18,C18,"y") أما الشهور فهذه المعادلة =DATEDIF(B18,C18,"ym") وأخيرا لحساب فرق الأيام يمكنك استخدام هذه المعادلة =DATEDIF(B18,C18,"md")

تجربة معادلة2 DATEDIF.xlsx

دالة datedif موجودة في جميع إصدارات إكسل ولكنها غير موجودة في قائمة الدوال ولا تظهر في الإكمال التلقائي نظرا لاختلاف عالمي في طريقة حساب الفرق بين تاريخين ويمكنك الاستفادة من هذا الرابط https://www.mr-mas.com/p/datedif.html لخساب الفرق بين تاريخين أونلاين وفي برنامج ميكروسوفت إكسيل

اخواني الأعزاء إليكم شرح برنامج حساب العمر بالسنة والشهر واليوم عند إدخال تاريخ الميلاد في خلية معينة. لمعرفة العمر بالسنين ففط =datedif(a1;today();"y") لحساب الشهور =datedif(a1;today();"ym") لحساب الايام =datedif(a1;today();"md") مع العلم ان a1 هي تاريخ الميلاد وإذا افترضنا اننا نريد العمر مكتوب كاملا نص في خلية ما فتكون المعادلة ="عمرك يساوي"&b1&"سنة و"&b2&"شهر و"&b3&"يوم" حيث b1 هي المعادلة الخاصة بمعرفة السنين وb2 الشهور و b3 الايام تحميل البرنامج

&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& حساب عمر شخص بالأيام و الشهور و السنين &&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&& لكي نحسب عمرشخص بالأيام والشهور والسنوات معا أي عندما يتخطى الفرق في الأيام 30 يوما يتم نقله إلى شهر و الإحتفاظ بالباقي و عندما يتخطي الفرق في الشهور 12 شهرا يتم نقله إلى عام و الإحتفاظ بالباقي.نستخدم الدالة DATEDIF أيضا =DATEDIF(C35;TODAY();"Y")&"Years;"&DATEDIF(C35;TODAY();"YM")&"Months;"&DATEDIF(C35;TODAY();"MD")&"Days" لاحظ أن تاريخ الميلاد موجود في الخلية C35 ولاحظ تكرارالدالةTODAYليطرح من تاريخ اليوم. بدلا من تكرار الدالة TODAYداخل المعادلة ممكن نضع تاريخ اليوم داخل خلية. =DATEDIF(C35;TODAY();"Y")&"Years;"&DATEDIF(C35;TODAY();"YM")&"Months;"&DATEDIF(C35;TODAY();"MD")&"Days" [=DATEDIF(C35;TODAY();"Y")&"سنوات;"&DATEDIF(C35;TODAY();"YM")&"شهر;"&DATEDIF(C35;TODAY();"MD")&"يوم" و ممكن نحسب العمر على ثلاث خلايا : الأيام في خلية و الشهور في خلية و السنوات في خلية بالمعادلات التالية. تاريخ الميلاد في الخليةC43 تاريخ اليوم في الخليةC45 =DATEDIF($C$43;$C$45;"MD")&"يوم" =DATEDIF($C$43;$C$45;"YM"&"شهر " =DATEDIF($C$43;$C$45;"Y")&"سنوات"