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

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

قام بنشر

الاخ العزيز

nokia_c65

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

المرفق مثال للبحث باى اسم سواء الاسم او اسم الاب او الجد

بمجرد ادخال الحرف يتم التصفية حتى تصل للاسم المطلوب

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

ولخبرتى القليلة لا اعلم السبب

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

ولكن انظر الى النموذج form

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

لينقلك اليه مباشرة فى النموذج الرئيسى

ولكنى لم افلح لخبرتى القليلة

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

والذى لم استطع تنفيذه


DoCmd.Minimize

    Dim stDocName As String

    Dim stLinkCriteria As String

    stDocName = "ahdaf"

        stLinkCriteria = "[name]=" & Me![SearchList]

    DoCmd.OpenForm stDocName, , , stLinkCriteria

DoCmd.Close acForm, "form", acSaveYes


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

تجربة1.rar

قام بنشر (معدل)

السلام عليكم

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

الزر الذي عملته صحيح ونموذج البحث يظهر ولكن خلف النموذج الرئيسي فلا يمكنك رؤيته ولكي تتمكن من رؤيته ويظهر فوق الاطارات الأخرى اذهب إلى خصائص النموذج ومن لسان التبويب : (غير ذلك) واجعل القيمة : منبثق = نعم

وبالنسبة للكود أزلت السطر DoCmd.Minimize لأن نموذج البحث بعد تنفيذ الكود سيغلق

وإن أردت ان تغلقه بنفسك من زر الاغلاق فاحذف السطر الأخير : DoCmd.Close acForm, "form", acSaveYes

واستبدلت الاسم[name] بالرقم التلقائي [n] لأنه فريد

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

ودمتم سالمين ،،،

تجربة1.rar

تم تعديل بواسطه أبو الأنس

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