Oui, j'ai fait un essai avec juste les xlsdonnees(). Le traitement se ralenti au fur et à mesure de son avancement.
Jean
patrice a exposé le 27/06/2008 :
as tu fait un essai en mettant en commentaire ce qui est symbolisé par "..."
?
(histoire d'etre sur que ca vient du xlsdonnee)
"Juanito" <jean.cougnaud@libertysurf.fr> a écrit dans le message de
news:mn.d3e97d86b78a21b1.68503@libertysurf.fr...
Romain PETIT a formulé ce jeudi :
Juanito a couché sur son écran :
Bonjour,
Bonjour,
Comment accélérer le traitement ?
Poste ton code...
A+
J'ai simplifié à l'extrème mon code pour mes essais et cela fait
quelque chose comme ça :
------------------------------------------------------------------------
GP_N_IdExcel=xlsOuvre(MonFichierExcel)
SI GP_N_IdExcel=-1 ALORS
Erreur("Impossible d'ouvrir le fichier Excel.")
RETOUR
FIN
N_NbLignes=xlsNbLigne(GP_N_IdExcel)
SI N_NbLignes=0 ALORS
Erreur("Il n'y a pas de ligne dans le fichier Excel")
xlsFerme(GP_N_IdExcel)
RETOUR
FIN
POUR N_I=2 A N_NbLignes
N_Identifiant=Val(xlsDonnée(GP_N_IdExcel,N_I,1))
S_Code=xlsDonnée(GP_N_IdExcel,N_I,3)
S_Nom=xlsDonnée(GP_N_IdExcel,N_I,55)
...
FIN
xlsFerme(GP_N_IdExcel)
-----------------------------------------------------------------------
Plus je récupère de valeurs dans le fichier Excel plus c'est lent (ce
qui est normal) mais plus j'avance dans les lignes plus c'est lent.
J'ai mis une jauge pour regarder et elle défile correctement au début
et plus elle avance plus elle ralentie.
Jean
