VBA - boucle pour chaque feuille... nb feuille

Résolu/Fermé
Lamite - 7 avril 2014 à 11:46
 Lamite - 8 avril 2014 à 11:35
Bonjour

Dans une macro, je réalise une boucle sur chaque feuille de type :

Dim feuil As Worksheet
For Each feuil In ThisWorkbook.Worksheets
' remplace partout une formule par une autre...
Cells.Replace What:=formule_a_remplacer, Replacement:=remplace, LookAt:=xlPart
Next feuil

Mon problème : dans un classeur de 3 feuilles cela fonctionne à merveille.
Dans un classeur à plus de 10 feuilles cela pose problème...

Comment faire ?

1 réponse

Précision : quand je lance la macro, la variable Feuil = nothing...
Je ne comprend pas...
0
Solution :

Dim feuil As Worksheet
For Each feuil In ThisWorkbook.Worksheets
feuil.Activate
feuil.Cells.Replace What:=formule_a_remplacer, Replacement:=remplace
Next feuil
0