Replace formula to text
Try this tiny UDF:
Function equation(r As Range) As String
equation = "'" & r.Formula
End Function
So if A1 contains
=1+2+3+4
it will display 10
If you enter =equation(A1) in another cell is will display
'=1+2+3+4
--
Gary''s Student - gsnu200771
"art" wrote:
Hello:
I would like to replace a formula to the actual text of the formula. Fo E.G.
if I have in a cell "=A1", and I want to copy the formula to cell A25, it
will copy it like this, "=A25", but I want it to copy exactly like the
formula, "=A1". So how can I replace the formula in a cell to the actual text
of the formula without using a formula. Hope I'm explaining myself well, If
not ask please I'll explaine myself more. I need help on this. Thanks.
|