بسم الله الرحمن الرحيم
احبابنا في الله
ادعو الله ان تكونوا بخير يارب
هذا ملف به كود خاص باخراج كشوف لجان الطلاب المدرسيه بالمصفوفات وما أسهله وما أسرعه
طريقه الاستفاده من هذا الملف
افتح هذا الملف
اضغط على زر ALT وانت ماتزال ضاغط
اضغط على F11
سيتم فتح محرر الاكواد .. ستجد امامك موديولات بها الاكواد
دبل كليك على الموديول المعنون Legan_Test
ثم اضغط من لوحة المفاتيح على ALT +SHEFT
لتكون اللغه هي العربيه
منعا لظهور اللغه العربيه بشكل طلاسم
اجعل مؤشر الماوس في الكود ثم اضغط CTRL +A
لتحديد الكود كله
ثم CTRL+C ليتم النسخ
=====
** افتح ملفك وافتح محرر الاكواد كما اشرنا سابقا
** ومن قائمه محرر الاكواد التي فتحت امامك
** اختر Insert واختر منها Module
** ثم ضع المؤشر في Module
** والصق الكود
==========
اكتب عدد اللجان التي تبغاها في الخليه G4 في صفحة بيانات الطلبه
وستجد ان امام كل اسم رقم لجنته
لوجود معادلات خاصه بالعالم العلامه عبد الله باقشير
تضبط هذه العمليه
وقد جعلتها واضحه في الصفحه
حتى اضعها تحت الاضواء
ماعليك الا ان تنسخها وتضعها في ملفك في نفس الخلايا
اما اذا اردت تغيير مكانها فلك مطلق الحريه
*** اضغط على زر الزياده والنقصان
*** ثم زر استدعاء كشوف
=========
احمد الله وادعو لكل من له بصمه في اخراج هذا العمل بالخير
يكفي جملة
جزاكم الله خيرا

لجان كنترول مدرسي.rar (https://www.officena.net/ib/applications/core/interface/file/attachment.php?id=134444)

رابط اخر
http://gulfup.co/3cshpowij0st

========== الملف النهائي
لجان كنترول مدرسي1.rar (https://www.officena.net/ib/applications/core/interface/file/attachment.php?id=134474)

(https://www.officena.net/ib/applications/core/interface/file/attachment.php?id=134474)

(https://www.officena.net/ib/applications/core/interface/file/attachment.php?id=134474)
==========

Sub طباعة_الكشوف() 'الكود للمحترم احمد كامل 'الهدف من الكود هو طباعه اللجان المدرسيه 'تم هذا الكود في اكتوبر 2017 '**************** Range("F1").Select ActiveCell.FormulaR1C1 = "1" ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Do ActiveCell = ActiveCell + 2 Legan_Test ActiveWindow.SelectedSheets.PrintOut Loop While ActiveCell.Value <= Range("E1").Value Range("b1").Select End Sub

ماسبق هو كود الطباعه .

جزى الله
كل من كانت له بصمه
في هذا العمل
بالخير

جزى الله
كل من كانت له بصمه
في هذا العمل
بالخير

الملف النهائي

لجان كنترول مدرسي1.rar (https://www.officena.net/ib/applications/core/interface/file/attachment.php?id=134474)

(https://www.officena.net/ib/applications/core/interface/file/attachment.php?id=134474)

رحمنا الله واياكم

رحمنا الله واياكم
يعمل الملف على اكسيل 2010

رحمنا الله واياكم

بارك الله لكم