Interdire la saisie dans combobox

[Rikikiller]

Bonjour à tous,

J'alimente 2 combos avec :


For Each C In Sheets("Déposant").Range("C5: C13")
If Not C = "" Then ComboBox2.AddItem C
Next C
For Each C In Sheets("Déposant").Range("D2: D13")
If Not C = "" Then ComboBox3.AddItem C
Next C

Je souhaite que l'utilisateur ne puisse pas "écrire" dans les combos mais uniquement sélectionner une valeur parmi celles présentées (issues des plages C5: C13 ou D2: D13). Je ne suis pas certain d'être très clair alors n'hésitez pas à revenir vers moi pour quelques éclaircissements si besoin est.

Je remercie par avance tous ceux qui me permettront d'avancer vers la solution à mon problème peut être basique mais bien trop gros pour moi. Dans l'attente de vous lire.

Cordialement.

Rikikiller

 

[tototiti2008]

Re : Interdire la saisie dans combobox

Bonjour Rikikikiller,

il y a une propriété de la combobox qui s'appelle MatchRequired et qu'il faut faire passer à True

 

[RENAUDER]

Re : Interdire la saisie dans combobox

Bonjour,
Il faut modifier la propriété Style de tes Combobox en mettant l'option :
2 - fmStyleDropDownList

 

[Pierrot93]

Re : Interdire la saisie dans combobox

Bonsoir Riki

essaye le code ci-dessous, à placer lors de l'initialisation de l'USF :

ComboBox1.MatchRequired = True

bonne soirée
@+

 

[Rikikiller]

Re : Interdire la saisie dans combobox

Bonjour Tototiti, bonjour le forum

C'est super ! Ah quand on ne sait pas on est bloqué par très peu de chose mais grâce à vous tous, j'arrive toujours à surmonter les obstacles qui se présentent à moi. Encore merci à tous en général et à toi Tototiti sur ce coup là. Bonne soirée et certainement à bientôt.

Rikikiller

edit : merci Renauder et Pierrot

 

[Pierrot93]

Re : Interdire la saisie dans combobox

Re, bonsoir Tototiti, Eric

aarf bonsoir messieurs, vous avais point vu... la proposition d'Eric est la meilleure, je l'oubli souvent celle ci...