oblige une entrée dans combobox2, appartenent a la

[Evelynetfrancois]

bonjour à toutes et tous

j ai un combobox2 sur un usf
j aimerai , limite une entrée a ca liste de reference

je tourne autour de

Dim derlgn As Integer
derlgn = Range('C1000').End(xlUp).Row
ComboBox2.MatchRequired = True

ou
Dim derlgn As Integer
derlgn = Range('C1000').End(xlUp).Row
if ComboBox2.MatchRequired = True then
MsgBox 'pas bon ca !', vbCritical, '=> Invalide'
end if
mais sans le resultat escompté !!!

une idée serait forcement merveilleuse

merci pour tout
E et F

 

[Robert]

Bonjour Evelyne et François, bonjour le forum,

Je ne suis pas sûr d'avaoir bien compris... Je vous propose dans un premier temps, à l'initialisation de l'UserForm de forcer l'affichage du premier élément de la combobox2 avec le code : ComboBox2.LisIndex = 0. Ensuite d'obliger la ComboBox2 à se comporter comme une ListBox, c'est à dire sans pouvoir taper un élément exterieur, avec la propriété Style de celle-ci : Style = 2 (fmStyleDropDownList).
Grâce à cela, l'utilisateur ne peut plus oublier de renseigner la ComboBox2 car le premier élément de la liste s'affiche d'office et en plus il ne peut pas taper dans la ComboBox et donc proposer un élément non valide.

 

[Evelynetfrancois]

merci Robert
SUPER !!!!!!!!
et voila le probleme est solutionné
en mettant uniquement
sur la combobox2
la propriété Style ...........Style = 2 (fmStyleDropDownList).
plus de saisie possible , plus d erreurs..........

on apprend tlj grace a vous ici !!!
un bonheur !!!!!!!!!!
merci beaucoup !!
E et F