Discussion :

[sygale]

Comment faire pour lire un fichier, sans le lire ligne à ligne ??
La lecture ligne à ligne utilise ca

Code :

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

1
2
3
4
5
6
7
8
9
Dim intf As Integer
Dim strLigne As String
intf = FreeFile
Open "C:\rep\file.txt" For Input As #intf 
    While Not EOF(intf)
        Input #intf, strLigne
        Debug.Print strLigne
    Wend
    Close #intf

ou ca

Code :

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

1
2
3
4
5
6
7
8
9
Dim intf As Integer
Dim strLigne As String
intf = FreeFile
Open "C:\rep\file.txt" For Input As #intf 
    While Not EOF(intf)
        Line Input #intf, strLigne
        Debug.Print strLigne
    Wend
    Close #intf

Moi je souhaite mettre tout le contenu du fichier dans un varaible string les fichiers font au plus une 100 aines de lignes et une string peut faire 2Go !!

Ou sinon mettre une plus grand partie du fichier dans une string, par exemple découper le fichier en deux.

Merci d'avance