كيف يتم دمج اكثر من شرط في جملة if

[ابو بهاء المصري]

الشرح في الصورة المرفقة

Book1.xls

 

تم تعديل نوفمبر 27, 2018 بواسطه ابو بهاء المصري

[أحمد يوسف]

اخى الكريم اود التوضيح اكثر فما هى ينود المعادلة وفى اى خلية بالضبط تريد وضع المعادلة

[ابو بهاء المصري]

علي سبيل المثال هذه المعادلة 

=IF(AL10="";"";(IF(AND(AM10<8;AL10<1.5;AK10<0.5);"  في الاحياء ولعدم الحصول علي ربع الدرجة في العملي واختبار التيرم";IF(AND(AM10<8;AL10="غ");" في الاحياء ولغيابه في التحريري";IF(AL10="غ";" في الاحياء لغيابه في التحريري";IF(AM10<8;" في الاحياء";IF(AL10<3;" في الاحياء لعدم الحصول علي ربع الدرجة";"")))))))

 

كانت تختبر رسوب الطالب في الاحياء بناء علي غيابه ودرجته في اختبار التحريري و الدرجة الكلية 

اما هذا العام فيوجد درجة عملي ودرجة تحريري وبالتالي احتمالات الرسوب للطالب ذادت . دا بالاضافة للدرجة الكلية
هذا الامر يخص شيت كنترول الصف الثاني الثانوي الجديد 2018

يمكنك كتابة المعادلة في اي خليه تعجبك وانا هعرف ادمجها في كنترولي

تم تعديل نوفمبر 27, 2018 بواسطه ابو بهاء المصري

[احمد بدره]

السلام عليكم

هذه المعادلة تكفي

=IF(G10="";"";IF(OR(E10="غ";E10<$E$9;F10="غ";F10<$F$9;G10<$G$9);"راسب";"ناجح"))

أنا عملتها بناءًا على الصورة قم بتغيير أسماء الخلايا ولا تسنى تثبيت الخلايا المعمولة بعلامة الدولار بالضغط على مفتاح F4

[ابو بهاء المصري]

اخي / احمد كامل السيد

تحية طيبة لحضرتك

بص هيه عجبتني الفكرة من منطلق تقصير طول المعادلة وبفكر اعتمدها 
بس كانت الفكرة انه يحددلي حينما تتطبع شهادة التلميذ سبب الرسوب اذا كان الغياب او ربع الدرجة او الدرجة الكلية النهائية للامتحان 

شكرا لحضرتك ومنتظر افكار اخري منكم ايضا ومن اخواني بالمنتدي

[ابو بهاء المصري]

ايه يا جماعة مفيش فكرة او حل تاني ولا ايه

[Emad Sabry]

حالات الرسوب اللى اعتمدتها بالدالة

غياب عملى وتحريرى

غياب عملى

غياب تحريرى 

ربع عملى + ربع تحريرى

ربع عملى 

ربع تحريرى 

كلية 

 

اذا لم تعمل معك الدالة استبدل , بالفاصلة المنقوطة ;

=IF(OR(E10="",F10="",G10=""),"",IF(AND(E10="غ",F10="غ"),"راسب لغيابه بالعملى والتحريرى",IF(E10="غ","راسب لغيابه بالعملى",IF(F10="غ","راسب لغيابه بالتحريرى",IF(AND(F10<F9,E10<E9),"ربع عملى + ربع تحريرى",IF(E10<E9,"ربع عملى",IF(F10<F9,"ربع تحريرى",IF(G10<G9,"كلية","ناجح"))))))))

 

تم تعديل نوفمبر 29, 2018 بواسطه Emad Sabry

[عبدالسلام ابوالعوافي]

بعد اذنكم .. جرب الصيغة الاتية 

=IF(E8<25;"ربع عملي";IF(E8="غ";"غياب عملي";""))&"  "&IF(F8<25;"ربع تحريري";IF(F8="غ";"غياب تحريري";""))&"  "&IF(G8<25;"ربع كلية";IF(G8="غ";"غياب كلية";""))

 

[ابو بهاء المصري]

استاذ/ عبد السلام ابو العوافي 

تحية طيبة لحضرتك شاكرين مروركم الكريم علي موضوعنا

تم تجربة دالتكم وتعمل بكل كفائة ولاكن ساعرض عليكم الصياغة النهائية بعد التعديل 
=IF(E10<0.5;"في الاحياء لعدم الحصول علي ربع الدرجة في العملي";IF(E10="غ";"في الاحياء لغيابه في العملي";""))&"  "&IF(F10<1.5;"في الاحياء لعدم الحصول علي ربع الدرجة في التحريري";IF(F10="غ";"في الاحياء لغيابه في التحريري";""))&"  "&IF(G10<8;"في الاحياء لعدم الحصول علي ربع الدرجة في الدرجة الكلية";IF(G10="غ";"غياب كلية";""))
انظر معكي شكل الناتج حينما يطبع في الشهادة

الم يكن من الافضل من ناحية الصياغة اللغوية المطبوعة في الشهادة او اي مرفق اخر رسمي او غير رسمي ان يكتب فيه 

((في الاحياء لعدم الحصول علي ربع الدرجة في العملي وفي الدرجة الكلية))

وسارفق لكم الملف الاساسي للتوضيح اكثر حي ان الدالة التي ستعرض علي حضرك كانت تعمل علي متغيرين فقط هما (درجة التحريري والدرجة الكلية) اما هذا العام زاد عليهم متغير اخر هو درجة العملي

وفي النهاية وجب الشكر لحضرتكم 

 

Copy of النظام الجديد.rar

[ابو بهاء المصري]

استاذ / عماد صبري 

اشكر مجهودكم الكريم ولكن الدالة غير كاملة حيث اهملت التنويه عن رسوبه  في الدرجة الكلية واشارت الي رسوبه في العملي والتحريري فقط

وايضا لاحظت انا الصياغة النهاية لجملة الرسوب لا تصلح ان تكتب في الشهادة بهذه الصيغة وانظر معي ايضا نتيجة تنفيذ دالتكم 

[Emad Sabry]

6 ساعات مضت, ابو بهاء المصري said:

استاذ / عماد صبري 

اشكر مجهودكم الكريم ولكن الدالة غير كاملة حيث اهملت التنويه عن رسوبه  في الدرجة الكلية واشارت الي رسوبه في العملي والتحريري فقط

وايضا لاحظت انا الصياغة النهاية لجملة الرسوب لا تصلح ان تكتب في الشهادة بهذه الصيغة وانظر معي ايضا نتيجة تنفيذ دالتكم 

انت ممكن تعدل الصياغة زى ما تحب 

تانى حاجة ايه فكرة انك تقوله انت مثلا غايب فى العملى و الدرجة الكلية 

يعنى لو كان مجموعه الكلى 18 من 20 وغايب فى العملى يعتبر برضه راسب على حسب ما انت شرحت فانا كتبت السبب الاساسى من وجهة نظرى 

وانت ممكن ترفع ملف وتكتب فيه الصياغات اللى عاوزها وهيتم مساعدتك فيها لان مش كلنا بنفهم فى موضوع التدريس والكنترول  

[عبدالسلام ابوالعوافي]

شاهد المرفق

الكود

Function RESULTA(rng As Range) As String
 Application.Volatile
Dim c As Integer
Dim r As Integer
Dim str As String
Dim subj As String
c = rng.Column
r = rng.Row
subj = Cells(2, c - 3).Text
str = "راسب في مادة " & subj & " "
If Cells(r, c) = "غ" Then str = str & "بسبب غيابه في العملي و"
If Cells(r, c + 1) = "غ" Then str = str & "بسبب غيابه في التحريري و"
If Cells(r, c) < Cells(9, c) Then str = str & "لعدم حصوله علي ربع الدرجة في العملي و"
If Cells(r, c + 1) < Cells(9, c + 1) Then str = str & "لعدم حصوله علي ربع الدرجة في التحريري و"
If Cells(r, c + 2) < Cells(9, c + 2) Then str = str & "لعدم حصوله علي ربع الدرجة في الكلية و"
str = Left(str, Len(str) - 2)
If Len(str) < 20 Then str = "ناجح"
RESULTA = str
End Function

 

المصنف1.xlsm

[Ali Mohamed Ali]

ممتاز دالة رائعة جعله الله فى ميزان حسناتك

[ابو بهاء المصري]

استاذ / عبد السلام ابو العوافي

سلمت يمينك هذا هو المطلوب حرفيا

بارك الله لك وجعله في ميزان حساناتك

ما قصرت يا اخي

في ٣٠‏/١١‏/٢٠١٨ at 16:16, Emad Sabry said:

انت ممكن تعدل الصياغة زى ما تحب 

تانى حاجة ايه فكرة انك تقوله انت مثلا غايب فى العملى و الدرجة الكلية 

يعنى لو كان مجموعه الكلى 18 من 20 وغايب فى العملى يعتبر برضه راسب على حسب ما انت شرحت فانا كتبت السبب الاساسى من وجهة نظرى 

وانت ممكن ترفع ملف وتكتب فيه الصياغات اللى عاوزها وهيتم مساعدتك فيها لان مش كلنا بنفهم فى موضوع التدريس والكنترول  

بارك الله فيك اخي / عماد صبري لقد تم انجاز الموضوع وحل المشكلة

وشكرا علي مرورك وردك الكريم

وجازاك الله عنا خيرا

وشايلينك لمشكلة اكبر في مرة اخري وارجو الا تمل او تغضب منا

[وجيه شرف الدين]

موضوع رائع ومميز بارك الله فيكم وجزاكم خير