تعديل فى زر البحث

[مودى محمد]

المطلوب عند كتابة حرف يظهر الاسماء لاختيار الاسم المطلوب

يوجد مشكلة مثلا مع اسم احمد

البحث مابين سطر 7 وسطر 26 إذا ذاد او نقص يرسل رسالة بعدم البحث الا بين النطاقين 7   و 26

ومراجعة باقى CommandButton من مسح واضافة

ولكم جزيل الشكر

 

مواضيع.rar

[khalid_star2005]

مرحبا اخي

الي افتهمتو تغيير نطاق البحث

اصبح من 2 الى 35 وتم تعديل اليست بوكس

اذا لم يكن المطلوب رجاً التوضيح اكثر

ليتم المساعدة بشكل المطلوب من قبل الاساتذة

تقبل فائق التقدير والاحترام

1مواضيع.zip

تم تعديل مارس 19, 2017 بواسطه khalid_star2005

[مودى محمد]

الاخ العزيز شكرا لك

نفس المشكلة التى تكلمت عنها فى السابق

10 ساعات مضت, مودى محمد said:

المطلوب عند كتابة حرف يظهر الاسماء لاختيار الاسم المطلوب

يوجد مشكلة مثلا مع اسم احمد

البحث مابين سطر 7 وسطر 26 إذا ذاد او نقص يرسل رسالة بعدم البحث الا بين النطاقين 7   و 26

مواضيع.rar

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

محمد5 موجود امام الرقم

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

شكرا لك وفى انتظار احد لمساعدتى

تم تعديل مارس 19, 2017 بواسطه مودى محمد

[khalid_star2005]

ادخل على هذا الرابط قد تجد ضالتك

وقمت بارفاق الملف الذي تم العمل عيله من قبل الاستاذ

 

طريقة تصميم فورم بحث عن طريق لست بوكس22.rar

[khalid_star2005]

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

في الست بوكس لكن يظهر من اليسار ولم استطع اظهار التسلسل في مكانها الصحيح

خبرتي في البرمجة قليلة جداً

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

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

1مواضيع.zip

[مودى محمد]

الاخ خالد

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

انظر الصورة ماسر تكرار الارقام 7    7    5678 فى الاسفل

علما انى طلبت عدم اضافة او تعديل بيانات بعد السطر 26 او قبل السطر 7

شكرا لك وللسادة اعضاء المنتدى

تم تعديل مارس 21, 2017 بواسطه مودى محمد

[khalid_star2005]

تفضل اخي

2مواضيع.zip

[مودى محمد]

الاخ خالد

انظر الصورة امام مصطفى الرقم 0 فى الفورم علما انه فى الليست 15

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

انا طلبت عدم اضافة او تعديل بيانات بعد السطر 26 او قبل السطر 7

شكرا لمجهودك

تم تعديل مارس 21, 2017 بواسطه مودى محمد

[khalid_star2005]

اتمنى احد الاساتذة يحل المشكلة

مع الشرح

اسف اخي على عدم حل المشكلة بصورة صحيحة

[مودى محمد]

الاخ خالد

شكرا لك وفى انتظار مساعدة الزملاء

[مودى محمد]

ياساتذة المنتدى

86 مشاهدة ولم اصل لحل هل الموضوع صعب 

اين عمالقة المنتدى

[الجموعي]

تفضل لعله المطلوب

تم التعديل على البحث

تم التعديل على زر تعديل

تم اضافة زر حذف

 

مواضيع معدل.rar

تم تعديل مارس 22, 2017 بواسطه الجموعي

[مودى محمد]

الاخ الجموعى

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

ناقص جزء مهم طلبتة فى الاول

في ١٩‏/٣‏/٢٠١٧ at 15:39, مودى محمد said:

 

البحث مابين سطر 7 وسطر 26 إذا ذاد او نقص يرسل رسالة بعدم البحث الا بين النطاقين 7   و 26

 

مواضيع.rar

واذا اردت اضافة اسم مابعد السطر 26 يرفض التسجيل وارسال رسالة بذلك

[الجموعي]

42 دقائق مضت, مودى محمد said:

الاخ الجموعى

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

ناقص جزء مهم طلبتة فى الاول

واذا اردت اضافة اسم مابعد السطر 26 يرفض التسجيل وارسال رسالة بذلك

بالسبة لتحديد نطاق البحث

في حدث تكست البحث قم بتعديل السطر 8

بهذا الكود

For Each c In Range("B7:B26")

ليصبح على النحو التالي

Private Sub TextBox4_Change()

TextBox1.Value = ""
TextBox2.Value = ""
TextBox3.Value = ""
ListBox1.Clear
Sheets(1).Activate
ListBox1.Clear
k = 0
For Each c In Range("B7:B26")
B = InStr(c, TextBox4)
If B > 0 Then
ListBox1.AddItem
 ListBox1.List(k, 0) = Cells(c.Row, 2).Value
  ListBox1.List(k, 1) = Cells(c.Row, 1).Value
   ListBox1.List(k, 2) = Cells(c.Row, 3).Value
   
   k = k + 1
End If
Next c
End Sub

اما بخصوص اضافة اسم لم افهم جيدا هل تريد الاضافة قبل السطر 26

تم تعديل مارس 22, 2017 بواسطه الجموعي

[مودى محمد]

الاخ الجموعى

شكرا لك تم التعديل فى ملفى تعبتك معايا

بالنسبة لسؤالى

البحث والاضافة والتعديل والحذف مابين سطر 7 وسطر 26

وفى طلب الاضافة او التعديل مابعد السطور  او قبلها المحددة تظهر رسالة تفيد ان النطاق مابين 7 و26فقط 

تم تعديل مارس 22, 2017 بواسطه مودى محمد

[الجموعي]

منذ ساعه, مودى محمد said:

الاخ الجموعى

شكرا لك تم التعديل فى ملفى تعبتك معايا

بالنسبة لسؤالى

البحث والاضافة والتعديل والحذف مابين سطر 7 وسطر 26

وفى طلب الاضافة او التعديل مابعد السطور  او قبلها المحددة تظهر رسالة تفيد ان النطاق مابين 7 و26فقط 

تم المطلوب

تم إرجاع نطاق البحث من النطاق A2 إلى أخر النطاق الذي به البيانات لانه لو تم تحديد بيانات البحث البيانات الي قبل النطاق 7 وبعد 27

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

تم التعديل على زر التعديل والحذف ليتماشى مع ما طلبته

مواضيع معدل.rar

بقي زر الإضافة راح أحاول في الكود

[مودى محمد]

الاخ الجموعى 

جذاك الله خير

فى انتظار تعديل زر الاضافة ولك الشكر والتحية

[مودى محمد]

للرفع رفع الله قدركم

فى انتظار الرد

طلب الاضافة او التعديل مابعد السطور  او قبلها المحددة تظهر رسالة تفيد ان النطاق مابين 7 و26فقط

[مودى محمد]

للرفع رفع الله قدركم

[الجموعي]

في ٢٨‏/٣‏/٢٠١٧ at 18:40, مودى محمد said:

للرفع رفع الله قدركم

يا اخي الكريم انا لحد الان لم افهم ما قصدته هل ماقمت بتعديله لك غير صحيح ام ماذا

واعذرني على عدم متابعة موضوعك بسبب ظروف

 

[مودى محمد]

في ٢٢‏/٣‏/٢٠١٧ at 23:49, الجموعي said:

تم المطلوب

تم إرجاع نطاق البحث من النطاق A2 إلى أخر النطاق الذي به البيانات لانه لو تم تحديد بيانات البحث البيانات الي قبل النطاق 7 وبعد 27

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

تم التعديل على زر التعديل والحذف ليتماشى مع ما طلبته

مواضيع معدل.rar

بقي زر الإضافة راح أحاول في الكود

الاخ الجموعى

ذكرت فى اخر رد بقي زر الإضافة راح أحاول في الكود

فى هذه الصورة حضرتك عامل علامة صفراء للحد الزى ينفذ فيه الطلب

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

المطلوب عند اضافة اسم قبل او بعد العلامة الصفراء لا ينفذ  ويرسل رسالة لا يمكنك الاضافة

مثل عند التعديل ولك الشكر والتحية

[الجموعي]

تفضل لعله المطلوب

مواضيع معدل.rar

مواضيع معدل.rar

[مودى محمد]

الاخ الجموعى

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

هذا المطلوب واسف على تعبك واتمنى منك خدمة

الاطلاع على الرابط التالى