Analyse de logs

[Tom]

Bonjour à tous!

Je suis débutant en VBA et grâce à ce forum, j'ai écrit une macro qui permet:
1- de concatener des fichiers de logs dans une feuille
2- d'analyser cette feuille

Malheureusement, j'ai beaucoup de los à analyser et ma requête utilise beaucoup de mémoire

Voici ma partie de code pour la récupération des données:

If VarType(CeFichier) = vbBoolean Then
            Exit Sub
      Else
            For k = 1 To UBound(Fichier)
                
                Open Fichier(k) For Input As #k
                      
                Do While Not EOF(k)
                   Line Input #k, TextLine
                   Sheets(1).Cells(Compt, c) = TextLine
              
                   Compt = Compt + 1
                   If Compt = 65537 Then
                     c = c + 1
                     Compt = 1
                   End If
                Loop
                
                Close #k
                                
            Next

    End If

Est-ce que vous ne voyez pas un moyen plus 'économique'?

Merci d'avance