السلام عليكم و رحمة الله و بركاته
إذا كنت موافقا على اختيار المستعمل لعنصر غير موجود باللائحة غير الخاصية Limit to list في Data إلى No
إذا كنت غير موافق على ذلك يمكنك تعويض الرسالة برسالة من اختيارك عن طريق الحدث الخاص بالكمبوبوكس: NotInList و هذا مثال له:
[
Private Sub class_NotInList(NewData As String, Response As Integer)MsgBox "اختر القسم من القائمة", vbExclamation, "خطأ في القيمة المدخلة"
Response = 0
End Sub