Discussion :

[Bass_77139]

Bonjour,

Voilà, j' aimerais avoir des renseignements concernants le remplisage de plusieurs ListView avec des données Excel et les comparer.
Fichiers à utiliser :

- 1 Fichier Excel / 1 Feuille ( Fichier_Fournisseur.xlsx avec plusieurs colonnes )
- 1 Fichier Excel / 1 Feuille ( Fichier_Client.xlsx avec plusieurs colonnes )

Sur ma Form, je posséde :
- 2 boutons ( Ouvrir Fichier Fournisseur / Ouvrir Fichier Client )
- 3 ListViews ( ListView_Fournisseur / ListView_Client / ListView_Produits )

Voici mes problémes :

- Comment ouvrir mon fichier Excel ( Fournisseur ) afin de récupérer les données de 3colonnes ( ex : Colonnes : A D et E ) les afficher dans la ListView à 3 colonnes également.

- Faire de même pour le deuxiéme fichier Excel ( Client ) et ma deuxiéme ListView

Et comparer ces mêmes ListView dans ma 3éme ( Poduits ) de façon à n' avoir dans cette ListView que les données égales à 0 ( zéro ).

Exemple :

ListView_Fournisseur
Réf. : | Quantité : | Etat :
AAA | 15 | Disponible
BBB | 20 | Disponible
CCC | 0 | Non Disponible
DDD | 15 | Disponible
EEE | 0 | Non Disponible

ListView_Client
Réf.: | Quantité :
AAA | 25
BBB | 26
CCC | 5
DDD | 10
EEE | 3

Résultats souhaités dans la 3éme ListView
Réf.: | Quantité : | Etat :
CCC | 0 | Non disponible
EEE | 0 | Non Disponible

Voilà, j' ai essayer d' être le plus clair possible.
Merci de m' aider car j' ai beau avoir parcouru Google etc mais je n' ai pas trouvé grand chose qui corresponde ( j' ai même essayer les réponses anglaises de Google, c' est vous dire )

Merci encore de me mettre sur la voie

[Hiraa]

Salut Bass_77139,

Pour récupérer les données d'Excel, voici un lien qui doit te permettre de savoir comment exploiter un fichier Excel à partir de VB.NET : ouvrir un classeur, accéder à une feuille du classeur, lire les données dans les cellules, ...

Ensuite, pour remplir tes 3 listview (je pars du fait que tu sais comment gérer un listview), tu boucle sur ta première feuille Client :

tu mets chaque ligne dans la LV Client.
et si la ligne en cours contient une quantité à zéro, tu la mets dans LV Produits.

Tu fais la même chose pour ta feuille fournisseur (dans une deuxième boucle).

J'espère t'avoir donné une piste claire pour ta question.

N'hésites pas si tu as d'autres questions.

Bon courage

[Bass_77139]

Bonjour,

Merci de ton intérêt pour mon probléme.

Excuse moi mais je ne vois pas ton lien dans ta réponse.
Ensuite j' aurais voulu connaitre ton opinion sur ma façon à l' heure actuelle pour remplir mes ListViews via des fichiers :

Code :

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

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
Open_Fichier_Client.ShowDialog()
        Lbl_Emplacement_02.Text = Open_Fichier_Client.FileName
 
        Dim TAB(2) As String
        Dim LVI As New ListViewItem
        Dim sr As StreamReader
        Dim Ligne As String
 
        sr = New StreamReader(Lbl_Emplacement_02.Text)
        Ligne = ""
 
        Ligne = sr.ReadLine()
 
        While Not Ligne Is Nothing
 
            LVI = New ListViewItem
 
            TAB = Ligne.Split(";")
            LVI.Text = TAB(0).ToString
            LVI.SubItems.Add(1).Text = TAB(1).ToString
            LVI.SubItems.Add(2).Text = TAB(2).ToString
 
            List_Client.Items.Add(LVI)
            TAB = Nothing
 
            Ligne = sr.ReadLine()
        End While
        sr.Close()

Cela est le code que j' utilise et qui fonctionne mais je ne sais pas pourquoi mais je ne pense pas que ce soit la meilleure solution, en effet je trouve que ça rame pour le remplissage.

Ensuite ma réelle idée ( c' est comme ça que je vois la chose ) pour comparer les ListViews : Fournisseur et Client est :
- Je remplis ma ListView "Fournisseur" qui contient 3 colonnes ( Référence / Quantité / Etat )
- Je remplis ma ListView "Client" qui contient 1 ou 2 colonnes ( Référence / Quantité ( Quantité étant facultatif ))
- En cliquant sur un CommandButton, je lance la comparaison dans une 3éme ListView "Produits Non disponible"
C' est à dire que je compare les Références de la ListView "Client" avec les références de la ListView "Fournisseur" (sachant que celle-ci contient plus de référence que la "Client") quand une référence identique existe dans les 2 ListViews, on s' interresse alors à la quantité de cette référence du "Fournisseur", si la quantité fournie par "Fournisseur" est inférieure à 5 ou égale à 0, on rajoute la Référence en défaut ou qui va l' être dans la ListView "Produit".

Voila, encore merci pour ton intérêt.

[Hiraa]

J'ai oublié de mettre le lien, le voici :
http://support.microsoft.com/kb/302094

pour ton code je le trouve bon, je ne vois pas pourquoi ça rame !
cela pourrait dépendre de la volumétrie de ton fichier en entrée.

pour le remplissage de la 3ème listview, je n'ai pas bien assimilé le principe.
en fait, si j'ai bien compris, tu ne dois alimenter cette listview que par les références communes non disponibles. dans ce cas, la solution que tu as proposée est bonne.

Bon courage pour la suite.