فورم بحث و تصفية بامكانية التعديل مرن لكل المستخدمين ( هدية شهر رمضان )

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

السلام عليكم

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

هدية الشهر الكريم

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

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

 

' اسم نطاق رؤوس الاعمدة
' او عنوان النطاق ملحوق باسم الورقة
Private Const MyTopColmnRng As String = "البيانات!$B$3:$L$3"

المرفق 2003 2007
فورم بحث بامكانية التصفية.rar

ودمتم في حفظ الله
==============================================================
ملحوظة:
في المشاركات ادناه وجدت ان السؤال الاكثر
حول كيفية البحث ليشمل نتائج اوسع
والحل موجود اصلا وهو استخدام النجمة وعلامة الاستفهام
وقد اوجدت زرين لهذا الغرض


أحرف البدل
يمكن استخدام أحرف البدل التالية كمعايير مقارنة لعوامل التصفية وعند البحث عن محتوى واستبداله.

* (علامة نجمية)

أي عدد من الأحرف
على سبيل المثال، يتم العثور على "شمال شرق" و"جنوب شرق" عند كتابة *شرق

؟ (علامة استفهام)
أي حرف مفرد
على سبيل المثال، يتم العثور على "سمير" و"سفير" عند كتابة س؟ير
==============================================================

ايضا
الذي تطلع عنده رسالة بالخطأ عند السطر
 

.ColumnWidths = wColmn

يقوم بحذف هذا السطر من الكود
او يعمل شرطة احادية قبل السطر ليلغي قراءة هذا السطر

وستنتهي المشكلة
ان شاء الله
لان هذا السطر يقوم بوضع مقاسات الاعمدة من النطاق
يعني هو مش مؤثر في الكود اصلا
ستبقى المقاسات الافتراضية للست
==============================================================

[Eid Mostafa]

^{الأخ / عبد الله}

^{هدية رائعة من شخص أكثر من رائع.}

^{لك خالص شكرى وتقديرى}

^أخوك

^{عيد مصطفى}

تم تعديل يوليو 26, 2012 بواسطه Eid Mostafa

[خالد الشاعر]

استاذى عبد الله باقشير

ابداع ليس جديد عليكم

رمضان مبارك عليكم جميعاً

لى سؤال فقط لماذا يعطى خطاء فى هذا السطر عند تشغيل الفورم

.ColumnWidths = wColmn

ولك كل الشكر و الاحترام

رمضان كريم

[رجب جاويش]

أستاذى الحبيب وعالمنا الجليل / عبد الله باقشير

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

هدية مقبولة من استاذنا الحبيب

وهذه الهدية قد تستغرق الشهر كله فى محاولة فهمها

ابداع يتخطى كل الحدود

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

أدام الله عطاء أستاذنا / عبد الله باقشير لهذا المنتدى االعظيم والجامعة العريقة

وتقبل الله منا ومنكم صالح الأعمال

تقبل أرق وأجمل أمنياتى بالتوفيق والسعادة

تلميذكم / رجب جاويش

[إبراهيم ابوليله]

الاخ عبدالله

ما حوجنا جميعا لعلمك

بارك الله فيك

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

^{الأخ / عبد الله}

^{هدية رائعة من شخص أكثر من رائع.}

^{لك خالص شكرى وتقديرى}

^أخوك

^{عيد مصطفى}

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

تقبل تحياتي وشكري

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

استاذى عبد الله باقشير

ابداع ليس جديد عليكم

رمضان مبارك عليكم جميعاً

لى سؤال فقط لماذا يعطى خطاء فى هذا السطر عند تشغيل الفورم

.ColumnWidths = wColmn

ولك كل الشكر و الاحترام

رمضان كريم

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

ورمضان كريم

بالنسبة للمشكلة

في حدث الفورم UserForm_Activate

استبدل السطر 7 بهذا السطر

wColmn = wColmn & IIf(Len(wColmn), Chr(59), "") & ww

جرب واشعرنا بالنتيجة

تقبل تحياتي وشكري

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

أستاذى الحبيب وعالمنا الجليل / عبد الله باقشير

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

هدية مقبولة من استاذنا الحبيب

وهذه الهدية قد تستغرق الشهر كله فى محاولة فهمها

ابداع يتخطى كل الحدود

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

أدام الله عطاء أستاذنا / عبد الله باقشير لهذا المنتدى االعظيم والجامعة العريقة

وتقبل الله منا ومنكم صالح الأعمال

تقبل أرق وأجمل أمنياتى بالتوفيق والسعادة

تلميذكم / رجب جاويش

انا لم اجد كلمات تناسب هذا الخلق الحسن

الله يكرمك دنيا واخرة

وتقبل الله منا ومنكم صالح الأعمال

ويجعلك من مغفوري الذنوب والمعتوقين من النار

في هذا الشهر الكريم

تقبل تحياتي وشكري

[أبو محمد عباس]

السلام عليكم

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

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

اعزكم الله ورعاكم

[يوسف السيد]

ادامك الله زخرا للعلم وطالبيه .... وما زلنا بانتظار المزيد من الهدايا فى الشهر الكريم

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

[basem said]

ممتاز جدا عمل اكثر من ممتاز اضافات مفيدة جدا ورائعه

استاذن حضرتك فى طلب

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

ولك كل الشكر

[حسين شاكر]

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

[محمد يحياوي]

الاستاذ الفاضل عبدالله باقشير جزاك الله خيرا هدية رائعة من استاذ كريم جعلها الله في ميزان حسناتك ان شاء الله

[عبدالله المجرب]

ما شاء الله

تبارك الله

ابداع متواصل بلا حدود

سلمت يمينك استاذ عبدالله

[ابن بنها]

أستاذى الحبيب وعالمنا الجليل / عبد الله باقشير

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

هدية مقبولة من استاذنا الحبيب

وهذه الهدية قد تستغرق الشهر كله فى محاولة فهمها

ابداع يتخطى كل الحدود

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

أدام الله عطاء أستاذنا / عبد الله باقشير لهذا المنتدى االعظيم والجامعة العريقة

وتقبل الله منا ومنكم صالح الأعمال

تقبل أرق وأجمل أمنياتى بالتوفيق والسعادة

لي سؤال اجد زر بحث متقدم كيف يتم استخدامه .. سامحوني

[الشهابي]

أستاذنا الكريم / عبد الله علي باقشير

حفظك الله وبارك فيك

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

جزاك الله على هذه الهدية الرائعة مثلك

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

وتقبل تحياتي :

تلميذكم المحب لكم : الشهابي

[saad abed]

استاذنا / عبد الله علي باقشير

حفظك الله وبارك فيك

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

هذه الابداعات المتلاحقة شكرا لك

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

تحياتى

سعد عابد

[ريان أحمد]

السلام عليكم

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

Sans titre.rar

[جمال جبريل]

كل عام وانت بخير على استاذنا ، وعلى كل من في هذا المنتدى.

ولكن استاذنا عند البحث باسم محمد لا يعطي اي نتيجة نريد فقط ان يبحث في الجملة بغض النظر عن مكانها.

[الزباري]

عبدالله باقشير : عمل أكثر من رائع وتشكر عليه.. نسأل الله عزوجل أن يفيد بك الأمه.

[ابو تميم]

روووووووووووووووعة استاذنا القدير عبد الله

الملف يعمل بشكل أكثر من ممتاز وقمة في الروعة جزاك الله كل الخير

[جمال جبريل]

ولكن اذا بحثت على اسم محمد لا يعطي لدي اي نتائج ، يمكن خطا في الاوفيس لدي ، والله اعلم.

[مصطفى السمري]

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

انا كنت بعمل برنامج للشركة اللي بشتغل فيها

وكانت المشكلة في البحث ومكان الادخال

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

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

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

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

احبتي في الله

الاخ الفاضل / عباس السماوي__________ حفظه الله

الاخ الفاضل / yousef_kaf__________ حفظه الله

الاخ الفاضل / basem said__________ حفظه الله

الاخ الفاضل / hussien2222__________ حفظه الله

الاخ الفاضل / يحياوي__________ حفظه الله

الاخ الفاضل / عبدالله المجرب__________ حفظه الله

الاخ الفاضل / ابن بنها__________ حفظه الله

الاخ الفاضل / سعد عابد__________ حفظه الله

الاخ الفاضل / tahar1983__________ حفظه الله

الاخ الفاضل / jjebril__________ حفظه الله

الاخ الفاضل / alzubari__________ حفظه الله

الاخ الفاضل / ابو تميم__________ حفظه الله

الاخ الفاضل / مصطفى السمري__________ حفظه الله

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

اكرمكم الله واثابكم بدعائكم

واعطاكم بمثله اضعاف مضاعفة

تقبلوا تحياتي وشكري

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

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

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

حول كيفية البحث ليشمل نتائج اوسع

والحل موجود اصلا وهو استخدام النجمة وعلامة الاستفهام

وقد اوجدت زرين لهذا الغرض

==============================================================

أحرف البدل

يمكن استخدام أحرف البدل التالية كمعايير مقارنة لعوامل التصفية وعند البحث عن محتوى واستبداله.

* (علامة نجمية)

أي عدد من الأحرف

على سبيل المثال، يتم العثور على "شمال شرق" و"جنوب شرق" عند كتابة *شرق

؟ (علامة استفهام)

أي حرف مفرد

على سبيل المثال، يتم العثور على "سمير" و"سفير" عند كتابة س؟ير

==============================================================