تصفية

[ابو حمادة]

السلام عليكم ورحمة الله وبركاته

الاخوة الاعزاء

اريد عند اختيار الصف من مربع تحرير وسرد يتم عمل تصفية للصف المختتار  

مرفق ملف لتوضيح المطلوب

وجزاكم الله خيرا

Book salim.rar

[سليم حاصبيا]

جرب هذا الملف

 

Book salim 1.rar

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

السلام  عليكم

كود للفاضل سليم حاصبيا

اتمنى ان يكون طلبك

في حفظ الله

salim.rar

salim.rar

[ابو حمادة]

شكرا جدا علي المجهود والاهتمام من الاساتذه الافاضل

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

 

وجزاكم الله خيرا

 

[سليم حاصبيا]

7 دقائق مضت, ابو حمادة said:

شكرا جدا علي المجهود والاهتمام من الاساتذه الافاضل

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

 

وجزاكم الله خيرا

 

لم افهم لغاية الان ما هو مفتاح السرد

[ابو حمادة]

1 دقيقه مضت, سليم حاصبيا said:

لم افهم لغاية الان ما هو مفتاح السرد

يوجد في الملف المرفق الاساسي به زر لاختيار الصفوف عن طريقه وليس عن طريق قائمة منسدلة مع مراعاة التصفيه تتم علي الصفوف الوجوده

كما موجود بهذا المرفق

Book salim.rar

 

[أبو حنــــين]

مرحبا

هل تقصد بهذه الطريقة

Book salim3.rar

[ابو حمادة]

10 دقائق مضت, أبو حنــــين said:

مرحبا

هل تقصد بهذه الطريقة

Book salim3.rar

تسلم اخي واستاذي أبو حنــــين

هو دا المطلوب تسلم ايدك وزادك الله علما

ولي استفسار لو امكن استبعاد التلاميذ المحولون والمعلقين اثناء  التصفيه لو امكن

علما ان العمود ( D ) به كلمة ( حول وكلمة ) معلق اريد استبعاد جميع الطلاب المكتوب امامهم ( حول او معلق )

[سليم حاصبيا]

محاولة ثانية

 

Book salim (macro).rar

[أبو حنــــين]

بالنسبة للطلب الاخير يصبح الكود بالشكل

Sub Macro1()

Range("D6:I" & Range("D" & Rows.Count).End(xlUp).Row).AutoFilter Field:=2, Criteria1:="=" & Range("P4")
Range("D6:I" & Range("D" & Rows.Count).End(xlUp).Row).AutoFilter _
Field:=1, Criteria1:="<>معلق", Operator:=xlAnd, Criteria2:="<>حول"

End Sub

 

[سليم حاصبيا]

تعديل (بدون معلق و حول)

 

Book salim (macro) adv.rar

[ابو حمادة]

تسلم ايدك استاذ أبو حنــــين

طلب اخير ومعذره  

هل من الممكن اضافة كلمة الكل في القائمة

وعند اختيارها يتم الغاء التصفيه

وكلمة فراغات

عند اختيارها يتم  اظهار الفراغات فقط واخفاء البيانات جميعا

 

2 دقائق مضت, سليم حاصبيا said:

تعديل (بدون معلق و حول)

 

Book salim (macro) adv.rar

بصراحه حلول رائعه انا فعلا بشكرك استاذي الغالي علي مجهودك انت والاستاذ ابو حنين زادكم الله علما وجزاكم الله عنا خيرا

طلب اخير ومعذره  

هل من الممكن اضافة كلمة الكل في القائمة

وعند اختيارها يتم الغاء التصفيه

وكلمة فراغات

عند اختيارها يتم  اظهار الفراغات فقط واخفاء البيانات جميعا

 

[سليم حاصبيا]

5 دقائق مضت, سليم حاصبيا said:

تعديل (بدون معلق و حول)

 

Book salim (macro) adv.rar

لالغاء التصفية اضغط الزر Show_All

و لاظهارالفراغات امسح محتوبات الـ CombBox