Good afternoon Johnny

There are a few ways of doing this. Try this:

Selection.Formula = Selection.Value

or this will also do the trick:

For Each UsrCell In Selection
UsrCell.Formula = UsrCell.Value
Next UsrCell

HTH

DominicB


--
dominicb
------------------------------------------------------------------------
dominicb's Profile: http://www.excelforum.com/member.php...o&userid=18932
View this thread: http://www.excelforum.com/showthread...hreadid=380876