حسن محمدسليم عبدالحميد

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

السلام عليكم الكود يضع دوائر حمراء على ارقام الجلوس حتى اذا كان الرقم الأول 100 تكون الدوائر من الشهادة الثانية ويضع على النسبة من المتعارف عليه ان الدائرة تكون على درجة الطالب فقط وذلك فى حالتين ام ان تكون درجة الطالب اقل من النهاية الصغرى أو ان تكون درجة نهاية العام اقل من 15 اريد من الكود ان يضع الدوائر فى صف درجة الطالب فقط ولكن بشرطين اولا اذا كانت درجة الطالب اقل من النهاية الصغرى ثانيا اذا كانت درجة نهاية العام اقل من 30 هل من الممكن ان يصنع الكود هذا ام لا فى حالة لا نريد كود يصنع هذا العمل شكرا على الأهتمام والمتابعة

الأخ konafa4000 السلام عليكم أشكرك على الإهتمام الشهادة خاصة بآخر العام ومايزال الكود يضع الدوائر الحمراء فى أماكن أخرى غير صف الدرجات

شكراً على الإهتمام وانى أرفقت الملف مرة أخرى بعد الفحص بواسطة avG و nod وكانت النتيجة لا يوجد فيروس افيرا أحياناُ يرى الماكرو فيروس أرجو الإهتمام أستاذ أيسم وكل عام وانتم بخير ملخص المطلوب : أريد كود دوائر حمراء على الشهادة ولكن بشرطين هما 1) اذا كانت درجة الطالب أقل من النهاية الصغرى للمادة يضع دائرة 2) اذا كانت درجة اخبار نهاية العام أقل من 15 يضع دائرة علماً بأننى ادرجت فى الشهادة صف مخصص لدرجة نهاية العام وشكرا على الإهتمام ومنتظر الرد شيت1.rar

يا عباقرة الأكواد أرجو الرد على هذا الكود

ارجو من أساتذة هذاالمنتدى العظيم التعديل فى الكود كما هو موضح فى المرفق شيت.rar

هذا المرفق به شرطان وهما ان تكون الدرجة اقل من 15 وهذا يدل على الراسب وان تكون الدرجة اكبر من 50 وهذا يدل ان الرقم اكبر من النهاية العظمى ولابد ان تراجع وبه ايضاُ اللون وبجانبة الرقم الخاص به لاختيار اللون المطلوب hms.rar

فى المرفق اخى المطلوب طبقت على ثلاث مواد هى عربى ، لغة ، دراسات عليك استكمال الدرجات فى الشهادة فقط وسيعمل الكودمعك ان شاء الله الصف الاول.rar

عند تطبيق الكود على البحث ظهرت رسالة وعند الضغط على debug تحول الى شاشة vba وحدد الخطأف السطر التالى Set MyRng = Sheets(Me.Tag).Range(CM_TextFind.Tag) ارجو توضيح الحل بعد اذن استاذنا العظيم خبور خير

شكراُ جزيلاُ على الردوالإهتمام استاذ هشام واستاذ جمال

استاذ هشام العمل رائع كلمة السر لفك الكتشنة ما هى من فضلك وجزاك الله خيراً

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

العمل رائع جداُ ولكن عندمااكتب معادلة عدد المتقدمين فى الشيت الخاص بى وهى =COUNTA(INDEX(MyRng,0,2 لا يظهر عدد المتقدمين كيف اجعل الدالة تحسب على اساس البيانات الموجودة فى الشيت الخاص بى بمعنى آخر ما هى وظيفة myrng فى الدلة السابقة وكيف انفذها ارجوا الإفادة ولك جزيل الشكر

كيف افعل مثل الخلية a7 فى شيت الشهادة وهى range index ارجوا الإستفادة من خبرتك استاذ خبور

اقصد هنا كيف ربط الأستاذ العظيم خبور فى الملف شيت الشهادة بشيت رصد درجات الصف الأول وما هى علاقة data فى المعادلة ثانيا كيف فعل الأستاذ خبور خير الدالة rang index فى شيت الشهادة اشكر كل من تفضل بالمشاركة معى وجزاكم الله خيراً على المجهود استخراج شهادات بشرط3.rar

كيف ربط الأستاذ العظيم خبور الدالة counta(index(data,0,3 فى شيت الشهادة بالشيت رصد درجات الفصل الأول

جزاك الله خيراً استاذ خبور