ارجو المساعدة أرغب للأنتقال من التيكست بوكس ل الليست بوكس مباشرة

[محمد عبدالسلام]

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

أرغب في استعمل زر في لوحةالمفاتيح   للأنتقال من التيكست بوكس ل الليست بوكس  مباشرة

للأنتقال من التيكست بوكس ل الليست بوكس مباشرة.zip

[عبد العزيز البسكري]

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

لم أفهم بالضبط  أخي الكريم " محمّد عبد السّلام " .. القصد ممّا تريد عمله ..

مع ذلك جرّب أخي وضع هذا الكود ..لعل و عسى يفي بالغرض

إحتراماتي

Private Sub TextFind_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

If KeyCode = vbKeyReturn Then
ListFind.SetFocus
End If

End Sub

 

[محمد عبدالسلام]

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

  أخي الكريم " عبد العزيز البسكري " .. بارك الله فيك

أرغب عند اضغط على زر  في لوحةالمفاتيح   ينتقال سهام من التيكست بوكس ل الليست بوكس  مباشرة

 

 

تم تعديل مارس 20, 2016 بواسطه محمد عبدالسلام

[ياسر العربى]

بعد اذن اخي الغالي عبد العزيز

تفضل اخي الغالي

هذا التحديد يشير الى رقم الاداة في الانتقال وفي المثال هنا التكست المشار لها رقمها 1

والليست بوكس رقمها 2

عند الوقوف داخل التكست والضغط على زر TAB يتم الانتقال لرقم 2 وهي الليست

 

 

للأنتقال من التيكست بوكس ل الليست بوكس مباشرة.rar

[عبد العزيز البسكري]

على رأيكم يا ياسر يا عربي ..

" الكبير يبقى دائمًا كبير "

و أنت فعلاً كبير بأخلاقك و أعمالك المميّزة ..

هل تصدّق عزيزي.. كان بفكري شيء من هذا القبيل .. و بقيت ساعة من الزمن و أنا أجرّب وضع الأعداد مثلما يشير السهم .. و أقول " ما ضبطتش ليهْ "

إحتراماتي

 

 

 

تم تعديل مارس 20, 2016 بواسطه عبد العزيز البسكري

[محمد عبدالسلام]

لسّلام عليكم و رحمة الله و بركاته    أخي الكريم " ياسر يا عربي " .. وخي  " عبد العزيز البسكري "جزاكم الله خيرا دام الله عليكم الصحة والعافية وحفظكم الله ورعاكم وجعلكم من  الناجون  من هول يوم القيامة بارك الله فيكم