السلام عليكم
هل ممكن في الاكسيس تعبئة حقول
عن طريق مفتاح أختصار
على سبيل المثال
أريد بمجرد الضغط على زر f2
أدخل قيمة 1 للحقل1
وقيمة 1 للحقل2
وقيمة 1 للحقل3
وهكذا
ولكم جزيل الشكر
أدخال قيم للحقول بواسطة مفتاح أختصار
up
up
أخواني وأخواتي
عباقرة المنتدى وخبراء الاكسيس
نطلب منكم الفزعة
وانا متأكد ان هذا الامر موجود
فقط /انتظر منكم الرد
:wacko: :wacko: :wacko: :wacko:
أخي العزيز :
في حدث عند التحميل للفورم تضع الكود التالي :
Me.KeyPreview = True
وفي حدث عند المفتاح للأسفل تضع الكود التالي :
Select Case KeyCode
Case vbKeyF2
Me.a = 1
Me.b = 1
Me.c = 1
MsgBox "تم ادخال القيم"
Case Else
End Selectومرفق مثال يوضح ذلك ( جرب اضفط F2 لترى أن جميع الحقول صارت قيمتها 1 ) .
كما يمكنك الاستفادة من موضوع كتبه العضو " azouzeg "
فعلاً أخي العزيز / جعفر.
نعم هذا هو المطلوب
جزاك الله الف خير
وجعله في ميزان حسناتك
وهل ممكن تطبيقة على باقي الازرار
مثلاً
مفتاح Tab او مفتاح Shift
مع اني اطلعت على الموضوع
الذي كتبه العضو " azouzeg
ولم استطع الاستفادة منه
لعدم خبرتي في الاكسيس
ارجو التوضيح بمثال كالمثال السابق
ففيه شرح وافي وكافي
لكم مني الف تحية وأحترام
تفضل هذا الاقتراح مني
بدلا من استخدام مفاتيح كثيرة
قم بوضع القيمة في حقل القيمة ثم اضغط مفتاح F2
بالتوفيق
سيد الاستغفار
{ اللهم أنت ربي لا إله إلا أنت خلقتني وأنا عبدك وأنا على عهدك ووعدك ما استطعت أعوذ بك من شر ما صنعت أبوء لك بنعمتك علي وأبوء لك بذنبي فاغفر لي فإنه لا يغفر الذنوب إلا أنت}
من قالها من النهار موقنا بها فمات من يومه قبل أن يمسي فهو من أهل الجنة ومن قالها من الليل وهو موقن بها فمات قبل أن يصبح فهو من أهل الجنة .رواه البخاري