VBA: how to replace formulas with their results ?

[cazdealer]

How could I write something in VBA that would replace selected range by their result (of their formulas)



For exemple;
I want to write this line


Range("A2:B100").Select


and then, replace each cells that contains a formula in that range by its results

 

[shg]

Range("A2:B100").Value = Range("A2:B100").Value

 

[cazdealer]

thanks