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