[للنقاش] خاص بالدوائر الحمراء لشهادات النقل للمرحلة الاعدادية

[محمد ابو البـراء]

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

اخواني العاملين في الحقل التعليمي

سواء العاملين في الكنترول الورقي

او الكنترول الالكتروني

مرحبا بكم جميعاً

وبعد

هناك موضوع لعلنا مختلفين فيه بعض الشئ!!!

وهو خاص بالشهادات والدوائر الحمراء

والخص الموضوع في الاتي!!

[ من المعلوم ان طالب النقل للمرحلة الاعدادية

يكون سبب رسوبه من جهتين

اما ان يقل عن نصف الدرجة في مجموع المادة ككل

او

يقل عن 15 درجة في اختبار الترم الثاني ]

طيب!!!!!

في هذه الحالة تقابلنا مشكلة اظن الكثير منا وقف بصددها

وهي

لو الطالب حصل في المادة على اكثر من النصف

و

حصل في اختبار الترم الثاني على درجة اقل من الربع

هل في هذه الحالة

نقوم بوضع دائرة حمراء على المجموع الكلي؟!

ام

نفعل كما فعلت انا في الشيت الخاص بمدرستي؟!

وهو عدم وضع اي شئ وكتابة سبب رسوبه في الشهادة في مواد الرسوب؟!

مثل هذا

 

اتمنى المشاركة والتفاعل لنقرب وجهات النظر ونصل الى الافضل بإذن الله تعالى..

[hafez81]

[أم عبد الله]

الأستاذ الفاضل / محمد أبو البراء

 

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

 

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

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

الغالي / محمد ابو البراء

والغالية / ام عبدالله

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

اما بعد

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

فانا اريدها للشهادة وللنتيجة الورقية وللشيت الكبير المطبوع وانا علي مقربة باذن الله تعالي من حلها ، بس خليكم علي رنة ممكن الدنيا تبوظ معايا وفي الحالة دي  مش هيبقي قدامي غيركم (ابتسامة رقيقة)

اما بعد ايضا

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

تم تعديل يونيو 8, 2014 بواسطه ابو بهاء المصري

[محمد ابو البـراء]

الوالدة الفاضلة // أم عبد الله

شكراً لتفاعلكم معنا في الموضوع

وللعلم ما قلتيه هو نفس كلامي الذي قلته لرئيس الكنترول عندما سألني عن الطالب كيف راسب وليس عليه اي دوائر؟!

فقلت له ان المشكلة ستكون اكبر لو وضعنا دائرة على درجة اكبر من الدرجة الصغرى ..

[محمد ابو البـراء]

الاستاذ الفاضل // وليد أبو بهاء

جزاك الله خيراً على مداخلتك

ولكن لم افهم ماذا تقصد

ولهذا شعرت ان الكلام الثاني يخالف الكلام الاول؟!..

[عز أبو أنس]

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

 

استاذي // محمد أبو البراء

 

من المفترض أن نضع دوائر حمراء للطلاب الراسبين في الربع

 

كذلك لا نضع تنسيق شرطي للطالب الراسب في الربع في الشهادة 

 

حتي نفرق بينه وبين الطالب الراسب

 

أي توضع الدائرة بدون تظليل الخلية

[محمد ابو البـراء]

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

شكرا الاستاذ عز أبو انس ( علي عبد الدايم ) على تداخلك

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

ولي اقتراح ممكن يجمع بين وجهتين النظر

فيما يرى ان يضع دائرة حمراء ومن لا يريد لان يضع دائرة حمراء

وهي عمل سطر في اخر الشهادة مكتوب فيه مثلا
 

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

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

[عز أبو أنس]

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

 

استاذي // محمد أبو البراء

 

 

أنا حاولت أن أضع بجوار الأسم في الشهادة كلمة (راسب بالقانون)

 

وذلك للطالب الذي لم يحصل علي الربع 

 

أنا حاولت عمل كود في (محرر الأكواد) لعمل ذلك

 

لكن الكود بيتنفذ في الثلاث شهادات 

 

أريد أن يتنفذ فقط في شهادة الطالب الذي لم يحصل علي الربع

 

أريد مساعدتك في ذلك

الملف الذي حاولت فيه

 

من هذا الرابط

 

http://www.up-00.com/?P1RQ

تم تعديل يونيو 10, 2014 بواسطه عز أبو أنس

[محمد ابو البـراء]

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

أخي الفاضل استاذ // عز أبو انس

1 ) اظن ان الذي تريده بهذا الشكل نتيجته غير مرضية

حتى وان تم النفيذ على شهادة واحدة

والسبب

ان حضرتك هتعمم للطالب انه رسب بالقانون

وهذا غير صحيح للجميع

فربما

 هناك طلاب راسبون  سيكون عندهم مزيج بين مواد بالقانون رسبوا  فيها  ومواد الرسوب العادي!!

ولهذا اقترح ان تغير الطريقة التى تريد تعريف الطالب فيها انه رسب بالقانون

واجعل هذا الامر منفصل لكل مادة على حدى؟!

وان رايت ان كلامي غير مقنع

فليس هناك مشكلة :fff:

وهناك طرق لتنفذ ما تريد

منها على سبيل المثال لا الحصر

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

وليكن واحدة بكتابة النقطتين اسفل حرف الياء اخرى بدون

ثم تقوم بضبط الكود على هذا الامر

بإذن الله سيضبط معك

وانا في خدمتك :fff:

وهذا ملف مرفق خاص بشيت  مدرستي اتمنى ان تتطلع عليه لترى شكل الشهادات !!

 

 

 

شيت فصل الدراسي الثاني _ الصف الثاني _ نهائية.rar

[عز أبو أنس]

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

أخي الفاضل استاذ // محمد أبو البراء

أنا حاولت أعمل كما قلت ولكن المحاولة فشلت ( اريد ذلك حتي من باب المعرفة)

هل ممكن يتنفذ ذلك بالأكواد ولا الأمر صعب 

لو سمحت حاول مساعدتي

 

لو سمحت ممكن الشيت بتاعك بالكامل يكون أكواده مفتوحة ( للإستفادة من بعض الأكواد الموجودة فيه)

[محمد ابو البـراء]

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

الاستاذ الحبيب // أبو انس

1 ) ممكن اعرف اين الكود الذي قمت بعمله ليخرج لك كلمة راسب بالقانون وسانفذ لك ما تريد بإذن الله تعالى

2 ) اما الشيت بتاعي فكل اكواده مفتوحة..!!

[عز أبو أنس]

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

أخي الفاضل استاذ // محمد أبو البراء

 

بالنسبه للشيت بتاعك في بعض الأكواد مفقودة عند تنفيذ ذلك علي الأزرار أو عير مرتبطة بأي كود بالمرة

 

وإن كان ده هزعلك مش مشكلة 

 

الموضوع الثاني أدي الكود 

Sub Start_Circles()
Dim x As Integer, d As Integer
Dim Col As Range
Dim MyRng As Range
Dim M_Rng As Range
Dim roRng As Range
'================================================
 
Set M_Rng = ActiveSheet.Range("J12,J24,J36")
Set MyRng = ActiveSheet.Range("E16:P16,E28:P28,E40:P40")
 
'================================================
 
Remove_Circles
'================================================
 
Myrow = 15
x = ActiveWindow.Zoom
 
Application.ScreenUpdating = False
ActiveWindow.Zoom = 100
For Each Col In MyRng
 
    If IsNumeric(Cells(Myrow, Col.Column)) And Not IsEmpty(Cells(Myrow, Col.Column)) And (Val(Col) < Val(Cells(Myrow, Col.Column)) Or Val(Col.Value = "غ") Or Col.Offset(1, 0) = "دون المستوى") And Col <> "" Then
        kh_Add_Circles Col
        d = d + 1
        
     End If
 
For Each roRng In M_Rng
 
    If Col.Offset(1, 0) = "دون المستوى" And Val(Col.Value) >= Val(Cells(Myrow, Col.Column)) Then roRng.Value = "راسب بالقانون"
 
 Next roRng
 Next Col
  
ActiveWindow.Zoom = x
Application.ScreenUpdating = True
 
Set MyRng = Nothing
End Sub

[محمد ابو البـراء]

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

هذه حيلة من الحيل

قم باستخدامها بإذن الله تعالى ستنفع

ولكن انا لم اتم تنفيذ المعادلة كاملة

بل قمت بتنفيذها على اول 3 مواد في الشهادة فقط

فان اعجبتك سيتم تطويرها لما يتلائم معكم..

=IF(OR(AND(E16>=E15;E17="دون المستوى";E16<>"غ");AND(F16>=F15;F17="دون المستوى";F15<>"غ");AND(G16>=G15;G17="دون المستوى";G16<>"غ"));"راسب بالقانون";"")

نظرا لضيق الوقت ضع هذه المعادلة في الخلية f11

وطبعا انا غيرت المكان

لانني عند وضعها في الخلية j12 يتم حذف المعادلة

وفي انتظار استفساراتك

[محمد ابو البـراء]

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

ليس عندى وقت لصلاة المغرب

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

ولكن ما حاولت يوما ان اتعلمها

لانني على يقين انه ان لم ينفعنى علمي في مماتي فبئس العلم اذن

وبإذن الله بعد عودتى سافحص ما تقصده!!

وولا تنسى الحل في المشاركة السابقة

[عز أبو أنس]

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

أخي الفاضل استاذ // محمد أبو البراء

 

يا سلام عليك مش عارف أشكر إزاي

بارك الله فيك وزادك الله من فضله 

 

هل ممكن تطبيقها بأكواد البيسك

تم تعديل يونيو 10, 2014 بواسطه عز أبو أنس

[محمد ابو البـراء]

1 ) ساحاول بإذن الله تعالى

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

2 ) بالنسبة للملف الذي ارفقته والخاص بي

فهو عمل شخصي على السريع لمتطلبات المدرسة فقط

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

ولذلك غالب الزارير انا لم افعلها اصلاُ لعدم احتياجها..

[عز أبو أنس]

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

أخي الفاضل استاذ // محمد أبو البراء

 

بارك الله فيك وزادك الله بالعلم الكثير