كلي تفاؤل و أمل
2014-01-19, 02:38 AM
السلام عليكم ورحمة الله وبركاته
يسرني أن أقدم لكم
طريقة حصر الطلاب الغائبين في اختبارات الفصل الأول من نظام نور
وطباعة كشف درجاتهم
ونسخة الجدول لاختبارات الغائبين
1- الدخول على نظام نور (يوزر المدير طبعاً): التقارير : تقارير الدرجات: كشف مراجعة درجات الطلاب. نقوم بحفظ الملفات بصيغة الأكسل.
ملاحظة: كشف كل طالب سيتم طباعته على ورقتين، بإمكانك فتح برنامج الأكسل وتعديل حجم الاعمدة لتصغير الصفحة وبالتالي الطباعة على ورقة واحدة.
2-
الطريقة1
نفتح الملفات ونبحث باستخدام خاصية البحث عن كلمة (غائب) ونختار البحث عن الكل، فتظهر لنا الصفحات التي يوجد بها كلمة غائب أسفل صندوق البحث، نسجلها في ورقة ثم نختار طباعة ونقوم بوضع أرقام الصفحات، ثم نطبعها.
أو
الطريقة2
نفتح ملف أول متوسط ثم نضغط على Alt+F11
للعربي: ثم نضغط على القائمة أدراج ثم الخيار الثاني Module
للانجليزي: insert> Module
ثم نلصق الأمر التالي:
Sub sama_print()
On Error Resume Next
For i = 1 To Sheets.Count
Sheets(i).Select
Sheets(i).[AQ1].Value = ""
With Sheets(i)
Range("AQ1").Font.ColorIndex = 2
End With
For Each cl In Range("a1:ao50")
If cl = "غائب" Then [AQ1].Value = "غائب"
Next
If Sheets(i).[AQ1].Value = "غائب" Then
Sheets(i).PageSetup.PrintArea = "a1:ao50"
Sheets(i).PrintOut copies:=1
End If
Next i
Sheet1.Select
End Sub
ثم نحفظه
ثم نعود لملف الأكسل ونضغط على عرض ثم وحدات مايكرو ثم نختار المايكرو الذي حفظناه ثم تشغيل.
سيقوم البرنامج مباشرة بالبحث عن الغائبين وطباعة أسمائهم.
افتح ملف ثاني وثالث متوسط (لاتغلق ملف أولى) ومباشرة اذهب إلى المايكرو وقم بتشغيله ليطبع الصفحات.
تابع الصور للطريقة2
أولا
http://im40.gulfup.com/9H79Y.jpg
ثانيا
http://im40.gulfup.com/y6EED.jpg
ثالثاً
http://im40.gulfup.com/WCxVK.jpg
في المرفقات
1- ثلاث صور شرح التعامل مع المايكرو في برنامج أكسل
2- ملف اكسل (داخل الملف مضغوط) جاهز للاستخدام. يعني افتح الملف ثم افتح ملفاتك وشغل المايكرو وسيطبع لك الغائبين مباشرة.
3- جدول مقترح لاختبارات الفصل الأول للطلاب الغائبين (مناسب إذا كان العدد قليل ويعتمد على عدد الغياب في المواد)
للأمانة منقول
جزى الله من قام بعمله خير الجزاء
يسرني أن أقدم لكم
طريقة حصر الطلاب الغائبين في اختبارات الفصل الأول من نظام نور
وطباعة كشف درجاتهم
ونسخة الجدول لاختبارات الغائبين
1- الدخول على نظام نور (يوزر المدير طبعاً): التقارير : تقارير الدرجات: كشف مراجعة درجات الطلاب. نقوم بحفظ الملفات بصيغة الأكسل.
ملاحظة: كشف كل طالب سيتم طباعته على ورقتين، بإمكانك فتح برنامج الأكسل وتعديل حجم الاعمدة لتصغير الصفحة وبالتالي الطباعة على ورقة واحدة.
2-
الطريقة1
نفتح الملفات ونبحث باستخدام خاصية البحث عن كلمة (غائب) ونختار البحث عن الكل، فتظهر لنا الصفحات التي يوجد بها كلمة غائب أسفل صندوق البحث، نسجلها في ورقة ثم نختار طباعة ونقوم بوضع أرقام الصفحات، ثم نطبعها.
أو
الطريقة2
نفتح ملف أول متوسط ثم نضغط على Alt+F11
للعربي: ثم نضغط على القائمة أدراج ثم الخيار الثاني Module
للانجليزي: insert> Module
ثم نلصق الأمر التالي:
Sub sama_print()
On Error Resume Next
For i = 1 To Sheets.Count
Sheets(i).Select
Sheets(i).[AQ1].Value = ""
With Sheets(i)
Range("AQ1").Font.ColorIndex = 2
End With
For Each cl In Range("a1:ao50")
If cl = "غائب" Then [AQ1].Value = "غائب"
Next
If Sheets(i).[AQ1].Value = "غائب" Then
Sheets(i).PageSetup.PrintArea = "a1:ao50"
Sheets(i).PrintOut copies:=1
End If
Next i
Sheet1.Select
End Sub
ثم نحفظه
ثم نعود لملف الأكسل ونضغط على عرض ثم وحدات مايكرو ثم نختار المايكرو الذي حفظناه ثم تشغيل.
سيقوم البرنامج مباشرة بالبحث عن الغائبين وطباعة أسمائهم.
افتح ملف ثاني وثالث متوسط (لاتغلق ملف أولى) ومباشرة اذهب إلى المايكرو وقم بتشغيله ليطبع الصفحات.
تابع الصور للطريقة2
أولا
http://im40.gulfup.com/9H79Y.jpg
ثانيا
http://im40.gulfup.com/y6EED.jpg
ثالثاً
http://im40.gulfup.com/WCxVK.jpg
في المرفقات
1- ثلاث صور شرح التعامل مع المايكرو في برنامج أكسل
2- ملف اكسل (داخل الملف مضغوط) جاهز للاستخدام. يعني افتح الملف ثم افتح ملفاتك وشغل المايكرو وسيطبع لك الغائبين مباشرة.
3- جدول مقترح لاختبارات الفصل الأول للطلاب الغائبين (مناسب إذا كان العدد قليل ويعتمد على عدد الغياب في المواد)
للأمانة منقول
جزى الله من قام بعمله خير الجزاء