Cette macro transforme toutes les cellules contenant des formules en cellules contenant des valeurs. Notez que cela signifie que toutes les formules seront supprimées. Il s’agit d’un besoin courant lors de la copie de tableaux lorsque nous n’avons besoin que des résultats d’un calcul et pas de formules ou de formatage individuel.

Pour changer toutes les formules en valeurs :

1. Appuyez sur <Alt+F11>.
2. Dans le menu Insertion, cliquez sur Module.
3. Tapez la macro suivante :

Sub ChangeToValue()

Dim rng As Range

With ActiveSheet

 For Each rng In .UsedRange

  rng.Value = rng.Value

Next rng

End With

End Sub

REMARQUE Pour démarrer la macro à partir de Visual Basic Editor, cliquez n’importe où dans le code de la macro et appuyez sur <F5>.