Bonsoir pgz,
j'avais testé mon code (copié sur le tien) et il fonctionnait, il supprimait les formules de calcul comme demandé.
maintenant si ton code est plus aguerri, je pense que jerem1 devrait tout de meme le rendre plus efficace en adaptant cette variable
Bonne nuitCode:nbl = .Range("a" & .Rows.Count).End(xlUp).Row
