الأخ الغالى ياسر بك
المطلوب أن يتم تعديل كود إضافة الدوائر بالملف المرفق بالمشاركة الأولى كالتالى
1. أن يعمل على أوفيس 2003
2. أن يتم منع الوميض الذى يحدث 3 مرات اثناء عمل الكود
ملحوظة الكود المراد تعديله موجود فى حدث الشيت وليس فى الموديول
بس كدة
إرفق ملف وسنحاول أن نستكمله لك
المطلوب
عدد الطلبة
عدد اللجان
هل الإمتحان موحد أم نموذجان أم ثلاثة
هل كل فرقة لها لجان مستقلة أم عدة فرق ستمتحن بنفس اللجان ؟؟
وغير ذلك من الأمور
إخوانى الأعزاء
لو الأمر شديد الصعوبة إخبرونى حتى أبحث فى إتجاه آخر
ولكنى أرى الأمر هين كود يعمل جيداً على إصدارة 2010 ولا يعمل على إصدارة 2003
المطلوب تعديله ليعمل على 2003 وبالتأكيد الأمر سهل لذوى الخبرة من الأساتذة الأجلاء بالمنتدى وهم كثر
كذلك موضوع الوميض عند إستخدام كود الدوائر
أعتقد أن خبراء الأكواد ببساطة سيضيفون سطر ما فى الكود لكى يتوقف الوميض بسهولة كبيرة بالنسبة لهم
وفقكم الله
استاذى الغالى جلال محمد
بالفعل النموذج الأخير الذى أرفقته معاليكم متعوب فيه ويحقق كثير من المطلوب
وجارى التمعن فيه لتحديد ما إذا كنت سأعتمد عليه كما هو أم سأطلب تعديلات بسيطة فيه
وعلى كل حال فالأكواد به مدرسة ينبغى التعلم منها
أشكرك على تفاعلك
لا تنسى أخى مجدى أن سرى الفصل الأول يختلف عن سرى الفصل الثانى
فلابد من إضافة عمودين لتكون أعمدة السرى 3 أعمدة
عمود لسرى الفصل الأول
عمود لسرى الفصل الثانى
عمود لسرى الفصل الحالى يأخذ الداتا من العمود المحدد بحيث يختفى العمود الأول والثانى مع أرقام الجلوس ويكون العمود الثالث هو المتاح للعمل عليه بحيث أننا فى الفصل الأول سيكون سرى الفصل الثانى خالى من البيانات وهنا يظهر به سرى الفصل الأول وفى الفصل الثانى سيكون سرى الفصل الثانى به بيانات وكذلك سرى الفصل الأول لا زال به بيانات وهنا يأخذ من سرى الفصل الثانى عن طريق معادلة إف
أتعشم الفكرة وصلت
الف شكر أخونا أبو حنين والشكر موصول للأخ الغالى طارق بك محمود حفظكما الله
ولإثراء الموضوع
يمكن إضافة تشيك بوكس لإظهار الكل تحت التشيك بوكس لإخفاء الكل
بحيث التشييك فى أحدهما يزيل التشييك من بقية البوكسات
ولكم الشكر والدعاء أن تكون أعمالكم فى موازين حسناتكم
السلام عليكم أبو حنين
دام فضلك
ليس هذا هو الكود المقصود يا الغلا
الكود المراد التعديل عليه هو كود الدوائر الحمراء
الموجود فى حدث الشيت وليس فى الموديول
رجاء إعادة النظر فى الملف
راجع هذا الموضوع أخى العزيز
المشاركة رقم 17 للأخ أحمد فضيلة
وإن شاء الله تحقق المطلوب
علماً بأن هذا الموضوع قتل بحثاً من قبل وهذه أحسن نتيجة تم التوصل لها
http://www.officena.net/ib/index.php?showtopic=36690&st=0
تقبل تحياتى
السلام عليكم
أخوتى الأعزاء
الملف المرفق به كود لوضع الدوائر الحمراء على الشهادات
الملف بإصدارة 2010
وبه الآتى
1. الشاشة تومض 3 مرات مع طبع كل شهادة مما يؤدى إلى تهنيج البرنتر وإلا فيجب أن أطبع الشهادات شيت تلو الآخر مما يعنى أن أضغط 350 مرة على زر الطباعة لطبع 1111 شهادة
2. الأوفيس فى مكان العمل بالمدرسة 2003 والجهاز قد لا يقبل أوفيس 2010
المطلوب
تعديل الكود ليعمل على أوفيس 2003 وفى نفس الوقت محاولة تلافى عملية الوميض بالشاشة عدة مرات مع تغيير الشهادة
علماً بأن عملية الطباعة لجميع الشهادات لها كود ولكنه غير مرفق بالملف والأكواد المرفقة بالملف هى كود الدوائر وكود طباعة نطاق متصل من الشهادات المحددة وكود تحديد خلية نشطة بشروط
مع خالص تحياتى
كود دوائر حمراء بالشهادات 2010.rar
السلام عليكم
بالفعل مرفق سيادتكم أخى الخالدى يعمل على أوفيس 2010
ولكن
1. الشاشة تومض 3 مرات مع طبع كل شهادة مما يؤدى إلى تهنيج البرنتر
2. الأوفيس فى مكان العمل بالمدرسة 2003 والجهاز قد لا يقبل أوفيس 2010
لذلك السموحة منك هافتح موضوع جديد بإسم طلب تحويل كود من 2010 إلى 2003
وهارفق فيه الملف 2010
وفى نفس الوقت نترك هذا الموضوع مفتوح لربما يلهم الله أحد إخوتنا الحل بطريقة أخرى
والله الموفق
تم وضع الملف المذكور فى مجلد سيستم 32 وعند تشغيل ملف الإيكسيل والكود لم يقرأ شئ
علماً بأنى جربت على أوفيس 2003 و أوفيس 2010
على ويندوز 7
علماً بأنى عن طريق برنامج للتعرف على مكونات الحاسب تفصيلياً تم إستخراج رقم الهارد الحقيقى المدون عليه
وبمطابقته بالأرقام التى حصلت عليها من محاولات سابقة بالأكواد وجد مطابقاً لما تم الحصول عليه بالكود المرتبط بالمعادلة
GetPhysicalSerial()
أول نتيجة
WD-WMAVU2718655 وهو نفس الرقم الذى إستخرجه برنامج التعرف على مكونات الحاسب
ولكن الغريب أن نفس الكود اصبح يعطينى رقم مختلف بعد الفورمات مع أنه أعطانى الرقم المدون على الهارد فى محاولة سابقة
لو تكرمت أخى الخالدى إرفاق الملف الذى قمت بتجربة الكود به
حيث أنى حاولت تجربته على 2010 كذلك ولم ألحظ أى تغيير فلعل المشكلة فى الملف الذى أعمل عليه
لقد فتحت الملف وهو بإصدارة 2003 على إيكسيل 2010
فهل هذا هو ما قمتم به سيادتكم ؟؟ أم أنك كتبت الكود مباشرة داخل ملف بإصدارة 2010 ؟؟
يمكنك أن تضع باسوورد على محرر الأكواد فلا يستطيع أحد فتحه بدون الباسوورد
يتم ذلك عن طريق
فى محرر الأكواد
تولز
فى بى ايه بروجيكت بروباريتيز
بروتيكشنز
التأشير على التشيك بوكس
وضع الباسوورد ثم التأكيد عليها
ثم أوكى
أخى الغالى الخالدى
السلام عليكم
للأسف أخى الخالدى التعديل الذى ذكرته سيادتكم لم يغير من الوضع شيئاً
فالدوائر الحمراء تثبت فى مكانها ولا تختفى عندما تأتى شهادة ناجحة
الرجاء المحاولة بتعديل آخر
مشكووووووور مقدماً