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