كيف اربط الصنف بكود الصنف

اخى العزيز السلام عليكم

اولا اود ان اشكرك على هذا التصميم الجميل ولكن اود ان انبهك الى شيئ بسيط اخى العزيز

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

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

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

بعد التعديل لحقل name فى النموذج g1

اخي الكريم اشكرك على الرد الطيب

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

تقديري للجميع

اخي الكريم

كما قال اخونا hhaannyy

يجب ان يكون جدول خاص للاصناف ويكون مرتبط ب جدول SH1 و .. BA2

على كل حال

هذا مرفق بالعمل مع بعض التعديلات

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

ارجو ان يكون المطلوب

1___________.rar

اخواني الاعزاء اشكركم على ملاحظاتكم وردودكم

ولكن لم ارى اي اختلاف في الجداول عندي جدول g3 للأصناف اين الغلط

ارجو التوضيح للأستفادة

كما ارجو توضيح الكود كيف اكتب رقم الكود ويطلع في خانة اسم الصنف الصنف المطلوب او اختار من القائمة المنسدلة اسم الصنف ويطلف في رقم الكود كود الصنف

تقديري للجميع

ارجو التفاعل مع الموضوع

شكراً لكم

أخي الكريم:

إليك الطريقة. أولاً ضع حقل الكود مع حقل إسم الصنف في استعلام القائمة المنسدلة لأسم الصنف (أنت وضعت حقل إسم الصنف فقط).

في حدث بعد التحديث لأسم الصنف أكتب الكود الأتي

Private Sub name_AfterUpdate()

Me.cod = Me!name.Column(1)

End Sub

بالتوفيق.

اخي الكريم

انت لو تمعنت بالبرنامج لوجدت الفرق

1- اضفنا في الجدول g3.... كود الصنف.codname

وجعلنا cod ترقيم تلقائي

2-حذفنا من ba2 وsh1 بيانات الخامه name

3-لاحظ الاستعلام ماخوذ من جدولين g3 و sh1 وفيه name فقط من جدول g3

4-عملنا نموذج فرعي من الاستعلام عمله عند كتابة رقم الكود يظهر الاسم مباشرة

ارجو ان اكون قد وضحت الامر

الاخوة الكرام

اشكركم جزيل الشكر على التفاعل والردود التي أنارت لي الطريق

لكن اخي team2000 جربت الرابط ولم يمشي معي

تحياتي وتقديري