Bonjour
Avec l'Editeur de Macro, tu sélectionnes ta plage A1:X20, tu fais un copier-collage spécial-Valeurs, tu sélectionnes une cellule au hasard, tu appuie sur Echapp et tu arrêtes l'enregistrement.
Cela doit donner cela:
Sub EffacerFormules()
Range("A1:X20").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A1").Select
Application.CutCopyMode = False
End Sub
Puis, tu crées un bouton auquel tu affectes ta macro.
Cordialement