منع الكتابة في الكومبوبوكس

**Akram Galal** · مارس 20, 2015

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

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

مع امكانية الإتيار من القائمة

جزاكم الله خيرا

**الصـقر** · مارس 21, 2015

اخى الكريم

كان من الافضل ارفاق ملف

ضع هذا السطر فى حدث تغيير الكمبوبكس

If Me.ComboBox1.MatchFound = False Then: MsgBox "فضلا اختار من القائمة", vbCritical: Exit Sub

شوف رقم الكمبوبوكس عندك كم وغير لان انا عملته ComboBox1

تقبل تحياتى

**Akram Galal** · مارس 21, 2015

اخي الفاضل

الكود يسمح بكتابة حرف ثم يظهر رسالة تنبية

اريد كود لا يسمح بكتابة أي شي مطلفا

جزاك الله خيرا

**الصـقر** · مارس 21, 2015

اخى الكريم يمكن عمل اضافه بسيطه

If Me.ComboBox1.MatchFound = False Then: MsgBox "فضلا اختار من القائمة", vbCritical:Me.ComboBox1.value ="": Exit Sub

وايضا يمكن وضع هذا الشرط فى زر الحفظ بمعنى قبل عملية الحفظ سيقوم بالاختبار هل الاختيار تم من القائمة ام لا

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