XL 2013 Test conditionnel sur ComboBox

mvcs

XLDnaute Nouveau
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

XLDnaute Barbatruc
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

XLDnaute Nouveau
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.
 

Discussions similaires


Haut Bas