problème de transfert des données de la listbox dans un tableau
bonjour forum...
je salue au passage M. Philipe Tulet
Avant de commencer j'aimerais savoir la correspondance d'un tableau avec une listbox. les lignes correspondent-elles aux index ou aux éléments, et les colonnes? etc. ( malgré tous les cours que j'ai téléchargés mais toujours rien compris de ces termes).
Voici mon problème.
lors du transfert des données de la listbox vers le tableau sur la feuille, c'est la premiere colonne de la listbox qui est renseignée dans les 4 colonnes du tableau alors que j'ai fait une boucle sur les éléments de la listbox. le code ci-joint
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| Private Sub CommandButton2_Click()
Dim Xligne As Integer, i As Integer
With Sheets("Feuil1")
.ListObjects("Tableau1").ListRows.Add
Xligne = .Range("A" & Rows.Count).End(xlUp).Row
For i = 0 To ListBox1.ListCount - 1
.Range("A" & Xligne) = ListBox1.List(i)
.Range("b" & Xligne) = ListBox1.List(i)
.Range("c" & Xligne) = ListBox1.List(i)
.Range("d" & Xligne) = ListBox1.List(i)
Next i
End With
End Sub |
merci de m'aider
