عبدالله بشير عبدالله

وعليكم السلام ورحمة الله وبركاته انت تستخدم الحرف a لادراج علامة الصح الظاهرة و بخط Marlett عليه تكون المعادلة =SUMPRODUCT(($F$7:$BQ$7)*(F9:BQ9="a")) الملف وبه التطبيق تقويم القراءة الأدائية.xlsm

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

يمكن غمل ذلك من تنسيق خلايا ثم مخصص ثم اكتب h:mm AM/PM المواعيد.xlsb

وعليكم السلام ورحمة الله وبركاته تم تنسيق الارقام كوقت يمكنك تغيير تاريخ الجهاز كتجربة اذا كان الوقت الحالي ليس به حصص المواعيد.xlsb

السلام غليكم ورحمة الله وبركاته اليك الملف ولا نتس تمكين الماكرو ان لم يكن مفعلا تقسيم المبلغ.xlsb

السلام عليكم ورحمة الله وبركاته اضافة الى مشاركة الزميلين أبومروان - Foksh محاولة اعادة تنظيم اكواد الملف ما تم عمله وتنظيمه - الغاء جميع الاكواد المتعلقة بتحديد النوع والمكررة في صفحات الانتظام والانتساب الثمانية وتم عمل كود واحد في WORKBOOK يقوم بتحديد نوع الشخص مع امكانية استتناء الصفحات التي ليس لها علاقة اظهار عناوين الجدول في شيت طباعة إضافة عمود سبب الاعفاء للجدول إضافة الاجمالي بعد اخر صف به بيانات اضافة دالة التفقيط تعديل اعدادات الورقة لتتناسب مع الطباعة إضافة زر طباعة تحياتي للجميع Copy of تجميع.xlsm

المعادلة لا تغمل على اصدار 2010 تعمل على اصدار 2013 وما فوق يمكن استخدام كود لتلوين الخلايا التي بها معادلات الخطوات حدد العمود او الاعمدة - ثم اصغط على الزر تلوين خلايا المعادلات.xlsb

قم بتحميل الملف الثاني للاستاذ Foksh به اعادة ترتيب التسلسلي وبه التقديرات يمكنك تعديلها بالكود اعتقد ان التقييم غير صحيح ربما تقصد جيدجدا مع مرتبة الشرف

وعليكم السلام ورحمة الله وبركاته اليك الحل باكثر من طريقة فصل الاحاد والعشرات والمئات.xlsx

لا اعلم بوجود المعادلة الا من خلال ردك الاخير فعذرا وكلامك هو الصواب

مغلمنا Foksh الفاضل جزاك الله خيرا مع ملاحظة ان النطاق للفرز الى .SetRange ws.Range("A1:M" & lastRow) وليس .SetRange ws.Range("A1:L" & lastRow) كما ارجو تعديل التقديرات حسب فهمي لتقسيم التقديرات من الملف ان تكون التقديرات هكذا لك كل التقدير والاحترام Select Case Cell.Value Case Is >= 92 Cell.Offset(0, -1).Value = "ممتاز مع مرتبة الشرف" Case Is >= 90 Cell.Offset(0, -1).Value = "ممتاز" Case Is >= 85 Cell.Offset(0, -1).Value = "جيد جداً مع مرتبة الشرف" Case Is >= 75 Cell.Offset(0, -1).Value = "جيد جداً" Case Is >= 65 Cell.Offset(0, -1).Value = "جيد" Case Is >= 50 Cell.Offset(0, -1).Value = "مقبول" Case Else Cell.Offset(0, -1).Value = "مقبول س" End Select

لا حول ولا قوة الا بالله الفاضل / أبو مسلم الحازم أشكرك أخي الكريم، ولكن وجب التنويه إلى أن الحل الصحيح والجهد الفعلي يعود للأخ [الاشتاذ أ / محمد صالح]، وما ردي إلا تأكيد لصحة كلامه فقط. أرجو ان تصحح الامر او من الإدارة أو المشرفين نقل اختيار «تمت الاجابة» إلى رده . مع جزيل الشكر لك وللجميع."

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

السلام عليكم ورحمة الله وبركاته ملاحظة للاخ صاحب الطلب ارجو ان يعذرني فيها اخي واستاذي أ / محمد صالح الاستاذ أبو مسلم الحازم المغادلة لها 3 شروط وهي توافق الاسم واللقب وتاريخ الميلاد اي واحدة لا تتوافق لا نتائج بغض تواريخ الميلاد للاسماء غير متطابقة بين الجدولين

كتبت لك الحل في المشاركة السابقة واكرر لم توضح الرقم الاصل او الاساسي هل هو في الخلية O10 او K9 لان الحل يختلف والنتيجة تختلف بفرضية ان الرقم الاصل الاولي هو في K9 اليك الملف AS.xlsx