Discussion :

[couistelle]

Bonjour à tous !

Me revoilà avec une petite question (vba excel 2000)

Je ne sais pas si c'est possible donc je vous demande : est-il possible de déterminer les valeurs d'une combobox par rapport à la valeur de son Label.

Par exemple j'ai :
Label a 1
Label a 2
Label a 3
Label b 4
Label b 5

Quand j'ouvre mon formulaire en face du label a je voudrais une combo avec 1 2 et 3 et à la ligne en face de mon label b une autre combo avec 4 et 5

Est ce possible et si oui comment ?

Merci beaucoup !

Bon ça va pas faire avancer les choses grandement mais le code suivant ne marche pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub ComboBox1_Change()
With Range("b1:b65000")
    Set c = .Find(Label1.Caption, LookIn:=xlValues)
    If Not c Is Nothing Then
        ComboBox1 = c.Offset(0, 1).Value
    End If
End With
End Sub

[Pierre Fauconnier]

Bonsoir

Je n'ai pas compris l'exemple.

Combien de "label A" as-tu sur ton formulaire? Si tu en as plusieurs, en face duquel veux-tu ton combobox?

Plus généralement, que souhaites-tu réaliser? Merci d'expliquer, car il y a peut-être une solution plus simple que ce que tu souhaites mettre en place pour arriver à ce que tu souhaites réaliser...

Notamment, je me dis que, a priori, tu te trouves devant deux cas de figure:
1. Ton (tes) labels ont des textes fixés à la conception => tu peux donc déterminer facilement le contenu des combobox
2. Ton (tes) labels ont des textes fixés par programme => tu fixes alors la valeur des combo par programme...

[couistelle]

Bonsoir et merci de votre réponse,

Je vous joint un classeur qui j'espère vous aidera à mieux comprendre ce que je voudrais tenter de faire.

Dans l'exemple du classeur, je voudrais que dans le second userform qui s'ouvre (suite à la selection d'une famille dans la première combobox), la combobox en face de mon label critère 1 puisse etre remplie des valeurs correspondantes au critère 1 (dans la feuille excel)

J'espère qu'avec le classeur ça sera plus clair (car c'est vrai qu'en me relisant c'est pas toujours limpide)