J'ai un souci, je charge dans un tableau les données d'un fichier excel de la manière suivante :
Je mets les valeurs d'une meme ligne dans la meme case du tableau avec une virgule entre chaque données
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
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,
Partager