معادلة مواد الرسوب يجب ان يتجاوز الفراغ

[مصطفى محمود مصطفى]

السلام عليكم

الاساتذة الافاضل جزاكم الله خيرا

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

=IF(COUNTIF(F11:M11;"<>")<7;"";IF(N11="";"";IF(OR(F11<50;F11="غائب");$F$4;"")&" "&IF(OR(G11<50;G11="غائب");$G$4;"")&" "&IF(OR(H11<50;H11="غائب");$H$4;"")&" "&IF(OR(I11<50;I11="غائب");$I$4;"")&" "&IF(OR(J11<50;J11="غائب");$J$4;"")&" "&IF(OR(K11<50;K11="غائب");$K$4;"")&" "&IF(OR(L11<5;L11="غائب");$L$4;"")&" "&IF(OR(M11<50;M11="غائب");$M$4;"")))

 

موادالرسوب.xlsx

[Ali Mohamed Ali]

جرب هذا

 

موادالرسوب.xlsx

[مصطفى محمود مصطفى]

السلام عليكم

رائع استاذ محمد وفقكم الله ورعاكم

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

لكم وافر احترامي وتقديري

[سليم حاصبيا]

هذا الماكرو يقوم بالمطلوب

Option Explicit
Sub Give_Data()
Dim MY_arr$
Dim my_st$: my_st = "غائب"
Dim i%, j%, K%: K = Range("d6").CurrentRegion.Rows.Count + 5
Dim t%: t = 2
Range("q6").Resize(K - 5, 1).ClearContents
  For i = 6 To K
   For j = 6 To 13
    If Cells(i, j) <> "" And (Cells(i, j) = my_st Or Cells(i, j) < 50) Then
       MY_arr = MY_arr & Cells(i, j).Offset(-t) & "   "

    End If
   Next
   Cells(i, 17) = MY_arr
   MY_arr = ""
   t = t + 1
 Next
End Sub

الملف مرفق

موادالرسوب.xlsm

[مصطفى محمود مصطفى]

السلام عليكم

استاذ سليم دائما مبدع

وفقكم الله ورعاكم

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

كود اكثرمن رائع

لكم وافر احترامي وتقديري

[مصطفى محمود مصطفى]

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

واذا درجة  الاسلامية ناجحة المعادلة تستخرج جميع المواد الراسبة صحيحة بدون مشاكل

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

شكرا لكم مع تحياتي

موادالرسوب++++.xlsx

تم تعديل أغسطس 23, 2018 بواسطه مصطفى محمود مصطفى

[سليم حاصبيا]

ربما  ينال الاعحاب هذا الملف (معادلات)

موادالرسوب++Salim.xlsx

[مصطفى محمود مصطفى]

السلام عليكم:
استاذ سليم وفقكم الله وحفظكم من كل سوء اعمالكم روعة وحتما تعجبني وتعجب الاخوة الاعضاء

اساس المعادلة السابقة الاولى قبل اجابة استاذ محمد جزاه  الله خيرا

هو مشكلة الفراغ في مادة الاجتماعيات اذا لم تكن درجة في عمود الاجتماعيات او كلمة غ

اقصد اذا الخلية فارغة تبقى فارغة ولاتعتبر مادة راسبة ولا تدرج ضمن مواد الرسوب المعادلة الاخيرة ادرجت الاجتماعيات ضمن مواد الرسوب والحقل فراغ

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

شكرا لكم مع تحياتي

[مصطفى محمود مصطفى]

السلام عليكم:

الاخ محمد جزاكم الله

الاخ سليم جزاكم الله خيرا

وجدت الخلل الذي في معادلة الاستاذ محمد جزاه الله خيرا

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

وفقكم الله وشاكر لكم جهودكم

شكرا لكم مع تحياتي

 

 

تم تعديل أغسطس 23, 2018 بواسطه مصطفى محمود مصطفى