القائمة المنسدلة / اختيار الاسم ورقم الموبايل بواسطة الكد

[محمد التميمي]

اخواني الكرام

السلام عليكم:

بعد التحية انا محتاج ( كـد جديد ) يعمل كالاتي عند فتح فاتورة جديدة واختيار اسم الوكيل من القائمة المنسدلة 

أَريد ان يظهر مع الاسم تلقائياً (رقم الموبايل واسم الشركة) لهذا الاسم  وحسب الصورة الموضحة

مع جزيل الشكر والامتنان

المرفق ملف اكسس 2013  32بايت

w.rar

[Shivan Rekany]

10 دقائق مضت, محمد التميمي said:

بعد التحية انا محتاج ( كـد جديد ) يعمل كالاتي عند فتح فاتورة جديدة واختيار اسم الوكيل من القائمة المنسدلة 

أَريد ان يظهر مع الاسم تلقائياً (رقم الموبايل واسم الشركة) لهذا الاسم  وحسب الصورة الموضحة

مع جزيل الشكر والامتنان

اتفضل
تم اضافة حقل رقم الموبايل و اسم الشركة لمصدر كومبوبوكس اسم الوكيل

اي يعني تم تغير مصدر كومبوبوكس اسم الوكيل الى هذا الاستعلام

SELECT [راس الشراء].[اسم الوكيل], [راس الشراء].[رقم الموبايل], [راس الشراء].[اسم الشركة], * FROM [راس الشراء]; 

وقمت بتغيير خصائص كومبوبوكس من عمود واحد الى 3 عمود

وقمت بتغيير حجم كل عمود ...
وتم استخدام هذا الكود بعد تحديث للكومبوبوكس
 

Private Sub اسم_الوكيل_AfterUpdate()
    Me.رقم_الموبايل = Me.اسم_الوكيل.Column(1)
    Me.اسم_الشركة = Me.اسم_الوكيل.Column(2)
End Sub

اليك ملفك بعد تعديل

 

w.rar

[محمد التميمي]

شكراً اخي شفان بعد نقل التعديل الى القاعدة الاصلية اصبح يعمل بامتياز

مع فائق الشكر والامتنان