سؤال يتعلق بـقائمة الـ ComboBox

[ابوالزوز]

السلام عليكم ..

أخواني الأفاضل لدي استفسار حول قائمة الكومبوبوكس حيث أنه عند التنقل بواسطة الأسهم للأعلى أو الأسفل

هل يمكن أن يقف المؤشر في الكومبو بوكس ولايخرج منه في حال الوصول لأول سطر أو آخر سطر في القائمة

يوجد مرفق للتطبيق

وشكراً لكم جزيلاً

تقبلوا تحياتي ..

MltiPages.rar

[ابوالزوز]

أخواني هل من ردود على الموضوع

[ابوالزوز]

السلام عليكم ..

أخواني أرجو منكم الرفع

[ابو اسامة العينبوسي]

السلام عليكم

ممكن تعطيل كود انسدال القائمة ان شئت (الكود الاول) فهو زيادة

Private Sub Com_Box_Enter()

Me.Com_Box.DropDown

End Sub

'-----------------------------------------------------------------------------------------

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

If Me.Com_Box.ListIndex = 0 Then If KeyCode = vbKeyUp Then KeyCode = vbNull

If Me.Com_Box.ListIndex = 6 Then If KeyCode = vbKeyDown Then KeyCode = vbNull

End Sub

MltiPages2.rar

[خالد القدس]

السلام عليكم

جزاك الله خيرا أستاذي ابو اسامة

صاحب اللمسات السحرية والعبقرية

[ابوالزوز]

السلام عليكم ..

كل الشكر والتقدير لك أخي وأستاذي العزيز أبو أسامة جعل الله هذا في ميزان حسناتك

تقبل تحياتي ..