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

بحث بحقول النموذج بالكود وليس استعلام .


kkhalifa1960
إذهب إلى أفضل إجابة Solved by kkhalifa1960,

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

8 ساعات مضت, kkhalifa1960 said:

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

استاذنا / اولا كل عام وحضرتك بخير ـ وبارك الله لكم فى اعمالكم

اعتقد ان عملية البحث لا تتم بشكل صحيح : عند البحث عن فى عمود "city" عن اى مدينة تلاحظ لا يفلتر ولا يبحث

عند البحث برقم "id" نفس الشئ ربما الكود يحتاج الى تصحيح 

ممكن يكون انا غلطان ولكن جرب حضرتك بنفسك

عموما جزاك الله كل خير لافادة العامة

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

أخي الفاضل البحث هنا بالأسم الأول أو الثاني ........ وكما أني أشرت الى انه يمكن زيادة حقول البحث كيفما تشاء .

أما اذا تريد زيادة حقول البحث (حدد الحقول وأنا تحت أمرك) تحياتي .:fff:

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

  • أفضل إجابة

تفضل أخي عملت لك البحث في 6 حقول (ID) و (FName) و (LName) و (CompanyName) و (Address) و (City) .:fff:

واليك المرفق الجديد .:fff:

Search as you type-1.accdb

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

4 ساعات مضت, kkhalifa1960 said:

اليك المرفق الجديد

اشكرك استاذى العزيز جزاك الله كل خير 

تمام الان البحث يعمل بطريقة ناجحة

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

 

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

15 ساعات مضت, kkhalifa1960 said:

تفضل أخي عملت لك البحث في 6 حقول (ID) و (FName) و (LName) و (CompanyName) و (Address) و (City) .:fff:

واليك المرفق الجديد .:fff:

Search as you type-1.accdb 952 kB · 17 downloads

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

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

بارك الله فيك اخي الكريم

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

 

 

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

  • 2 weeks later...

أخي @abouelhassan يعمل عادي جرب (a)  وشوف العداد تحت ولابد تحصل بحقول السجل عن ماكتبته ..........ثم اضف (b) وشوف العداد تحت ولابد تحصل بحقول السجل عن ماكتبته ..........ثم اضف (e) 

وشوف العداد تحت ولابد تحصل بحقول السجل عن ماكتبته .......... حتى تصل للكلمة أو الرقم الذي البحث عنه .

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

تحياتي لك وأنا مهتم جداً بهذه المشاركات النافعة والفعالة خصوصاً من حضرتك .:fff:

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

اخى فى الله استاذى kkhalifa1960

زادك الله من فضله هل بالامكان نظرة على تجربتى على جزء من برنامج لدى

حيث اننى قمت بتطبيق الكود لكى يبحث بنموذج به عدد من الحقول ولم احصل على النتائج المرغوبة هل بالامكان التكرم بنظرة للتجربة اخى

بارك الله فيك

 

تجربة.accdb

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

اخى فى الله استاذى kkhalifa1960

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

اشكرك اخى وادعوا لك عن ظهر الغيب بالخير كله ان شاء الله

تقبل احترامى

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

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

تجربة-2.accdb

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

1 ساعه مضت, kkhalifa1960 said:

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

تجربة-2.accdb 1.21 \u0645\u064a\u062c\u0627 \u0628\u0627\u064a\u062a · 2 downloads

اخى فى الله 

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

فى هذا النموذج

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

      Me.AllowEdits = False
اضررت ان اضع كود 

Private Sub txtSearch_Click()
Me.AllowEdits = True
End Sub

لكى استطيع الكتابة فى حقل البحث 

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

بعد هذا الكود يمكن تغير البيانات

حاولت اضع الشرط

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

 
      Me.AllowEdits = False

فى كود الفلترة لم يفلح

اتمنى ان لا اكون مزعج لحضرتك بس اتعشم ان اجد الحل عند حضرتك

بارك الله فيك اخى الكريم جدا وزادك من فضله

تم تعديل بواسطه abouelhassan
رابط هذا التعليق
شارك

اخى الحبيب kkhalifa1960

لا اريد التعديل هذا النموذج التعديل فيه غير متاح

بس لكى اتمكن من البحث فى خلية البحث لن يتم الكتابة لاننى عامل التعديل غير متاح

فوضعت الكود

 

Private Sub txtSearch_Click()
Me.AllowEdits = True
End Sub

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

احتاج غلق التعديل بعد الفلترة 

مشكوووووووووووووووووور جدا اخى وجارى المحاولة وربنا يراضيك اخى فى الله

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

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