Discussion :

[nitsua]

Bonjour au Forum.

Je m'amuse pour la première fois avec un Combobox. Je ne sais pas comment indiquer dans ma commande où débute ma Listindex si elle ne démarre pas en A1

Je me suis créé 3 colonnes de donnés. Soit en A, B et C. Chacune de ces colonnes possèdent 5 valeurs différentes. Le menu déroulant donne les options de la colonne A. Selon la sélection dans le menu, les valeurs de la colonne B et C correspondant à la colonne A, s'inscrivent automatiquement dans une cellule au côté du Combobox. Jusque là tout fonctionne bien.

      A       B       C
1   user1   cell1   email1
2   user2   cell2   email2
3   uder3   cell3   email3
etc.

Seulement voila. La commande Listindex semble prendre par défaut la cellule A1 comme point de départ. Et si cette liste devait commencer plutôt en B2, (ex: B2, C2 et D2 ) comment lui indiquer cette info ?

Le menu déroulant fonctionne avec la modification du ListFillRange = "B2:B6", mais ComboBox1.ListIndex reste accroché à "A1"

Il me manque une commande...

Merci de votre temps

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ' Localisation de la liste
    ComboBox1.ListFillRange = "B2:B6" 
End Sub
 
'*c'est ici que ça coince. Comment indiquer que la Listindex débute en B2 ?
Private Sub ComboBox1_Change()
 ' renvoie la valeur de la col C en D10
Range("D10").Value = Cells(ComboBox1.ListIndex + 1, 2) 
 ' renvoie la valeur de la col D en E10
Range("E10").Value = Cells(ComboBox1.ListIndex + 1, 3)
End Sub

[mercatog]

Bonsoir
ListIndex est l'index de l’élément sélectionné dans la combobox, le premier élément à l'index 0

Donc, ton code devrait être comme ceci

Code :

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

1
2
3
4
5
Private Sub ComboBox1_Change()
 
Range("D10").Value = Cells(ComboBox1.ListIndex + 2, 2)
Range("E10").Value = Cells(ComboBox1.ListIndex + 2, 3)
End Sub

[nitsua]

Bonsoir à tous

Je comprend que le 1er nombre signifie alors le # de la ligne et que le 2è nombre signifie le # de la colonne.
.ListIndex + 1, 1 = début de la liste en A1
.ListIndex + 1, 2 = début de la liste en B1
.ListIndex + 2, 2 = début de la liste en B2

Donc on ne peut pas modifier sa valeur de base. On ne peut que l'incrémenter.

Ok. Je retiens la leçon.

Merci pour ta rapidité.

Bon weekend