Application.ScreenUpdating = False If Cells(2, 7).FormulaR1C1 <> "=SUMIF(C[-6]:C[-3],RC[-6],C[-3])" Then Range(Cells(2, 7), Cells(60000, 7)).FormulaR1C1 = "=SUMIF(C[-6]:C[-3],RC[-6],C[-3])" End If Application.ScreenUpdating = True
c'est le même temps d'exécution
Je vois par contre celle d'éviter de recommencer à chaque fois
Le temps ne serait ainsi perdu que la toute première fois et pas les suivantes
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question