VBA. Correct formula in cell: replace cell references address and replace by its value.

Dear Comrades,
I have simple problem which can not solve ant that is why looking for advice.
With help of VBA I would like to modify formulas in my excel sheet where formula's references are exchanged by formula with values.
What I mean is:
Cell A1.value= 5
Cell B1.formula= 5*A1.value
Cell C1.value = 12
Cell B2.formula=$B$1+$A1/C$1

I need a code which can check range (let say A1:C2) and replace all formulas by values only. Like: Cell B1.formula=5*5, Cell B2.formula=5*5+5/12. It is important to keep formulas instead replacing by final results. Should not be like Cell B1.formula=25

Thanks in advance
Alex

PS
The formulas in cell are just example. I need a generic code which can replace any references by values including references to other workbook sheets. No external workbooks are foresee
n.