مشكلة في ارتباط عبارة من القائمة المنسدلة بإخفاء أو إظهار السجلات

[حامل المسك]

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

وتقبل الله منكم صالح الأعمال..

الأساتذة الكرماء رعاكم الله لدي قائمة منسدلة من نموذج فرعي أرغب في إذا تم اختيار كلمة تدبر أن تختفي سجلات من النموذج الفرعي الآخر وتظهر سجلات وإذا تم اختيار غير ذلك يتم العكس..

طبقت على ذلك قاعدة If لكن بعد إدخال البيانات تظهر رسالة مشلكة ..

آمل التكرم بالتوجيه والتسديد رعاكم الله مرفق المثال وهذا الكود الذي تم وضعه 

 

If FNX = "تدبر" Then

Forms![majal1]![fnx2]![hekma].Visible = True
Forms![majal1]![fnx2]![addz].Visible = True
Forms![majal1]![fnx2]![beanx].Visible = False
Forms![majal1]![fnx2]![nobeanx].Visible = False

Else

Forms![majal1]![fnx2]![hekma].Visible = False
Forms![majal1]![fnx2]![addz].Visible = False
Forms![majal1]![fnx2]![beanx].Visible = True
Forms![majal1]![fnx2]![nobeanx].Visible = True

End If

 

مثال ربط قائمة منسدلة.rarFetching info...

[عبد اللطيف سلوم]

  في 6‏/8‏/2019 at 22:02, حامل المسك said:

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

وتقبل الله منكم صالح الأعمال..

الأساتذة الكرماء رعاكم الله لدي قائمة منسدلة من نموذج فرعي أرغب في إذا تم اختيار كلمة تدبر أن تختفي سجلات من النموذج الفرعي الآخر وتظهر سجلات وإذا تم اختيار غير ذلك يتم العكس..

طبقت على ذلك قاعدة If لكن بعد إدخال البيانات تظهر رسالة مشلكة ..

آمل التكرم بالتوجيه والتسديد رعاكم الله مرفق المثال وهذا الكود الذي تم وضعه 

 

If FNX = "تدبر" Then

Forms![majal1]![fnx2]![hekma].Visible = True
Forms![majal1]![fnx2]![addz].Visible = True
Forms![majal1]![fnx2]![beanx].Visible = False
Forms![majal1]![fnx2]![nobeanx].Visible = False

Else

Forms![majal1]![fnx2]![hekma].Visible = False
Forms![majal1]![fnx2]![addz].Visible = False
Forms![majal1]![fnx2]![beanx].Visible = True
Forms![majal1]![fnx2]![nobeanx].Visible = True

End If

 

مثال ربط قائمة منسدلة.rar 43.97 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 3 downloads

Expand  

اجعل جميع ما سبق مثل هيك

 Forms![majal1]![FNX2].Form![hekma].Visible = True

ورح تزبط معك 

[حامل المسك]

سلمت ..

تم التعديل لكن لازالت المشكلة قائمة

[kaser906]

  في 6‏/8‏/2019 at 22:02, حامل المسك said:

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

Expand  

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

ضع الكود في حدث الحالي للنموذج FNX2

If FNX = "تدبر" Then

Me![hekma].Visible = True
Me![addz].Visible = True
Me![beanx].Visible = False
Me![nobeanx].Visible = False

Else

Me![hekma].Visible = False
Me![addz].Visible = False
Me![beanx].Visible = True
Me![nobeanx].Visible = True

End If

::بالتوفيق::

[حامل المسك]

تم التعديل يا أبا محمد .. ولا زالت المشكلة قائمة 

[kaser906]

  في 7‏/8‏/2019 at 16:18, حامل المسك said:

تم التعديل يا أبا محمد .. ولا زالت المشكلة قائمة

Expand  

كما تلاحظ بالصورة تم تنفيذ الكود

[حامل المسك]

لو تتكرم علي بالتعديل على المثال.. لأنه لم يعمل معي بالشكل الصحيح 

[kaser906]

تفضل

 

مثال ربط قائمة 2منسدلة.rarFetching info...

[حامل المسك]

حياك الله يا غالي وسلمت ..

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

في حال العودة للسجل والأول والتعديل عليه تظهر هذه المشكلة ..

فما الحل؟

[kaser906]

  في 7‏/8‏/2019 at 18:37, حامل المسك said:

لو اخترنا تدبر في السجل الأول ثم أدخلنا بيانات ثم انتقلنا للسجل الآخر واخترنا حكم مثلا وأدخلنا بيانات ..

Expand  

وضح اكثر ولو كان بالصور يكون أفضل

[حامل المسك]

تفضل أستاذنا الكريم ..

[kaser906]

جرب الان

 

مثال ربط قائمة 3منسدلة.rarFetching info...

[حامل المسك]

 

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

حدث إشكال وقمت بحذف الكود من النموذج الثاني في حدث الحالي..

فعمل معي بالشكل الصحيح..

جاري التجربة

 

تم تعديل أغسطس 7, 2019 بواسطه حامل المسك

[حامل المسك]

Forms![majal1]![fnx2]![noza].SetFocus
 في الكود السابق هل يشترط في noza أن يكون مفتاح أساسي وإذا كان ذلك فهل يشترط أن يكون رقما..

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

[kaser906]

تفضل جرب

 

مثال ربط قائمة4منسدلة.rarFetching info...

[حامل المسك]

ممتاز وقمت بإضافة كود بعد التحديث في القائمة المنسدلة FNX

   Me.Parent![FNX2].Requery

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

ربي يوفقك لكل خير يا غالي ..

 

تم تعديل أغسطس 7, 2019 بواسطه حامل المسك

[حامل المسك]

تم التطبيق على البرنامج الأصل وعمل 100% بحمد الله

يجف حبر الحروف عن التعبير بالشكر والتقدير .. لكن لكم منا الدعاء ..

جميلكم محفوظ.. وعمل المعروف يدوم ويدوم.. كتب الله لكم ذلك في ميزان الحسنات..

تم تعديل أغسطس 7, 2019 بواسطه حامل المسك