Hello,
Quelqu'un sait-il si il est possible de créer une ComboBox dans laquelle les labels sont assignés a des valeurs ?
Ex :
Labels : Lundi, Mardi, Mercredi, ...
Valeurs : 1, 2, 3, ...
Merci de votre aide
Hello,
Quelqu'un sait-il si il est possible de créer une ComboBox dans laquelle les labels sont assignés a des valeurs ?
Ex :
Labels : Lundi, Mardi, Mercredi, ...
Valeurs : 1, 2, 3, ...
Merci de votre aide
Bonjour,
Par défaut, les valeurs dans une comboBox sont déjà numérotées.
La première valeur de la combobox est 0.
donc tu peux utiliser pour
Jour = maCombo.listindex
ImpressionPlanning (Jour)
Par exemple ^^
Je en connais pas ton contexte
Je ne comprend pas bien ta solution.
Voici mon code en exemple :
J'aimerais assigner la valeur 1 pour les 5 premiers jours et 0 pour le week-end
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Private Sub UserForm_Initialize() ComboBox1.List = Array("Lundi", "Mardi", "Mercredi","Jeudi", "Vendredi","Samedi","Dimanche) End Sub
dans quel but tu veux assigner ca? je pense avoir besoin de cette information pour voir dans quelle direction aller ^^
Après je veux récupérer la valeur de jour et colorer la cellule en vert si c'est la semaine ou en bleu si c'est le week-end.
Pour l'instant j'utilise un case en sortie mais j'aimerais savoir si il est possible de le faire directement ?
revois la synthaxe mais l'idée est la ^^
en gros Lundi est stocké en 0 sur la combo
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 If combobox.ListIndex < 5 Then combobox.colorback = "tacouleur" Else combobox.colorback = "autrecouleur" End If
et samedi en 5
donc si la valeur de la combo est inferieure à 5 tu mets la couleur que tu souhaites sinon une autre
utilises l'evenement Change
Partager