Discussion :

[styliebeuf]

Voilà je dois faire une récupération de donner type tableau excel (*.xls) ou [au pire des cas un tableau type *.txt tabulé] dans VB6 avec une DATAGRID. J'ai rien compris à la datagrid et je vous demande un peu d'aide au moins pour me conduire sur la bonne voie. Merci de votre aide.

[SfJ5Rpw8]

si excel est présent sur le poste ou ton programme VB6 s'exécute, pour la lecture de ta feuille excel voir :
Utiliser Excel à partir de Visual Basic par Sébastien Curutchet

voir aussi :

Comment importer une feuille Excel dans une MSFlexGrid ?

[styliebeuf]

Merci beaucoup, voilà qui devrait m'aider.

[avigeilpro]

Sinon, si cela t'interesse, j'ai créé un contrôle permettant d'accéder à Excel, va voir sur mon site

[Paloma]

Pour traiter des données Excel, tout dépend de ces données, il est peut être plus intéressant d'utliser un fichier à plat type .csv avec un séparateur ";"

C'est plus rapide de lire ce fichier que d'ouvrir Excel et de lire le tableau.
Enfin, je crois ...

Exemple de code :

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
29
30
31
 
    ' lecture du fichier .csv pour passage vers disque local
    Dim L As String
    Dim i As Long
    Dim Datas() As String
    'anciens nom de fichiers
    Dim tableauNEW() As String
    'nouveaux nom de fichiers
    Dim tableauOLD() As String
    i = 0
    Open fichier.csv For Input As #1
 
      While Not EOF(1)
        Line Input #1, L
        Datas = Split(L, ";")
            'je fais ce que je veux ....
            'je fais ce que je veux ....
            'je fais ce que je veux ....
            'je fais ce que je veux ....
      Wend
    Close #1
 
            ' et je peux faire encore ce que je veux ....
            ' et je peux faire encore ce que je veux ....
            ' et je peux faire encore ce que je veux ....
            ' et je peux faire encore ce que je veux ....            
 
    Exit Sub
 
ErrorFile:
'...

Enfin, faut voir les besoins

@ plus
Cordialement,
Paloma