J'ai un souci, je charge dans un tableau les données d'un fichier excel de la manière suivante :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
For i = 2 To nblignes
   For j = 1 To nbcolonnes
      tablodata(x) = tablodata(x) & feuille.Cells(i, j).value
         If (j < nbcolonnes) Then
            tablodata(x) = tablodata(x) & ","
         EndIf
   Next
   x += 1
Next
Je mets les valeurs d'une meme ligne dans la meme case du tableau avec une virgule entre chaque données

Cependant, la lecture d'un fichier de 10K lignes prend 5 bonnes minutes, alors qu'il ne met meme pas 20 sec pour charger un fichier csv. Meme si je sais que je n'arriverai jamais a ce genre de performance, quelqu'un sait il s'il est possible d'accélerer l'acces aux données d'un fichier *.xls ??

Merci,