Bonjour,
Est-il possible que quelqu'un m'aide suite au problème suivant:

Je dispose d'une base de données de plus de 2000 records en Excel et pour chaque record je veux:
- supprimer une feuille Excel existante, après quoi
- j'en copie une feuille que je place dans le workbook "base" et que je nomme "init".


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
base.Worksheets("init").Delete
modvierges.Worksheets("feuille vierge").Copy after:=base.Worksheets("start")
base.Worksheets("feuille vierge").Name = "init"
Cependant, après la 800ème itération, environ, le code bloque et le message d'erreur suivant apparaît:

"COPY METHOD OF WORKSHEET CLASS FAILED"

Et je suis obligé de fermer tout Excel et relancer tout pour que cela fonctionne à nouveau...

Y-a-t il un moyen d'éviter le blocage du code?
Excel rencontre-t-il un problème de surcharge de mémoire temporaire ?

Grand merci aux débugueurs que vous êtes!

Frank