سيد الأكرت قام بنشر ديسمبر 12, 2017 مشاركة قام بنشر ديسمبر 12, 2017 السلام عليكم ورحمة الله نظرا لكبر حجم الشيت فقد اقتصصت الجزء المطلوب التعديل فيه ووضعت درجات عشوائية بدلا من المعادلات المرتبطة باوراق اخرى في الشيت والمطلوب هو تعديل الكود ليشمل كل الشهادات الموجودة في الورقة وان تحاط الدرجة بدائرة حمراء اذا كانت اقل من نصف الدرجة العظمى للمادة أو كانت غ وجزاكم الله خيرا دوائر حمراء.rar رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر ديسمبر 12, 2017 مشاركة قام بنشر ديسمبر 12, 2017 السلام عليكم ورحمة الله اذهب الى الكود المسى Circles1 و عدل هذا G = 14 الى ذلك G = 12 هذا و بالله التوفيق رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر ديسمبر 12, 2017 الكاتب مشاركة قام بنشر ديسمبر 12, 2017 أعزك الله أستاذنا العزيز زيزو العجوز بفضل الله قد تم حل نصف المطلوب الان كيف نجعل الدائرة الحمراء توضع اذا كانت الدرجة اقل من نصف النهاية العظمي أو غ لان الجدول ليس به نهايه صغري فهل يمكن تعديل الكود بدون اضافة صف للنهاية الصغري وجزاك الله عني خير الجزاء رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر ديسمبر 12, 2017 مشاركة قام بنشر ديسمبر 12, 2017 السلام عليكم ورحمة الله استبدل هذا السطر If IsNumeric(Cells(R, c.Column)) And Not IsEmpty(Cells(R, c.Column)) And (c.Value < Cells(R, c.Column) Or c.Value = "غ" Or c.Value = "غـ") And c.Value <> "" Then بهذا السطر If IsNumeric(Cells(R, c.Column)) And Not IsEmpty(Cells(R, c.Column)) And (c.Value < Cells(R, c.Column) / 2 Or c.Value = "غ" Or c.Value = "غـ") And c.Value <> "" Then 1 رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر ديسمبر 12, 2017 الكاتب مشاركة قام بنشر ديسمبر 12, 2017 (معدل) تسلم إيديك وجزاك الله خيرا عندما قمت بتغيير السطر في الملف المرفق عمل الكود بنجاح لكن عندما قمت بتغييره في ورقة العمل الاساسية توقف الكود عن وضع الدوائر ولا أعلم السبب حيث أن الملف المرفق هو جزء من الشيت وايضا عندما قمت بتغيير المدي نجح الكود لكنه الان لا يقبل قسمة الدرجة على 2 وهو التعديل الذي اضيف فاتمنى ان اعرف السبب تم تعديل ديسمبر 12, 2017 بواسطه سيد الأكرت رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر ديسمبر 12, 2017 الكاتب مشاركة قام بنشر ديسمبر 12, 2017 معذرة أخي الفاضل الأستاذ زيزو قمت برفع الملف الاصلي لتساعدنى في معالجة الخلل دوائر.rar رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر ديسمبر 12, 2017 مشاركة قام بنشر ديسمبر 12, 2017 السلام عليكم ورحمة الله اخى الكريم الملف الذى ارسلته جميع التلاميذ فيه ناجحون فقمت بتغيير درجات بعضهم حتى ينطبق عليهم شرط الرسوب وقمت بتجريب الكود فعمل بمنتهى الكفاءة هذا وبالله التوفيق 2 رابط هذا التعليق شارك More sharing options...
سيد الأكرت قام بنشر ديسمبر 13, 2017 الكاتب مشاركة قام بنشر ديسمبر 13, 2017 بالفعل أخي الكريم لقد غفلت هذا الأمر جزاك الله خيرا وجعل مساعدتك لنا في ميزان حسناتك يوم القيامة رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.