Bonjour,
J'ai une listview dans le qu'elle j'affiche des données filtré. j'ai 9 colonne dans cette listview et je voudrais extraire l'intégralité des 9 colonnes et des X lignes dans un autre fichier Excel. C'est à dire que j'obtiendrais un autre fichier avec en feuille1 un tableau avec les même en-tête et même ligne que ce que ma listview affiche.
le listview s'appel LVResut
j'ai bien essayer de tenter cela :
Mais cela ne fonctionne pas ..
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Private Sub CommandButton1_Click() Dim WkNouveau As Workbook, ShNouveau As Worksheet Set WkNouveau = Workbooks.Add Set ShNouveau = WkNouveau.Sheets(1) ShNouveau.Name = "Base" With ShNouveau .Cells(1, 1).Resize(LVResult.ListCount, 1).Value = LVResult.Item.list End With End Sub
si cela pouvais l'enregistrer à un endroits précis et le fermer automatiquement cela serais formidable.
Cordialement,
Passepartout007
Partager