Discussion :

[vieuxmonsieur]

Bonour,
pouvez-vous me dire ce que va faire ce code svp

Code :

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

1
2
     .Range("A" & Me.ComboBox1.ListIndex + 2) = ComboBox1
     .Range("B" & Me.ComboBox1.ListIndex + 2) = TextBox1

En vous remerciant

[Philippe Tulliez]

Bonjour,
La ligne ci-dessous renvoie le n° de ligne de la ComboBox sur laquelle on a cliqué (l'index commence à 0)

Code :

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

Me.ComboBox1.ListIndex

Donc si l'on a cliqué sur la première ligne

Code :

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

Me.ComboBox1.ListIndex + 2

va donner 2
donc ce code

Code :

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

1
2
.Range("A" & Me.ComboBox1.ListIndex + 2) = ComboBox1
.Range("B" & Me.ComboBox1.ListIndex + 2) = TextBox1

Va écrire dans la cellule A2 la valeur du ComboBox1 et dans la cellule B2 la valeur de TextBox1
La valeur de ComboBox1 qui est renvoyée dépend de la propriété BoundColumn de ComboBox1 qui par défaut est à 1.

[vieuxmonsieur]

Bonjour Corona et merci de me répondre
Donc si je comprends bien

Code :

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

1
2
.Range("A" & Me.ComoBox1.ListIndex + 3) = TextBox2
.Range("B" & Me.ComoBox1 .ListIndex + 3) = TextBox3

Va écrire dans la cellule A3 la valeur du TextBox2 et dans la cellule B3 la valeur de TextBox3
Je suis un peu dur à comprendre parfois

[Philippe Tulliez]

Bonjour,
Non pas vraiment.
ListIndex est une propriété des Contrôles ComboBox et ListBox mais pas de TextBox.

[vieuxmonsieur]

excuse-moi, j'étais en train de modifier ma demande