XL 2013 Test conditionnel sur ComboBox

mvcs · 20 Mai 2019

Bonjour,
Je cherche le moyen de conditionner la valeur d'une ComboBox en fonction de la valeur d'une autre.
Exemple :
Si CBx1 = A ou B ou C alors CBx2 = Range("XXX").value
Si CBx1 = D ou E ou F alors CBx2 = ""
C'est sûrement très simple mais je bloque un peu.
Merci de votre indulgence pour un novice en VBA.

Et pendant que j'y suis, une autre question :
Je veux sélectionner la feuille en fonction de la valeur saisie dans une ComboBox.
Peut-on écrire : Sheets(Combobox1.Value).select ?
Sachant bien sûr que j'ai paramétré la CBx pour qu'elle affiche les noms des feuilles existantes du classeur.

Cordialement

Paf · 20 Mai 2019

Bonjour,

Pour la deuxième question, le plus simple est d'essayer !!

Pour la première , l'utilisation de Select Case semble bien indiquée:

VB:

Select Case CBx1.Value
Case "A", "B", "C"
   CBX2.AddItem Range("XXX").value
Case "D", "E", "F"
   CBX2.AddItem Range("YYY").value
.../...
End Select

A+

mvcs · 22 Mai 2019

Bonsoir Paf,
Pour la première, je ne connaissais pas Select Case et ça me convient bien
Pour la deuxième, effectivement, j'ai essayé et ça marche … c'était tout simple.
Merci du coup de main.

XL 2013 Test conditionnel sur ComboBox

mvcs

XLDnaute Nouveau

Paf

XLDnaute Barbatruc

mvcs

XLDnaute Nouveau

Discussions similaires