If you actually want to replace the formula with values as JulieD describes

Sub ReplaceWithValues()
selection.Copy
selection.PasteSpecial xlValues
End Sub

--
Regards,
Tom Ogilvy


"JulieD" wrote in message
...
Hi

just wondering why you need a macro for this, as copy then edit / paste
special - values works well in most situations.

--
Cheers
JulieD
check out www.hcts.net.au/tipsandtricks.htm
...well i'm working on it anyway
"moshe" wrote in message
om...
I dont want to see formula at selection area , only values
need macro to do so.