العمري1

شكرا اخي خالد على تعاونك معي الان ابي اخرج البرنامج او اصنعه ان امكن على شكل فورم مثل هذه الصورة المرفقه

up

ارجو المساعدة ياخوان

up

تساؤلك عن المعلم انه ليس له كود في برنامج المسابقه ========= اذا كان نعم . فانني اريد في البرنامج الجديد ان اولد للمعلمين اكواد باركود تكون معرفه لهم لكن لا اعرف طرقة توليد هذه الاكواد وتعريفها انها للمعلمين عن طريق برنامج الاكسل

الله بجزاك خير اخي ابو عيد على تفاعلك معي

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

شكرا اخي سوف اعمل الخطوات واخبرك بالنتائج

يا اخوان في احد عنده حل

حاليا بطاقة المعلم ليس عليها اكواد اما بخصوص ان جهازي يتعرف على الباركود لا اعلم لاني لم اجرب وجهاز ماسح الباركود حاليا بالمدرسة علما ان نسخة الاكسل عندي 2016 هل من الممكن انها متوفرة فيه تلقائيا هذي الخدمه.. اما المجرب وهو في البرنامج الاساسي الذي ولد لي اكواد الطلاب وهو خاص بنقاط الطلاب واسمه برنامج مسابقة الباركود ====== اما بخصوص اني امسح بطاقة الطالب بالجهاز ووضع كود المعلم بالكيبورد فلا. بل اريد مسح كل من المعلم والطالب بالجهاز ======== هل من الممكن ان اعوض بدلا من الجهاز بالجوال لقراءة الكود عن طريق تطبيق ما

اقصد ان الطالب لما يأتي وامسح بجهاز الباركود على بطاقته وتضع نقاطه في البرنامج الاساسي اذهب الى البرنامج الثاني الذي اريد ان اعمله الان وامسح على بطاقته وبعد ذلك اضع كود المعلم لاجل ان اعلم انه في اليوم هذا تحصل الطالب على بطاقه من المعلم او لوكان معلمين مختلفين اعطوه بطاقتين اريد ان توضع اسمائهم امام هذا الطالب في ذلك اليوم مثال : الطالب عيد اخذ 3 بطائق من المعلم احمد وفي نفس اليوم اخذ من المعلم عوض 2 بطائق اريد هذه المعلومات تذكر امام اسم الطالب لذلك اليوم علما اني ساعطي كل معلم 8 بطائق خلال اسبوع وهو يوزعها على الطلاب المتميزين عنده خلال الاسبوع ان شاء الله وضحت لك اخي العزيز

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

السلام عليكم ورحمة الله وبركاته عندي مسابقة في المدرسة تعتمد في ادخال النقاط على الباركود ولها برنامج اسمه مسابقة الباركود للمدارس فكرة المسابقة من البرنامج ادخل اسماء الطلاب ويكون لكل اسم طالب رقم وكود خاص فيه ووزعت على المعلمين بطائق لكل معلم 88 بطاقات كل اسبوع ...استفساري اخواني هو عندما ياتي طالب معه بطاقة او اكثر من من معلم واحد او من عدة معلمين اريد برنامج من الاكسل يبين لي ان هذا الطالب اخذ من المعلم واسمه او من المعلمين واسمائهم اذا كانت اكثر من بطاقة لهذا اليوم واسف على الاطالة وشكرا لكم

للرفع

ياخوان انتظر ردكم

السلام عليكم ورحمة وبركاته كيف حالكم اعضاء منتدى اوفيسنا ان شاء الله تكونوا با حسن حال اذا تفضلتم بمساعدتي اريد برنامج يحسب النقاط عن طريق الباركود لمسابقة في المدرسة وتكون طريقة احتساب النقاط ب5 نقاط لكل قراءة وشكرا لكم مقدما دمتم بود

يعطيك العافية اخي ابو عيد انا كانت عندي الاشكالية في صفحة الاسبوع الاول وليس في صفحة الترتيب العام كنت اكتب في صفحة الاسبوع الاول وما تطلع الاسماء في بقية الصفحات بعدين سجلت المعادلات الموجودة في صفحة الاسبوع الاول على جميع الاسابيع الاربعة عشر وضبطت معي ابشرك . وذا كان هناك اي ملاحظة راح ارسلها لك مرة ثانية الف شكر اخي ابو عيد وجزاك الله خير على مساعدتك لي تقبل تحياتي

الله يعطيك العافية اخي ابو عيد لكن ظهرت لي مشكلة ان الاسماء عندما اسجلها في الصفحة الاولى لا تظهر في الصفحات الاخرى وهذا ملف مرفق يبين المشكلة WinRAR archive جديد (2).rar WinRAR archive جديد (2).rar

Up

وش فيني مضيع في الشكر المعذرة منك اخي ابو عيد واخي عبدالعزيز يعطيك العافية اخي ابو عيد واتمنى انك تشرحلي الطريقة التي عدلت بها على الملف

اب

اب

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

يعطيك العافية اخوي عبد العزيز انحلت المشكلة وبالشكل اللي ابيه بس ياليت تشرحلي اش اللي عملته لني حاولت انقله للصفوف الاخرى ونسخت الامر من المودويل وهو هذا ()Sub Final lr = Sheets(1).Range("B" & Rows.Count).End(xlUp).Row For y = 7 To lr For t = 2 To 15 End Sub لكن عندما اضيفه يطلع خطأ في الصياغة ويجي لون اصفر على الكلمة التي في بداية الامر ()Sub Final ولك جزيل الشكر والامتنان

اب