اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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


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

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

الاخوه الافاضل

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

.................................

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

يتم اظهار بيانات الارقام الاكبر من اوتساوى الرقم الموجود فى التيكست بوكس

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

Book1.rar

رابط هذا التعليق
شارك

اخى واستاذى الصقر

بالفعل الكود المرفق من حضرتك يعمل بنجاح

كود كميل وفكره جميله بارك الله فيك

ولكن بصراحه

انا وقفت امام استخدام الكود الموجود فى المشاركه الاولى

ومعرفتش اوظف الكود ليقوم بهذه الوظيفه

وانا كنت عايز اعرف ازاى يمكن البحث فى الليست بوكس مباشره

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

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

وفى انتظار محاولات اخرى

تقبل تحياتى

رابط هذا التعليق
شارك

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

أستاذنا القدير ابراهيم أبو ليله .. في محاولة لأستاذنا الفاضل " الصّقر " ..جزاه الله خيرًا و زادها بميزان حسناته.. جرّبت مثلاً  كتابة  العدد 1800 .. ولم يظهر هذا العدد على الليست بوكس مع أنّك ذكرتَ عبارة  ( تساوي أو أكبر من .. ) .. ولمْ تُشرْ أنتَ لذلك  في ردّك على محاولته .. هل ما تم انجازه هو المطلوب أم ماذا بالضبط لو سمحت سيّدي الكريم ..

خالص احتراماتي

1.thumb.jpg.46b99d23753ef924ed27de5aa60c

 

 

 

 

1.jpg

رابط هذا التعليق
شارك

اخى الحبيب عبدالعزيز

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

لكن الكود بتاعى انا انت لفت انتباهى لوجود خطأ فى النتائج لو لاحظت فى الصوره عاليه ستجد وجود 1700 علما انها اقل من 1800 فأنا عرفت اين الخطأ بالكود وتم تصليحه ممكن ارفع الملف بعد التعديل  ولكن سيكون بدون فائده لان الاخ ابراهيم يريد شرح للكود الموجود بالملف عند رفعه 

تقبل تحياتى

تم تعديل بواسطه الصـقـر
  • Like 1
رابط هذا التعليق
شارك

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

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

                                                                                                        وافر احتراماتي

رابط هذا التعليق
شارك

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

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

                                                                                                        وافر احتراماتي

بالفعل

اخى عبدالعزيز

بالفعل الكود للعلامه القدير عبد الله باقشير

اطال الله عمره

تقبلو تحياتى

 

رابط هذا التعليق
شارك

اخى الحبيب عبدالعزيز

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

لكن الكود بتاعى انا انت لفت انتباهى لوجود خطأ فى النتائج لو لاحظت فى الصوره عاليه ستجد وجود 1700 علما انها اقل من 1800 فأنا عرفت اين الخطأ بالكود وتم تصليحه ممكن ارفع الملف بعد التعديل  ولكن سيكون بدون فائده لان الاخ ابراهيم يريد شرح للكود الموجود بالملف عند رفعه 

تقبل تحياتى

اخى الصقر

بالفعل انا مازلت فى انتظار

ردود اى من الاخوه الافاضل

والاساتذه الكبار

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

الاولى فى عمل المطلوب

ولكن فى حالة عدم وجود رد وعدم القدره على الاستفاده من هذا الكود

سوف ابحث عن طرق بديله للحصول على المطلوب

وبالتاكيد الكود الخاص بحضرتك سوف يكون ضمن البدائل

لذلك يرجى التفضل بالتعديل

وذلك من اجل ان تعم الفائده على الجميع

تقبل تحياتى

رابط هذا التعليق
شارك

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

أستاذي الفاضل ابراهيم أبو ليله .. أرجو أن تضيف لو سمحت هذا الملف ضمن البدائل الخاصّة .. ربّما به تقريب للفكرة ..

                                                                                                فائق احتراماتي

 

ابراهيم أبو ليله.rar

  • Like 2
رابط هذا التعليق
شارك

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

أستاذي الفاضل ابراهيم أبو ليله .. أرجو أن تضيف لو سمحت هذا الملف ضمن البدائل الخاصّة .. ربّما به تقريب للفكرة ..

                                                                                                فائق احتراماتي

 

ابراهيم أبو ليله.rar

اخى عبد العزيز

بدائل ايه بس الى بتتكلم عليها

ده شكله كده هيكون ليه الاولوليه

...................................................

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

ولكن كحتاج وقفه كبيره معاه

علشان افهمه كويس

...........................................

من الاخر

الكود ده ممكن يغير مجرى التعامل

مع البحث فى الليست بوكس

...............................................

على العموم

مشكورا على الهديه الرائعه

بارك الله فيك

تقبل تحياتى

  • Like 3
رابط هذا التعليق
شارك

أستاذي الفاضل ابراهيم أبو ليله

لا شكر على واجب .. فأفضالك عل المنتدى بصفة عامّة وعلينا بصفة خاصّة .. لا تنتهي .. ولا تُحصى و لا تُعد

                                        جزاك الله خيرًا و زادك من علمه و فضله

                                                                                                        احتراماتي

  • Like 3
رابط هذا التعليق
شارك

:fff::fff:السلام عليكم أخوتي الكرام:fff::fff:

بصراحة أستاذ إبراهيم أبو ليلة كود أستاذنا عبد العزيز البسكري أكثر من رائع ويستحق الإعجاب:wavetowel:... مع فائق الشكر والتقدير لكم:signthankspin:.

المهم الحمد لله أن وصلت إلى نهاية سعيدة لليست بوكس:wink2: ...

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

  • Like 3
رابط هذا التعليق
شارك

السلام عليكم

الاخوه الافاضل

بصراحه

التنوع الجميل ده

اكبر دليل على ان عالم VBA

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

وزى ما بيقولو فى الامثال الى يعيش ياما يشوف

فى انتظار المزيد من الحلول

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

  • Like 2
رابط هذا التعليق
شارك

الاخ الكريم

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

مرفق ملفى الذى تقدمت به من قبل ولكن بعد التعديل وتدراك الخطأ

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

 

Book1 - Copy.zip

  • Like 2
رابط هذا التعليق
شارك

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

أخي الصقر ما شاء الله بارك الله تم الوصول للنتيجة المطلوبة:wavetowel:

ولكن أتساءل هل يمكن أن يتم البحث بعد انتهاء الكتابة في الليست بوكس تماماً:cool:...أم أنه يبحث عن كل رقم أثناء الكتابة

:fff::fff:تقبل تحياتي..:fff::fff:

  • Like 1
رابط هذا التعليق
شارك

استاذى الحبيب 

حضرتك تقصد الكتابه فى التكست بوكس فأذا كنت تقصد ذالك

نعم فقط قم بنسخ الكود وضعه فى حدث Exit  للتكست بوكس

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
'انسخ الكود هنا
End Sub

أو حدث AfterUpdate للتكست بوكس

Private Sub TextBox1_AfterUpdate()

'انسخ الكود هنا

End Sub

كلاهما يؤدى نفس الغرض  وجرب بنفسك وستجد ما يسرك

تقبل تحياتى

تم تعديل بواسطه الصـقـر
  • Like 2
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
×
×
  • اضف...

Important Information