Genskabe formler

Jeg har et tidligere spørgsmål, som jeg fik svar på.
http://www.eksperten.dk/spm/692033

Jeg har imidlertid det problem, hvad jeg åbenbart ikke så tidligere, at når jeg genskaber, så forsvinder formlerne og kun tallene kommer. (Ligesom paste special values)

Det er vigtigt, så 100 point.

Jeg har nu i vba følgende:

I Thisworkbook:
Private Sub Workbook_Open()
Formula = Sheets("sheet1").Range("a1:c500")
End Sub

I modul:
Option Explicit
Global Formula As Variant
Public Sub recover()
Sheets("sheet1").Range("a1:c500") = Formula
End Sub