[VBA-E] Fichier > 65536 lignes

Version imprimable

12/04/2007, 11h08
Scritch852

[VBA-E] Fichier > 65536 lignes

Salut, tout est dans le titre, je dois traiter un fichier de 80000lignes mais Excel ne veut pas me l'ouvrir, logique. Je pense donc passer par un traitement intermédiaire pour couper le fichier en 2, mais je ne sais pas si je peux faire ca depuis Excel, sans ouvrir le fichier, ou alors pas un programme en C ou autre pour le faire. SI qqun a déjà eu ce problème, merci de me donenr quelques pistes!
12/04/2007, 11h25
illight

Sinon tu peut utiliser Access :mrgreen:

Mais bon ça dépend tu traitement que tuv eux faire sur ton fichier :mrgreen:

La meilleure façon sinon est effectivemen de le couper en 2 ;)
12/04/2007, 11h56
Scritch852

Nan je n'ai pas Access + la flemme d'apprendre à l'utiliser. En revanche, je suis obligé d'utiliser un logiciel ext erne pour couper le fichier, c'est bien ca ? Excel ne peut pas traiter un fichier sans l'ouvrir ?
12/04/2007, 12h17
Invité

Bonjour Scritch852,

Quel est le type du fichier que vous voulez traiter.

Bonjour, si c un fichier de texte csv ou tsv, je suppose
tu peux utiliser cette fonction pr le parser

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
 
Function ParseFile(ByVal PathFile As String, Optional ByVal Sep As String) As Collection 'Parse le fichier et retourne une collection
    DoEvents
    Dim myCollec As New Collection
    Set ParseFile = myCollec
 
    Dim fso As New FileSystemObject
    Dim myFile As File, Ts As TextStream, Txt As String, Sp As Variant
 
    If Not fso.FileExists(PathFile) Then Exit Function
    Set myFile = fso.GetFile(PathFile)
    Set Ts = myFile.OpenAsTextStream(1)
    Do
        If Ts.AtEndOfStream Then Exit Do
        Txt = Ts.ReadLine
        If Sep <> "" Then
            Sp = Split(Txt, Sep)
        Else
            Sp = Txt
        End If
        myCollec.Add Sp
    Loop
    Set ParseFile = myCollec
End Function

le resultat est sauvegardé ds une collection
tu peux le parcourir pour l'afficher.
n'oubliez pas de préciser ton séparateur
good luck

12/04/2007, 12h22
Scritch852

Citation:

Envoyé par jacques_jean

Bonjour Scritch852,

Quel est le type du fichier que vous voulez traiter.

Il s'agit d'un fichier xls généré par un programme tiers, un fichier de 80000 lignes...
12/04/2007, 12h25
tangjuncn

c pas possible Monsieur,

si t'es pas en Excel2007, tu ne peux pas avoir + de 65536 lignes ds la même feuilles Excel
12/04/2007, 12h30
SfJ5Rpw8

Citation:

Envoyé par Scritch852

Il s'agit d'un fichier xls généré par un programme tiers, un fichier de 80000 lignes...

ce fichier est'il vraiment au format xls.. ou n'en as-t'il que l'extension...
12/04/2007, 12h32
Invité

Bonjour

Certains logiciels du commerces exportent lors données sous format Excel, et en général ils prennent la dernière version comme référence donc 2007.

Même si tu n'as pas le 2007 sur ton poste.

Starec
12/04/2007, 12h34
Scritch852

tangjuncn> s'agit il d'un code VB ou VBA car la syntaxe n'est pas reconnye chez moi...

bbil> Depuis mon application initiale, j'ai le choix d'extraire les données sous n'importe quel format que je veux (csv, xls, etc). Le format CSV est séparé par des tabulations et Excel sait l'ouvrir, le fichier XLS est formaté en HTML et Excel sait l'ouvrir aussi...
12/04/2007, 12h35
tangjuncn

il exporte des fichier .xlsx alors?
utiliser .xlsx avec Excel 2003 a-t-il des intéret?
12/04/2007, 12h38
SfJ5Rpw8

Citation:

Envoyé par Scritch852

...le fichier XLS est formaté en HTML et Excel sait l'ouvrir aussi...

:koi: un exemple ?
12/04/2007, 12h41
tangjuncn

ah, je pense que je vois, c du Excel sauvegardé as web page, c ça?

le syntax est en VBA
tu peux checker si ds ta reference, il n'y a pas un missing

Le fichier xls:
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 <html> <head> </head> <body> <table> <tr> <th> Ent </th> <th> Mneptf </th> <th> Portfolio Label </th> <th> Id Deal </th> <th> Mirror </th> <th> Type Deal </th> <th> Counterpart Mnemo </th> <th> Counterpart </th> <th> Security Mnemo </th> <th> Security Label </th> <th> Close </th> <th> Security Currency </th> [...]
Le fichier csv:
Code:

1 2 3 ENT MNEPTF LIBPTF MIR SG PEPFR ACT FR SLW [...]
Dans les 2 cas, le fichier obtenu lorsqu'on l'ouvre fait 80000 lignes, je pense donc le couper en 2 mais comment...:roll:

12/04/2007, 15h12
tangjuncn

ben, tu peux le parser avec la fonction en précisant que le séparateur est une tabulation, après, tu parcours la collection pour l'afficher, tu peux y arriver comme ça
12/04/2007, 15h20
Scritch852

Apparemment, petite rectificationn le seul fichier disponible est celui en HTML. Je pense que je vais donc utiliser OLE Internet Explorer pour pouvoir aller chercher les données au fur et à mesure, je pense que c'est le moyen le plus simple. Qqun aurait un tuto ??