البحث في جميع الشيتات عن طريق اليوزر فورم

[شبل ليث]

السلام عليكم اعضاء المنتدى الكرام

يرجى تفضلكم بمساعدتي على تعديل البحث بالاسم في اليوزر فورم ليقوم بالبحث في جميع الشيتات الموجودة وليس الشيت المحدد

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

وارفق لكم الملف للتعديل

للتعديل ملاك 2021.xlsb

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

حرب هذا الملف

 

Shibl.xlsm

[شبل ليث]

شكرا استاذ سليم حاصبيا للمساعدة منذ ان بدات بهذا العمل وحتى اليوم

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

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

تفضلكم بالمساعدة

ولكم الشكر والتقدير

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

في هذا السطر من الكود استبدل     B:B  بـــ  C:C

[شبل ليث]

سلمت يداك استاذ سليم حاصبيا على هذا الكود الرائع

ولو ربما تماديت في طمعي مساعدتك لي في ان يكون البحث في جزء من الاسم  لتدرج الاسماء عند كتابة الاحرف واختار الاسم المطلوب

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

ولكم الشكر والتقدير

Shibl.xlsm

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

تم تعديل الكود  لكن هناك بعض الملاحظات

1- البيانات غير مكتملة (الكثير من الجداول تحتوي على صفوف فارغة) قمت يتعبئة بعضها عشوائياُ
              لذلك أعتدر عن المتابعة اذا لم تكتمل الجداول بالشكل المطلوب (دون صفوف فارغة ولا بهم عدد الصفوف أو عدد الاوراق)
              وفي نفس المكان في كل صفحة (ابنداء من A1 )
2-تم حذف بعض الصفحات غير المكتملة للتدقيق في عمل الكود  (يمكن اعادة وضعها)
3 الاسم الذي تفتش عنه (يأول حرف او عدة حروف) يتم تلوينه بكل الصفحات

3- اكتب حرفاً أو عدة جروف  ثم اضغط الزر بحث و تدرج كل الاسماء التي تبدأ
 بهذه الحروف في الليست بوكس مع عناوينها (اسم الصفحة و غنوان الحلية)
 وبذلك يمكنك الذهاب الى اي شيت وتقوم بتعديل ما تريد قي الصفوف الخصراء)

Shibl_new.xlsm

[شبل ليث]

بارك الله بك استاذي سليم حاصبيا 

وجزيل الشكر والتقدير على هذه الاستجابة السريعة 

وفقك الله 

يعجز اللسان عن التعبير 

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

زيادة في الموضوع

1- عند الضغط على اي سطر في الليست بوكس (ما عدا  سطر العنوان طبعاً) تظهر لك بيانات الاسم  في التكست بوكسات

Shibl_Extra.xlsm

[شبل ليث]

شكرا جزيلا استاذ سليم حاصبيا على هذه الاضافة

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

وها انت بذكائك وعقلك النبه قرائت افكاري عن بعد 

فشكرا لك واعتذر اذا كنت قد ازعجتك واخذت من وقت

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