مفاتيح الوصول المباشرة

عند الحدث(عند مفتاح للاسفل) الخاص بالنموذج اكتب الكود التالي

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF1: DoCmd.OpenForm "Form Name"
End Select
End Sub

اخوي الله يعطيك العافية واشكرك على الرد

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

ياليت تراجع الكود او تضعلي مثال

تحياتــــــــــــــــتي لك

اسف اخي الفاضل

الخطاء مني وليس منك حيث انني وضعت الكود في النموذج المراد فتحه ولكن عندما وضعته في النموذج الرئيسي ضبط معاي

اشكرك .