Salut,
J'ai reussi à remplir une liste d'un combobox1 ( la liste se trouver sur une plage de cellule, donc facile )
Mais maintenant je veux remplir un combobox2 mais selon le choix que je fais dans mon premier combobox1 ( la valeur selectrionné par l'utilisateur dans la liste deroulante )
Le combobox2 doit se remplir toujours avec une plage de cellule, mais cette fois sous condition, je m'explique :
Je dois parcour un ensemble de colonne, et je dois dire si la valeur selectionné dans combobox1 est égale à la valeur qu'on parcour dans UNE colonne, alors : on prend la valeur de la colonne d'a coté sur la même ligne et on l'ajoute dans la liste du combobox1
voici mon code( avec les nom changé ) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28 Private Sub comboboxListePrincipale_Change() combobox2_rchg.Clear combobox3.Clear combobox4.Clear Dim i As Long Dim j As Long Dim DernLigne As Long DernLigne = wksfd.Range("C1048576").End(xlUp).Row MsgBox DernLigne For i = 4 To DernLigne If wksfd.Cells(i, 8).Value = comboboxListePrincipale.Value Then If wksfd.Cells(i, 4).Value <> "" Then combobox2_rchg.AddItem wksfd.Cells(i, 4).Value ElseIf wksfd.Cells(i, 5).Value <> "" And wksfd.Cells(i, 6).Value <> "" Then combobox3.AddItem wksfd.Cells(i, 5).Value combobox4.AddItem wksfd.Cells(i, 6).Value End If End If Next i End Sub
Merci beaucoup !
PS : toutes les combobox sont rempli avec des nombres !
Partager