اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر (معدل)

الاساتذة الافاضل

بالمرفق فورم به تكست اذا ضغطنا بالتكست دبل كليك يفتح فورم 2

المطلوب جعل زرsheft يفتح الفورم 2

من التكست بوكس بدلا من الدبل كليك

احترامى

New Microsoft Excel Worksheet.rar

تم تعديل بواسطه abouelhssan
قام بنشر

اخي ابوعبدالسلام

والله اني اصبحت انتظر منك مفاجأه كبيره

لانني ارى اسلوبك في المناقشه وفي طرح تساؤلاتك وطلباتك

كلها تنم عن انك ربما ستفجر لنا قنبله لم نراها من قبل ام انك ستتحفنا بعمل جميل

هذا ظني بك

اليك طريقه وهي بد من shift

عندك ثلاث خيارات اما السهم الاعلى او السهم الاسفل او استخدام المسطره

كلها ستظهر لك فورم2

New Microsoft Excel Worksheet.rar

قام بنشر

اعزك الله استاذنااحمد حمور خبير من خبراءالاكسيل ومن رواد

الابداع والتألق بالمنتدى ومن مجموعة الخبراء الكبار المحترفين بالمنتدى

احبك الله

استاذنا

هذه الاكواد اعرفها اخى

بس انا استخدم زر الانتر بالفورم 1 للانتقال بين التكست

وعند استخدام التعريف كى داون او اب

وتضغط انتر برده استاذنا هتعمل نفس العمل

احتاج زر sheft

احترامى من كل قلبى

اشكرك للاثراء استاذنا

قام بنشر

السلام عليكم

اختار الكود الذي يناسبك

الاول عند الضغط على الزر شفت مباشرة

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

If KeyCode = 16 Then UserForm2.Show

End Sub
هذا عند افلات الزر شفت
Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

If KeyCode = 16 Then UserForm2.Show

End Sub

ودمتم في حفظ الله

قام بنشر

اقسم بالله انا سعيد برد حضرتك اكثر من الكود والموضوع كله

بارك الله فيك استاذنا الكبير

احترام وكل الاحترام من كل قلبى

بارك الله فيك استاذ نا

اخيك

ابوالحسن

قام بنشر

استاذنا خبور خير

استفسار

هل رقم 16 مخصص للشيفت

ولو امكن ايضاح ارقام الازار الاخرى المتاحة لتعم الفائدة استاذنا

بارك الله فيك وبك ولك

قام بنشر

السلام عليكم

استفسار

هل رقم 16 مخصص للشيفت

ولو امكن ايضاح ارقام الازار الاخرى المتاحة لتعم الفائدة

اعمل فورم في اي ملف

ونفذ الكود التالي


Private Sub UserForm_KeyUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

MsgBox KeyCode

End Sub

بعد ما تفتح الفورم

اضغط اي زر في الكيبورت وشوف رقمه

===============================

ملاحظة :

لاحظت الان في غلطه مطبعية في الرد السابق

الكود الثاني هو

TextBox1_KeyDown

ساقوم بتصحيحه الان

ودمتم

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information