فلترة سريعة للقوائم بمجرد كتابة الحروف الأولى .. (شبيهة بعملية البحث على جوجل و اليوتيوب)

[جعفر الطريبق]

افرض عندك قائمة طويلة في احدى أعمدة الاكسيل و تحتوي هده القائمة على 5000 اسم  مثلا .. و في مكان أخر هنالك خلية تستعمل لادخال اسم من الأسماء الموجودة بالقائمة .. هدا السيناريو يحتاج في الغالب الى قائمة منسدلة Data Validation List لتفادي الادخال في الخلية أسماء غير موجودة على القائمة ... هدا حل جيد لكنه بطيئ حيث يتطلب من المستخدم البحث بين 5000 اسم بواسطة شريطScrollBar

قبل أشهر كتبت هدا الكود الدي يستدعي و يفلتر الأسماء أليا بمجرد بدأ كتابة الأحرف الأولى  ... ملف للتحميل : https://app.box.com/s/v6uamjb6tad3ozs6ajw0bnt61292ja7v

طريقة العمل  :

1- Activate the Input Cell

2 - Press F1 Key to bring up the list

3 - ... Start Typing in and the list will get filtered automatically based on the letters you have typed

4 -  Press Enter Key or use the Down /Up Arrow navigation Keys when the searched Item is found or Press the ESC Key to Cancel the whole operation

[احمدزمان]

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

اخي الكريم جعفر

جزاك الله خيرا على هذا العمل الرائع

انا متأكد ان هذا ليس الا جزء بسيط من علمكم الذاخر الذي استفدنا منه جميعا

بارك الله فيك

تقبل مروري Aymz077

[يوسف السيد]

السلام عليكم 

 عند تشغيل الملف يعطي خطأ رقم 400 

[جعفر الطريبق]

ردا على السيد يوسف السيد

لا أدري لمادا يعطيك الخطأ ... صعب معرفة المشكلة

لو الكود يتوقف Debugger  في خط ما ممكن يساعدك على معرفة المشكلة 

تم تعديل سبتمبر 7, 2015 بواسطه جعفر الطريبق

[يوسف السيد]

F1عند الضغط علي 

تظهر الصورة كما بالمرفقات

[محمد حسن المحمد]

السلام عليكم أستاذنا الكريم جعفر الطريبق المحترم:

نشكرك على هذا العمل الرائع ،حيث قام أستاذنا الكريم بعمل بحث بالأحرف الأولى مع التصفية على لاحقة إكسل xlsx و xls لتعم الفائدة...

حيث نختار الخلية المطلوبة E6 ثم الضغط على F1 لجلب القائمة التي سنختار منها حسب الأحرف .ومن ثم الضغط على ESC لإلغاء الاختيار.

راجين للأستاذ الكريم دوام التقدم والعطاء.. والسلام عليكم.

[سيد حمدي]

أحبتي في الله، وأخي الكريم صاحب الفكرة الرائعة

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

لمعالجة مشكلة الاختيار بسهولة من القائمة المنسدلة بكتابة بدايات الحروف، أقوم عادة باستخدام

ComboBox (ActiveX control)

وأحدد مصدرها مدي معين

أي استفسارات تحت أمركم إخوتي

[عبدالرحمن بدوى]

أحبتي في الله، وأخي الكريم صاحب الفكرة الرائعة

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

لمعالجة مشكلة الاختيار بسهولة من القائمة المنسدلة بكتابة بدايات الحروف، أقوم عادة باستخدام

ComboBox (ActiveX control)

وأحدد مصدرها مدي معين

أي استفسارات تحت أمركم إخوتي

اخى الفاضل

هذا ما ابحث عنه

كيف تقوم بتحديد مصدر ComboBox (ActiveX control)

 

[قصي]

السلام عليكم أستاذنا الكريم جعفر الطريبق المحترم:

عمل ولاأروع منه

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

صندوق الكتابه بالمنتدى لايوجد به حجم الخط ولا ىزته ولا حاجات كتيره ناقصه

[ياسر خليل أبو البراء]

أخي الغالي جعفر

نورت المنتدى بأعمالك الرائعة والمميزة والمتميزة

بارك الله فيك وجزاك الله خير الجزاء

[saad abed]

اخى جعفر

بالمصرى ايه الحلاوه دى

اكرمك الله

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

[بكار للأبد]

ممتاز جداً ورائع وإلى الأمام إن شاء الله

[سيد حمدي]

أحبتي في الله، وأخي الكريم صاحب الفكرة الرائعة

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

لمعالجة مشكلة الاختيار بسهولة من القائمة المنسدلة بكتابة بدايات الحروف، أقوم عادة باستخدام

ComboBox (ActiveX control)

وأحدد مصدرها مدي معين

أي استفسارات تحت أمركم إخوتي

اخى الفاضل

هذا ما ابحث عنه

كيف تقوم بتحديد مصدر ComboBox (ActiveX control)

 

أهلا بك أخي الكريم

من خلال تسمية مدى وليكن الاسم Products

ثم إسناد القيمة Products لخاصية ListFillRange المرتبطة بالـ ComboBox

حاولت التوضيح في الصور ما أمكن

أي استفسار تحت أمرك أخي

list.bmp

[عبدالرحمن بدوى]

أخى الفاضل

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

حقيقة انا عاجز جدا عن الشكر

انا منذ شهور وانا ابحث عن هذا الامر

وبالفعل والله انت حليت الأمر بكل سهولة بعيدا عن الاكواد ومشاكلها

واخيرا

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

[وجدي الحاج علي]

عمل رائع لكن
لدي طلبين وارجو الرد

الطب الاول
هل يمكن استبدال الضغط على f2 بخيار اخر
وليكن عند تحديد الخلية e6

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

ارجو الرد السريع

[ابوحمزه المصرى]

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

كل عام وانتم بخير

هل يمكن تطبيقها على الموضوع التالى

http://www.officena.net/ib/topic/63494-اضافة-على-قائمة-منسدلة-مرتبة-ابجديا-ومعتمده-على-قائمة-اخرى-وتقبل-الزيادة/