كيفية اضافة قيمة الى حقل بالاعتماد على قيمة حقل اخر

[alihussain1]

السلام عليكم اخوتي واساتذتي الكرام

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

مثلا :- عند اختاريي لكلمة "الايرادات" الاكسيس يضع قيمة 1 في حقل التوبيب.

ارجو من حضراتكم المساعدة

تحياتي لكم

 

 

مستند قيد.rar

[محمد أبوعبدالله]

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

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

Private Sub التفاصيل_Click()
    Me.التوبيب = DLookup("[رقم_التوبيب]", "[جدول_التوبيب]", "[التفاصيل] ='" & التفاصيل & "'")
End Sub

مستند قيد.rar

تحياتي