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

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

قام بنشر

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

لو سمحتم عندى شيت اكسل به اسماء الطلاب ودرجاتهم ومطلوب عمل معادلة توضح حالة الطالب سواء ناجح أو دور ثاني أو راسب

تنقسم حالة الطالب إلى ثلاثة حالات إما ناجح وهو أن يكون المجموع فى كل مادة أكبر من أو يساوى الدرجة الصغرى ،

أو راسب وهو أن يكون راسب فى أكثر من ثلاث مواد

او دور ثاني وهو أن يكون راسب فى مادتين أو مادتين +التربية الدينية

المطلوب عمل معادلة لهذا الامر وشكرا

تم ارفاق الملف لعمل المعادلة وشكرا 

حالة الطالب.rar

قام بنشر

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

استخدم هذا الكود وخصص له زر

Sub Results()
Dim i As Long, p As Long
Dim x As Integer, z As Integer
For i = 6 To Sheet1.Range("C" & Rows.Count).End(xlUp).Row
p = 0
For j = 4 To 10
If Cells(i, j) < Cells(5, j) Then
p = p + 1
End If
If Cells(i, 11) < Cells(5, 11) Then
x = 1
Else
x = 0
End If
If p = 0 And x = 0 Then
Cells(i, 12) = "ناجح"
ElseIf p <= 2 And x = 0 Then
Cells(i, 12) = "دور ثانى"
ElseIf p <= 2 And x = 1 Then
Cells(i, 12) = "دور ثانى"
ElseIf p > 2 Then
Cells(i, 12) = "راسب"
End If

Next
Next
End Sub

 

قام بنشر

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

 

قام بنشر

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

يمكن بالمعادلات و لكنها تحتاج الى عدد من الاعمدة المساعدة

كما ان من مميزات الاكواد انها لا تثقل من حجم الملف مما يسهل التعامل معه

            هذا وبالله التوفيق

  • Like 1
قام بنشر

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

استخدمت فيه دالة if لحساب عدد مواد الرسوب كما هو واضح فى الصورة

ثم بعد ذلك استخدمت دالة if لمعرفة حالة الطالب ناجح أو دور أو راسب 

مرفق صورة فيها المعادلة 

 

2.PNG

1.PNG

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

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

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

Important Information