indsæt tegn

en lidt bøvlet metode:

I en ny kolonne skriver du:
="="&A1
Hvor A1 angiver den første celle, der har en formel.
kopier formlen ned
Marker alle cellerne i den nye kolonne, og kopier
Vælg indsæt speciel, og sæt et hak i værdier

Nu laver du en søg og erstat på =, som skal erstattes med =

Så skulle det gerne være i orden.

Hvis formlerne står i et bestemt område i arket, og dette kun indeholder formler, kan du køre denne makro. Ret Range til det område du har formler i:
 
Sub SætLig()
  For Each c In ActiveSheet.Range("c1:c6").Cells
    c.Formula = "=" & c.Value
  Next c
End Sub

Du er nu hurtig alligevel jkrons, men min er lidt bedre

Sub test_a()
Dim c As Range
For Each c In Selection
    If Not IsEmpty(c) Then c.Formula = "=" & c.Value
Next
End Sub

Glemte lige at skrive at du først markerer område der skal have lavet formler og så kører makroen. den bruger kun det markerede område

bak-> Men de lider begge af den skavank, at formlerne helst skal stå nogenlunde samlet :-)