View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
Greek77 Greek77 is offline
external usenet poster
 
Posts: 2
Default adding a formula around a cell reference

GREAT! This simple macro saved me hours of tedious work!!
Thanks

"Gary''s Student" wrote:

Try this simple macro:

Sub transformer()
' more than meets the eye
For Each r In Selection
s1 = r.Formula
s2 = Right(s1, Len(s1) - 1)
r.Formula = "=ROUND(" & s2 & ",3)"
Next
End Sub

Enter the macro, select the cells, run the macro.
--
Gary''s Student - gsnu200722