الأخ الفاضل أحمد يعقوب
تحية وتقدير
أولا أشكرك على تقديرك لشخصنا البسيط
ثانيا جزاك الله خيرا على المجهود الذي قمت به كما أشكر جميع الأخوة الأفاضل في المنتدى وحقيقة هذا المنتدى غير كثير من تعاملي مع الأكسل وهذا بفضل الله ثم الجهود المبذولة من الإخوة الكرام والأساتذة الأفاضل
ما أريد عمله هو متابعة للطلاب ولكن أردت أن يكون صالح لي ولجميع من يريد أن يستخدمه بحيث يستطيع معلم الصف أن يختار الصف الذي يدرسه بدون مشقة ثم يتابع الأسماء الموجودة أمامه ثم بعد ذلك وهي الخطوة الثانية بعد التصفية ترحيل الدرجات إلى صفحة أخرى للطلابالذين تمّ اختيارهم في الصفحة الأولى عن الطريق التصفية باختيار الصف ثم الفصل
جزاك الله خير الجزاء الحل الذي قمت به رائع جدا وخاصة البحث بالاسم جميل جدا
لكن هل ممكن تطبيق الكود على الملف الذي قمت برفعه الكود الذي نقلته من ردّ الأخ aah-aah2008
هو :
Range("C4").Select
Selection.AutoFilter
Selection.AutoFilter Field:=2, Criteria1:=Range("C2")