VBA - boucle pour chaque feuille... nb feuille

Résolu
Lamite -  
 Lamite -
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

  1. Lamite
     
    Précision : quand je lance la macro, la variable Feuil = nothing...
    Je ne comprend pas...
    0
    1. Lamite
       
      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