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

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

قام بنشر

السلام عليكم

في هذا النموذج يوجد زر بحث

عند الضغط على زر البحث يفتح نموذج البحث \

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

مثلا عندما اكتب احمد يتم اظهار جميع الاسماء التي تحوي احمد 

المطلوب من بعد اذن الجميع:

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

وشكرا

قاعدة بيانات2.rar

بدون عنوان.png

قام بنشر

أخي ملفك لم يفتح عندي لأن لدي أكسس 2007 لكن لا بأس سوف أشرح لك الطريقة إن شاء الله.

1- أنشئ إستعلاما واجعل فيه شرط المعيار اسم صاحب الجهاز = مربع نص اسم صاحب الجهاز في النموذج الفرعي للتصفية

2- أنشى نموذج يستند للإستعلام الذي أنشئته (من أجل التعديل فيه)

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

و جرب طبق إن شاء الله تكون النتيجة تمام.

وافني بالنتيجة بعد التطبيق أخي الكريم

أدعوا لي و لجميع أعضاء المنتدى

فتح نموذج لتعديل.rar

قام بنشر
1 ساعه مضت, صالح حمادي said:

شكرا لك اخي الكريم

لكن مثل ما انا موضح بالصورة هذا ليس نموذج فرعي

هذا مربع نص

الرجاء فتح الملف الذي ارفقته لكي تفهم قصدي

شكرا

 

 

  • Like 1
قام بنشر

 

تفضل أخي الكريم:

لم يفتح معي لاني ايضا لا املك الا اوفيس 2007

اضف حقل التعريف لديك في استعلام البحث وغير رقم العمود (7) حسب مكان حقل المعرف لديك، من خلال الصورة بعد اضافة المعرف في الاخر يكون (7)

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

    Dim stLinkCriteria As String
    stLinkCriteria = "[رقم المعرف لديك]=" & Me.[اسم القائمة التي يظهر فيها البحث].Column(7)

If IsNull(Me.[اسم القائمة التي يظهر فيها البحث].Column(0)) Then
    MsgBox ("يجب اختيار اسم قبل النقر المزدوج")
Else
DoCmd.OpenForm "اسم النموذج الذي تريد فتحه", , , stLinkCriteria
DoCmd.Close acForm, "اسم نموذج البحث"
End If

::

جرب ووافني بالنتيجة واذا لم تستطع ارفق مثالاً بصيغة 2007

تحياتي

  • Like 2
قام بنشر

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

جاري التجربة

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

  • 5 months later...

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