Sub makevalues()'Hilite the cells in D to change
For Each c In Selection
c.Offset(, -2).Value = c
Next c

End Sub

--
Don Guillett
SalesAid Software

"amirstal" wrote in message
ups.com...
I have this formula where cell D10=B10+C10.
I want to create a macro that once I run it, cell B10 takes the value
that is in cell D10 (while the above formula remains intact).
How can I do it?

Thanks.