[VBA-Excel] - nombre de cas possibles

Bonjour et Re pour certains.

Quelle est la méthode à utiliser à la place de ceci?

Code:

---

If ComboBox2.Value = "droite" Or ComboBox2.Value = "gauche" Or ComboBox2.Value = "centré" Then

---

Un truc du genre:

Code:

---

If ComboBox2.Value = (droite;gauche;centré) Then

---

(J'ai une dizaine de possibilités en réalité, d'où l'intérêt)

Je suis désolé de poster pour une question comme celle-ci mais comment trouver ce que je cherche sans savoir quoi chercher?

Tu as plusieurs possibilités

Code:

---

1 2 3 4 5

Dim ok as boolean LesMots = Array("Gauche","Droite", "Dessus","Dessous","En bas","En Haut","Dedans", "Dehors") For i = 0 to Ubound(LesMots) ok = ok or ComboBox2.Value = LesMots(i) Next

---

ou bien, pour faire plus simple

Code:

---

ok = "GaucheDroiteDessusDessousEn basEn HautDedansDehors" like "*" & ComboBox2.Value & "*"

---

Faut simplement être sûr de ne pas se tromper dans les majuscules ou les minuscules
A+

Edit
Attention, si tu as "En Dessus" et "Dessus", ça ne fonctionnera pas car si tu vérifies "Dessus" tu l'auras dans les deux cas ;) et dans ce cas, mets une minuscule à "En dessus"... pour pas être sans dessus dessous :mouarf:

Re,

Il n'y a rien à faire,

Je ne sais pas si mon QI diminue de jours en jours (si c'est le cas, il est temps de m'inquiéter pour le futur), mais je comprend pas ton code.

Mon "If" Dans tout ça, il intervient où?
A l'intérieur de la boucle?
Et où met-on le "Else" ?

Merci,

Chewi:boulet:

A la fin des deux codes, tu peux mettre

Code:

---

If ok then msgbox "Tu fais ce que tu veux"

---

Si ok est true, c'est que l'un des mots a été trouvé, et donc, c'est ok que tu testes dans ton "If"
Descends de ton arbre, un peu :mouarf:

A mon avis je devrais plutôt y remonter pour me ressourcer:aie:

Merci Ouskel'nord, tout fonctionne parfaitement (tant que je ne touche pas au code:aie: )