أبو عبد الملك السوفي

السلام عليكم كيف حال استاذنا الجليل خليل نعم قمت ببعض التعديلات قمت بتطبيق جزء الكود الذي يحسب العمود E وطبقته على الاعمدة F G J K L M S لانه نفس الكود وكلها تحسب بنفس الطريقة استغرقت وقت طويل جدا لفهم هاته الجزئية من الكود

للرفع بورك في علمكم وعملكم

السلام عليكم كيف حال اساتذتنا واخواننا في منتدانا الغالي هذا برنامج بدأت فيه قبل شهر رمضان مع اللاستاذ الافضل ابو البراء لكن لشغل استاذنا بالسفر توقف الرنامج ولم نتممه فارجوا من الاستاذ الكريم ياسر خليل او بقية اساتذتنا بمساعدتي لاتام البرنامج في المرة الماضية توقفنا في صفحة التقرير الفصلي لنبدأ في العمود P و Q نعلم ان الفصل فيه ثلاث اشهر (كما هو كوضح في شيت الفصول) ولملا العمود P و Q بالاعتماد على المعطيات الموجودة في شيت مجمع النتائج الشهرية يذهب الكود للشهر الاخير من الفصل (مثلال الفصل الاول فيه اوت و سبتمبر و اكتوبر فيذهب الكود لشهر اكتوبر) ويرى ان كانت مجموع الدرجات اكبر من 60 فيأخذ الموجود في العمود Nو ينتقله للعمود P في شيت التقرير الفصلي وان كان اقل فياخذ العمود L وينقله للعمودP مثال: لدينا الطالب زاوي وليد في صفحة التقرير الفصلي وفي العمود X نجد مكتوب الفصل الاول يذهب الكود لشيت مجمع النتائج الشهرية ويذهب للشهر الاخير من الفصل الاول اي اكتوبر ثم يذهب للعمود R(مجموع الدرجات ) المجموع =60 يعني انه سياخذ الحديد 28ويكتبها في العمودP و Q على التوالي في صفحة التقرير الفصلي ولو كانت اقل من 60 كان سياخذ المجادلة 1 Quran School V9.xlsm.rar

السلام عليكم آسف جدا استاذ ياسر امس كنت مرهق جدا.جدا نسبة الانجاز الآن 70% تقريبا لقد اكملت كل الاعمدة في صفحة التقرير الفصلي بنفسي قلدت الاكواد التي وضعتها فهمها كان صعب جدا الااني في النهاية فهمتها ولم يبقى لي الا 3 اعمدة وهي المجموع والرتبة والمنهج استودع الله دينك وامانتك استاذ ياسر تذهب وتعود لنا بالسلامة ان شاء الله في اقرب وقت ارجوا ان اجد من يساعدني من الاساتذة لاكمال الملف

السلام عليكم اعتذر والله استاذ ياسر فالنت بطيئة لا ادري ان كنت سافرت ام لا استاذ سار ساشرح لك كيف يعمل البرنامج لتكون عندك فكرة في نهاية كل شهر ا نكتب بيانات الطلبة في صفحة التقرير الشهري والدرجات التي تحصلوا عليها ونسبة حفظهم وعدد الغيابات والمخالفات ...الخ خلال هذا الشهر ثم نرحل كل تلك البيانت لصفحة تجميع نسميها مجمع النتائج الشهرية والشهر الموالي نفس الشئ وبعد 3 اشهر (ونسميه فصل ) نقيم مستوى الطالب خلال هاته الاشهر الثلاث فنحسب له متوسط درجة السوك ومتوسط اختبار الحفظ الشهري ومتوسط اختبار المراجعة الشهري ........الخ الا الالختبار الفصلي للحفظ والاختبار الفصلي للمراجعة يتم ادخالها يدويا اما البقية فالبرنامج يتكفل بحسابها ومتوسط السلوك مثلا يحسب كالتالي=(درجة السلوك للشهر + درجة السئوك للشهر الثاني+ درجة السلوك للشهر3 )/3 اجيب على اسئلتك استاذ ياسر: عمود المخالفات في التقرير الفصلي= عدد المخالفات لشهر أوت+ عدد المخالفات لشهر سبتمبر+عدد المخالفات لشهر أكتوبر(كلها موجودة في صفحة مجمع النتائج الشهرية) السور في العمود N O يكتب السورة والاية الموجود في العمود M L في شهر اوت (اي الشهر الاول من الفصل) وفي العمود Q P يكتب السورة والآية الموجودة في العمود N O في شهر أكتوبر(اي الشهر الاخير من الفصل) في عمود المنهج يكتب السورة والآية الموجودة في شهر أكتوبر(اي الشهر الاخير من الفصل) عند كتابة البيانات في صفحة التقرير الفصلي يتم ترحيلها الى صفحة اخرى اسمها مجمع النتائج الفصلية استاذ ياسر انا اتبع تعليماتك واردت عرض الموضوع نقطة نقطة حتى لا تختلط الامور لانه لو تناولناها جملة ستتعقد وتختلط لذا اردت تناولها جزئية جزئية Quran School V8.rar

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

السلام عليكم اقصد بـ الاعمدة E D C B A تبقى لها نفس الكودات ولا يجري عليها اي تغيير. هو ليس ترحيل بل استدعاء كما فعلنا في صفحة التقرير الشهري الكود يجلب البيانات للاعمدة C B A من صفحة معلومات التسجيل العمود D يعطي للطالب حلقته بالاستعانة بصفحة الحلقات و العمود N العمود E يحسب درجة السلوك باعتبار العمود R (عدد المخالفات) اقصد هاته الجزئية من الكود تبقى كما هي: Sub CopyDataFromRecordInf() Dim WS As Worksheet, SH As Worksheet Dim LR As Long, LRCur As Long, I As Long Dim rngA As Range, rngB As Range, rngC As Range, rngD As Range Dim X, Y, XX, YY Dim rngMnhg As Range Set WS = Sheets("ãÚáæãÇÊ ÇáÊÓÌíá"): Set SH = Sheets("ÇáÊÞÑíÑ ÇáÔåÑí") LR = WS.Cells(Rows.Count, 1).End(xlUp).Row With Sheets("ÇáãäåÌ") LRCur = .Cells(Rows.Count, 1).End(xlUp).Row Set rngA = .Range("A2:A" & LRCur): Set rngB = .Range("B2:B" & LRCur) Set rngC = .Range("C2:C" & LRCur): Set rngD = .Range("D2:D" & LRCur) Set rngMnhg = .Range("A2:D1000") End With Application.ScreenUpdating = False With SH SH.Range("A2:E1000,I2:K1000,R2:U1000").ClearContents For I = 2 To LR .Cells(I, 1) = WS.Cells(I, 1) .Cells(I, 2) = WS.Cells(I, 2) .Cells(I, 3) = WS.Cells(I, 3) .Cells(I, 4).Formula = "=IF(" & .Cells(I, 12).Address & "="""","""",LOOKUP(INDEX(QNumbers,MATCH(" & .Cells(I, 12).Address & ",QNames,0)),ÇáÍáÞÇÊ!$F$2:$F$6,ÇáÍáÞÇÊ!$B$2:$B$6))" .Cells(I, 4).Value = .Cells(I, 4).Value If .Cells(I, 16) > 5 Then .Cells(I, 5) = 0 Else .Cells(I, 5) = 5 - .Cells(I, 16) End If هي تشبه صفحة التقرير الشهري تماما واختصارا للوقت نسمي اللكود باسم آخر ونستغله في صفحة التقرير الفصلي. الاختلاف بين الكود في صفحة التنقرير الشهري والكود في صفحة التقرير الفصلي يبدأ في العمود F كما شرحته في اول الموضوع

السلام عليكم كيف حالكم استاذ ياسر كنت اضنك سافرت مرفق Quran School V8.rar

السلام عليكم اساتذتنا الكرام هذا البرنامج بدأت فيه مع الاستاذ الكبير ابو البراء جزاه الله كل خير لكنه سافر لعدة اسابيع نسال الله ان يحفظه ويرده الينا سالما غانما في اقرب وقت فرجوا من اساتذتنا الكرام مساعدتي حتى رجوع استاذنا ياسر وصلنا الى صفحة التقرير الفصلي واريد فيها ما يلي في هاته الصفحة تقريبا نفس اكودات لكن يجري على بعضها تغييرات. الاعمدة E D C B A تبقى لها نفس الكودات ولا يجري عليها اي تغيير. العمود F(الاختبار الشهري للحفظ): ويقوم الكود بحساب متوسط درجات الطالب في الاشهر التابعة للفصل المراد حسابه (المكتوب في العمودX) وذالك بالاستعانة بصفحة الفصول وصفحة مجمع النتائج الشهرية مثلا : اذا كان العمودX مكتوب فيه الفصل الاول فنذهب لصفحة الفصول فنجد ان الفصل الاول فيه شهر أوت + سبتمبر+أكتوبر فيقوم الكود بحساب متوسط درجة اختبار الحفظ لشهر أوت و سبتمبر واكتوبر الموجودة في صفحة مجمع النتائج الشهرية ثم يكتبها في العمودF في صفحة التقرير الفصلي. مثال بالارقام: لدينا الطالب زاوي وليد بن إبراهيم العمودX متكوب فيه الفصل الاول الفصل الاول يضم شهر أوت سبتمبر أكتوبر نذهب لصفحة مجمع النتائج الشهرية درجة اختبار الحفظ لشهر أوت للطالب زاوي وليد بن إبراهيم هي 22 درجة اختبار الحفظ لشهر أوسبتمبر للطالب زاوي وليد بن إبراهيم هي25 درجة اختبار الحفظ لشهر أكتوبر للطالب زاوي وليد بن إبراهيم هي20 متوسطهم هو (22+25+20)/3/=22.33 22.33 تكتب في صفحة التقرير الفصلي في العمودF .وبالاجمال الكود يحسب متوسط درجات اختبار الحفظ الشهرية للطالب حسب الفصل Quran School V8.rar

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

السلام عليكم الحمد لله تم الانتهاء من كل العمليات الخاصة بالصفحة والاعمدة الباقية يتم الادخال فيها يدويا اي انه لا يجب ان تكون هناك اي خانة فارغة مثلا السطر 3 كل المعلومات مكتوبة الا اختبار الحفظ او المخالفات او الاشتراك غير مكتوبة فلا يتم الترحيل الا بعد استكمال البيانات اقصد انه لا يتم ترحيل اي بيانات الا بعد استكمال كل البيانات نسال الله ان تذهب وتعود لنا سالما غانما في اقرب وقت ان شاء الله نعم مشينا مشوارا لا باس به لكن مازالت هناك صفحات اخرى مهمة اسف ان كنت اثقلت عليك استاذ ياسر

السلام عليكم بورك فيك استاذ ياسر تمام مائة بالمائة بالفعل ابا البراء المعطيات الصحيحة تساوي نتائج صحيحة استاذنك في الانتقال للمرحلة الاخيرة في هاته الصفحة الا وهي الترحيل اريد كود مستقثل يرحل كل البيانات من صفحة التقرير الشهري الى صفحة مجمع النتائج الشهرية وقبل الترحيل يخيرك هل تريد الترحيل فعلا نعم او لا وبعد الترحيل يمسح كل البيانات في صفحة التقرير الشهري و عندما اقوم بعملية ترحيل اخرى من صفحة التقرير الشهري الى صفحة مجمع النتائج الشهرية البيانات الجديدة المرحلة تكون تحت القديمة مباشرة وهكذا وشيئ آخر استاذ ياسر اذا كانت هناك معطيات ناقصة في صفحة التقرير الشهري الكود يخبرك ان المعطيات ناقصة ويجب اكمالها قبل مواصلة عملية الترحيل Quran School V7.rar

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

السلامن عليكم هاته هي النقطة ما قبل الاخيرة في هاته الصفحة اللنقطة ما قبل الاخيرة وهي المنهج في العمود U وتكون بالاعتماد على العمودين L وM و الجدول منA الىD في صفحة المنهج حيث يكتب في عمود المنهج السطر 10 من بداية الحفظ مثلا طالب بدأ من المجادلة 1 واذا رجعنا الى صفحة المنهج نجد رقمها في الجدول 221 فاذا حسبنا 10 اسطر انطلاقا من السطر 221 فسنقف في السطر رقم 230 اي الحديد3 (اي ان الطالب كان يفترض به ان يحفظ من المجادلة 1 الى الحديد 3 ). مثلا طالب بدأ من المرسلات5 واذا رجعنا الى صفحة المنهج نجد رقمها في الجدول 111فاذا حسبنا 10 اسطر انطلاقا من السطر 111فسنقف في السطر رقم 120اي الانسان28(اي ان الطالب كان يفترض به ان يحفظ من المرسلات5 الى الانسان28) .مثلا طالب بدأ من الواقعة16 واذا رجعنا الى صفحة المنهج نجد رقمها في الجدول 246فاذا حسبنا 10 اسطر انطلاقا من السطر 246فسنقف في السطر رقم 255 اي الرحمن16(اي ان الطالب كان يفترض به ان يحفظ من الواقعة16الى الرحمن16) وهكذا Quran School V7.rar

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

السلام عليكم كيف حال اساتذنا الكبير ابا البراء آسف جدا عن التاخر في الرد فقد كانت النت مقطوعة ماشاء الله تبارك الرحمان كل شيئ تمام والله انا اتعبك كثيرا معي استاذ ياسر اسال الله ان يكون هذا البرنامج صدقة جارية الى يوم القيامة ان شاء الله ننتقل علىلا بركة الله الى نقطة التقدير في العمود T بالعتماد على مجموع الدرجات في العمودR والتقدير يكون كالتالي: اذاكان المجموع من 98 الى 100 يكتب العبارة التالية : ناجح بتقدير ممتاز جدا اذاكان المجموع من 90الى 97يكتب العبارة التالية : ناجح بتقدير ممتاز اذاكان المجموع من 80الى 89يكتب العبارة التالية : ناجح بتقدير جيد جدا اذاكان المجموع من 70الى 79يكتب العبارة التالية : ناجح بتقدير جدا اذاكان المجموع من 60الى 69يكتب العبارة التالية : ناجح بتقديرحسن اذاكان المجموع من 50الى 59 العبارة التالية : راسب بتقدير ضعيف اذاكان المجموع من 40الى 49يكتب العبارة التالية : راسب بتقدير ضعيف جدا اذاكان المجموع من 30الى 39يكتب العبارة التالية : راسب بتقدير توبيخ اذاكان المجموع من 0الى 29يكتب العبارة التالية : راسب بتقدير إنذار Quran School V6.rar

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

ممتاز استاذنا ابا البراء الآن نقطة الترتيب في العمودS حيث يتم مقارنة مجموع درجات الطالب بباقي المجاميع وتعطى له الرتبة المناسبة كما تفعل الدالة RANK لكن عند تعادل مجموعين يقدم الكود الطالب الاقل عدد غيابات (العمود H) فاذا تعادلا في الغياب أيضا يقدم اكثر نسبة حفظ (العمودJ) فاذا تعادلا يقدم الاعلى درجة في اختبار المراجعة(العمودG) فاذا تعادلا يقدم الاعلى درجة في اختبار الحفظ(العمودF)فاذا تعادلا يضع لهما نفس الرتبة Quran School V5.rar

السلام عليكم نواصل على بركة الله المجموع في العمود R و R=E+F+G+I+K Quran School V5.rar

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

السلام عليكم ماشاء الله عليك استاذ ياسر كل شيئ تمام اسال الله ان يبارك لك في علمك لننتقل للنقة التي بعدها الا وهي العمودK درجة الحفظ وهي عن 10 درجات وهي تعتمد على نسبة الحفظ (اي العمود J) فكل 10% بدرجة فمثلا لو كانت نسبة الحفظ 10% ياخذ درجة ولو كانت نسبة الحفظ 30% ياخذ 3درجات ولو كانت نسبة الحفظ 90% ياخذ 9 درجات ولو كانت نسبة الحفظ 100% فما اكثر ياخذ 10 Quran School V5.rar

السلام عليكم لننتقل الان الى العمود J ونحدد نسبة حفظ الطالب بدلالة الاعمدة (M L) (O N) وبالاعتماد على صفحة المنهج وبالضبط الالعمدة من A الىD بحيث ان نسبة الحفظ هي عدد الاسطر التي حفظها الطالب خلال الشهر والطالب مطالب بحفظ 10 اسطر كل شهر اي ان كل سطر يحتسب 10% مثل1: الطالب زاوي وليد بن إبراهيم بدا الحفظ من المجادلة 1 الى الحديد20 لو ذهبنا الى الجدول لوجدنا ان المجادلة 1 رقمها 221 والحديد 20 رقمها 239 اذا 239-221=18 اي ان نسبة الحفظ 180% مثال2:الطالب رضواني عبد القدوس بن الطاهربدا الحفظ من الملك8 الى الواقعة 16 لو ذهبنا الى الجدول لوجدنا ان الملك8 رقمها 165 و الواقعة 16رقمها 246 اذا 246-165=81 اي ان نسبة الحفظ 810% وهكذا والآيات مهمة فيجلب على الكود الاخذ في اللحسبان السورة والآية معا Quran School V4.rar

السلام علكيم ممتاز استاذنا ابا البراء لننتقل الى موضوع آخر على بركة الله

السلام عليكم آسف جدا استاذ ياسر كنت اضن اني وضعت ملف مرفق كل المعطيات رقمية مثلا اذا كان له 2 مخالفة فالدرجة تكون 5-2=3 اذاكانت 5مخالفات فالدرجة 5-5=0 اذا كانت 6مخالفات فما اكثر فالدرجة 0 نفس الشيئ بالنسبة للغيابات Quran School V3.rar

السلام عليكم كيف حال استاذنا اليوم ماشاء الله كل شي تمام ننتقل للنقطة 3 و 4 لانهما متشابهتان: 3-العمود e مخصص لدرجة السلوك وهي من 5 وتحسب على حسب المخالفات في العمود p كل مخالفة بناقص درجة. 4-العمود i مخصص لدرجة المواظبة وهي من 15 وتحسب على حسب الغيابات في العمود h كل غياب بناقص 3درجات. العمودp وh يتم الادخال فيهما يدويا استاذ ياسر هل تقصد كل نقطة في هذا الشيت نخصص لها موضوع جديد اذا كان كذالك فانا اخشى تشتت الامر اما ان كنت تقصد كل شيت نخصص له موضوع جديد فهذا ممكن