المقياس المتدرج

[waledms]

الأخوه الأعزاء ... السلام عليكم ورحمه الله وبركاته ..... 

الشيت المرفق لدرجات التلاميذ المطلوب عمله ظهور المقياس المتدرج وكذلك اللون تبعا لمجموع درجات التلاميذ كما هو موضح بالشيت فى الخلايا المحدده

شيت.xlsx

[ابراهيم الحداد]

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

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

ضع المعادلة فى الخلية K5 ثم اسحب نزولا

اما الالوان فيمكنك استخدام التنسيق الشرطى 

Function Expectations(Rng As Range) As Variant
Dim i As Double, j As Double
Dim Apprn As Variant
i = CDbl(Rng.Value) ' Rng هى الخلية التى تحتوى على درجة المقياس
If i >= 85 And i <= 100 Then
Apprn = "يفوق التوقعات"
'--------------
ElseIf i >= 65 And i < 85 Then
Apprn = "يلبى التوقعات"
'--------------
ElseIf i >= 50 And i < 65 Then
Apprn = "يلبى التوقعات أحيانا"
'--------------
ElseIf i < 50 Then
Apprn = "أقل من المتوقع"
'--------------
End If
Expectations = Apprn
End Function

 

[waledms]

أرجو التوضيح

أين هذه المعادله

[ابراهيم الحداد]

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

اليك الملف

شيت.xlsm

[waledms]

تمام ... جزاك الله خيرا