Export de valeur sur listview

Bonjour ,:D

Dans un listview je renvois les valeurs de la colonne A et la colonne D dans une autre feuille.
Je voudrais renvoyer uniquement la ligne selectionné. Je crois qu'il me faut un "selected" mais je ne sais pas ou le mettre dans mon code.
Si vous pouvez m'aider merci de me consacrer un peu de votre temps.
Je vous met le code

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub cmbExport_Click() ligne = 1 With Me.ListView1 For I = 1 To .ListItems.Count ligne = ligne + 1 Sheets("Impression").Cells(ligne, 1) = .ListItems(I) Sheets("Impression").Cells(ligne, 4) = .ListItems(I).ListSubItems(3) Next I End With End Sub

---

Je pensais que je pouvais, je crois faire avec ca mais la fin je ne sais pas.

Code:

---

1 2 3

Private Sub ListView1_DbClick() Dim valeurs As String valeurs = ListView1.ListItems.Item(ListView1.SelectedItem.Index).

---

Bonjour le forum,

J'ai trouvé la solution à mon probléme. Je voulais renvoyer 2 valeurs dans une

Code:

---

1 2 3 4 5 6 7 8 9 10 11

ligne selectionné sur un listview. Private Sub cmdexport_Click() With Me.ListView4 Sheets("Feuille1").Cells(5, 12) = .SelectedItem 'renvoi la valeur de la colonne 1 de la ligne selectionné dans la feuille1 ligne 5 colonne 12 Sheets("Feuille1").Cells(13, 1) = .SelectedItem.ListSubItems(5) 'renvoi la valeur de la colonne 6 de la ligne selectionné dans la feuille1 ligne 13 colonne 1 Unload Me 'ferme la formulaire End With End Sub

---