حاتم عيسى

في انتظار الملف الجديد ... بارك الله في حضرتك

ربنا يبارك في حضرتك ويجزيك خيرا مجهود رائع وعمل عظيم من حضرتك شكرا لكل القائمين على المنتدى الغالي

للرفع للمساعدة للأهمية من فضلكم

الأستاذ الفاضل المحرتم : الـعيدروس تحية طيبة من عند الله شكرا لاهتمام حضرتك والرد على طلبي قمت بتنفيذ ما أفدت به حضرتك وبالفعل بحث في كل الصفحات ولكن هناك مشكلة بسيطة أنه عندما أضغط على اسم لإظهار بياناته في التكست بوكسات لا يعطيني البيانات الصحيحة وإلى حضرتك صورة مما يظهر . أرجوا الإفادة من فضل وكرم أخلاق حضرتك . وشكرا

بسم الله الرحمن الرحيم السادة الأفاضل مسئولي ومشرفي ورواد المنتدى الأفاضل : تحية طيبة من عند الله ... وبعد أرجوا من سيادتكم التكرم بمراجعة الكود التالي وتصحيح ما به من خطأ حتى يتم البحث في الملف من الشيت رقم 5 حتى نهاية الملف . أرجوا أن ينال طلبي هذا رعاية واهتمام سيادتكم كما عهدناكم دائما وبارك الله فيكم جميعا ولكم جزيل الشكر والتقدير مقدما الكود هو Private Sub TextBox1000_Change() If TextBox1000.Value = "" Then ListBox1.Clear: Exit Sub Dim x As Worksheet ListBox1.Clear k = 0 For Each x In ThisWorkbook.Worksheets SS = x.Cells(Rows.Count, 10).End(xlUp).Row For Each c In x.Range("D10:D" & SS) b = InStr(c, TextBox1000) If c Like TextBox1000.Value & "*" Then ListBox1.AddItem ListBox1.List(k, 0) = Cells(c.Row, 4).Value ListBox1.List(k, 1) = c.Row k = k + 1 End If Next c Next x End Sub ومرفق الملف للتجربة والمعاينة عليه برنامج_شئون_الطلاب_إصدار_تجريبي_للفروم_الجديد_18-4-2019.xlsm

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

للرفع والمساعدة

للرفع

للرفع

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

أولا : مجهود رائع بارك الله فيكم بارك الله في حضرتك أستاذ مجدي المحترم . ثانيًا : هل يصلح أن يكون البحث على نطاق معين من الصفحات أو بمعى بداية من الورقة رقم 6 مثلا وحتى نهاية المستند ( باقي كافة الأوراق ) . ثلالثًا : هل ممكن أن تكون التكست بوكسات التي ستظهر بها النتيجة على نفس الفورم . شكرا أستاذ مجدي على مجهودك العظيم والرائع

بارك الله فيكم جميعا وزادكم من فضله وزادكم علمًا . معذرة على الاستعجال ... ولا يهم حضراتكم

للمساعدة للأهمية

للمساعدة وشكرا

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

بسم الله الرحمن الرحيم المطلوب أولا : جعل البحث يسع كل الأعمدة الموجود بها بيانات وهى 26 عامود . ثانيا : أن يتم البحث في عدد صفحات معينة دون غيرها وهذا النطاق هو من صفحة ( 2010 وحتى صفحة 2020 ) . ثالثًا : عمل كود بحث أخر يبحث في نطاق الصفحات الأخرى من ( A2010 وحتى A2020 ) . ثالثًا : إذا كان البحث في الصفحات الأولى عند الضغط على الليست بوكس يتم إظهار الإطار الأول وعرض النتائج بداخله . رابعًا إذا كان البحث في الصفحات الأخرى من A2010 غند الضغط على الليست بوكس يتم عرض الفور الثاني وإظهار النتائج داخله . وشكرا لكم جميعًا . مرفق الملف المراد العمل عليه وهو من أعمال الأستاذ العظيم : عماد غازي . البحث والتعديل فى كل اوراق العمل 2.xlsm

للرفع والمساعدة

بارك الله في حضرتك وجزاك الله كل الخير ونفعك والأمة بعلمك وزادك الله علماً . أستأذن حضرتك التعديل على الكود بحيث يكون الملف به عدد الأعمدة الفارغة المتروكة بعدد 26 عامود حيث أن هناك بيانات أخرى بحيث أنها لن تظهر في الفورم . وشكرا جزيلا لحضرتك بحث بالاسم في تيكست بوكس فيتم الفلترة الى اللست بوكس وثم الى تيكست بوكس بعدد غير محدد من الاعمدة(4).xlsm

للرفع

بسم الله الرحمن الرحيم مرفق ملف به فورم بحث أرجوا من سيادتكم التكرم بالتعديل على كود البحث الخاص بالأستاذة ساجدة العزاوي ... ليتلائم مع ملفي . وجزاكم الله كل الخير ونفع بكم الأمة وزادكم من علمه وفضله . بحث بالاسم في تيكست بوكس فيتم الفلترة الى اللست بوكس وثم الى تيكست بوكس بعدد غير محدد من الاعمدة.xlsm

للرفع ...... هل من مساعد ؟ هل من معاون ؟

للرفع

بارك الله في حضرتك وزادك الله من علمه وفضله .

تصميم رائع جدا وأكثر من ممتاز . كل ما أتمناه أن يتم إدخال الاسم يدويا أو رقم القومي للبحث عنهم وإظهار النتائج في الفورم وليس عرض الأسماء والبحث فيهم حيث أنه لن يكون هناك صفحة الداتا ولكن هناك العديد من الصفحات كما أخبرت حضرتك . كما في الملف الموجود في المشاركة السابقة .

السادة الأفاضل حاولت ولكن دون جدوى ربط بيانات الجدول بالفورم . برجاء المساعدة للأهمية . وشكرا لكم بحث(1).xlsm