اذهب الي المحتوي
أوفيسنا

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

  • 3 weeks later...
قام بنشر

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

الاخ ياسر

نعم صحيح طلع معي مثل اخي حسام

لما ادخل Sheet1 وارجع لـ Search واضعط في خلية A6 يظهر ال Userform1 اللي هو البحث ضع أي حرف مثلا م لاتظر أي نتائج

 

الموضوع في 5 نوقمبر 2014

قام بنشر

السلام عليكم

 

اسعد الله صباحكم 

 

بعد اذن استاذي ياسر 

 

الزر في sheet1 بيشغل الامر ده 

    LastRow1 = Columns("A").Find("الفصل الأول", SearchDirection:=xlPrevious, LookIn:=xlValues, LookAt:=xlWhole).Row

فبيعيد برمجة FIND بانها تبحث عن الكلمة كلها و فقط (LookAt:=xlWhole) يعني تبحث عن محمد لازم يكون الاسم محمد فقط مش محمد محسن مثلا .

 

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

         Set A = Range(.Cells(1, 1), .Cells(.Rows.Count, .Columns.Count)).Find(M, LookAt:=xlPart)

فيعيد البرمجة بتاعت FIND تاني بحيث تبحث بمعلومية جزء من الكلمة (LookAt:=xlPart)

 

تحياتي

  • Like 1
  • Thanks 1
قام بنشر

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

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

نفس المشاركة اللي رفعها اخونا الغالي حسام (الصقر الذهبي) رقم المشاركة 22

قام بنشر

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

شكرا اخي الفاضل ياسر

استخدمت التعديل  الخاص بالاخ احمد ناصر وعمل معي الفورم مهما تنقلت بين جميع الشيتات

جزاك الله خير

  • Like 1

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information