ok, je suppose tu as dû planter à moment donné au milieu de la macro, ce qui fait que ton classeur est resté en calcul manuel (tu dois pouvoir le recalculer avec F9).
Repasse-le en automatique dans les options.
Si tu es toujours en calcul automatique et que tu ne veux pas que ça se reproduise, remplace à la fin :
Application.Calculation = xlCalculationAutomatic
par :
Application.Calculation = mlCalcStatus
eric