Exportation donnees listview vers excel

Version imprimable

24/05/2022, 11h49
trucss

Exportation donnees listview vers excel

Bonjour,
Avez vous un petit code pour exporter les données d'une listview vers excel.
Merci
24/05/2022, 12h23
ProgElecT

Salut

Un minimum de recherche dans se même forum:
Recherche: Type: Messages; Mots-clef(s): listview, excel; Forum: VB.NET, Livres et forums enfants
Un parmi 30 discussions trouvées:
Exporter une listView dans un fichier excel

Merci j'avais vu plusieurs exemple dans l'exemple que tu me montres j'ai une erreur sur le microsoft.office... n'est pas défini ?
C'est quoi ?

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
Public Sub subExporterExcel(ByVal lvw As ListView)
 
        Try
            Dim xla As New Microsoft.Office.Interop.Excel.Application()
            xla.Visible = True
 
            Dim wb As Microsoft.Office.Interop.Excel.Workbook = xla.Workbooks.Add(Microsoft.Office.Interop.Excel.XlSheetType.xlWorksheet)
            Dim ws As Microsoft.Office.Interop.Excel.Worksheet = DirectCast(xla.ActiveSheet, Microsoft.Office.Interop.Excel.Worksheet)
            Dim i As Integer = 1
            Dim j As Integer = 1
            Dim jj As Integer = lvw.Columns.Count
 
            For rr = 0 To lvw.Columns.Count - 1
                ws.Cells(i, j) = lvw.Columns(rr).Text
                j = j + 1
            Next
 
            i = 2
            j = 1
            For Each comp As ListViewItem In lvw.Items
                ws.Cells(i, j) = comp.Text.ToString()
                For Each drv As ListViewItem.ListViewSubItem In comp.SubItems
                    ws.Cells(i, j) = drv.Text.ToString()
                    j += 1
                    ws.Columns.AutoFit()
 
                Next
                j = 1
                i += 1
 
 
            Next
        Catch ex As Exception
 
        End Try
    End Sub

24/05/2022, 14h05
popo

Citation:

Envoyé par trucss

Merci j'avais vu plusieurs exemple dan sl'exemple que tu me montres j'ai une ereeur sur le microsoft.office... n'est pas défini ?
C'est quoi ?

Savoir ajouter une référence, c'est quand même la base !!!
Je te suggère vivement d'ouvrir un tutoriel sur l'outil et déjà, celui-ci :
https://docs.microsoft.com/fr-fr/vis...t?view=vs-2022
24/05/2022, 14h24
trucss

Citation:

Envoyé par popo

Savoir ajouter une référence, c'est quand même la base !!!
Je te suggère vivement d'ouvrir un tutoriel sur l'outil et déjà, celui-ci :
https://docs.microsoft.com/fr-fr/vis...t?view=vs-2022

Il y en a plusieurs microsoft office 16.0 object library ?

Aujourd'hui, 14h34 ....
Merci c'est bon j'ai trouvé
24/05/2022, 15h44
popo

Attention à la compatibilité.
Office 16 est compatible uniquement avec Office 2016 et supérieurs

Sinon
Office 15 => Office 2013 et supérieurs
Office 14 => Office 2010 et supérieurs
Office 12 => Office 2007 et supérieurs
En dessous, c'est beaucoup trop obsolète (ne gère pas le format XLSX).