Return a formula as text string to a cell

Hi - I would be really grateful if anybody knows a function to return the
formula contained in one cell to another cell as a text string?

Thanks
--
Sharon

Try this tiny UDF:


Function textit(r As Range) As String
textit = Chr(39) & r.Formula
End Function

If A1 has a formula, then =textit(A1) will display it
--
Gary''s Student


"Sharon" wrote:

> Hi - I would be really grateful if anybody knows a function to return the
> formula contained in one cell to another cell as a text string?
>
> Thanks
> --
> Sharon

Put this in a REGULAR code module and then just type =stringit(c4)

Function stringit(x)
stringit = x.Formula
End Function

--
Don Guillett
SalesAid Software
dguillett1@austin.rr.com
"Sharon" <Sharon@discussions.microsoft.com> wrote in message
news:7E357822-A076-46F2-9498-DB99010BD1F4@microsoft.com...
> Hi - I would be really grateful if anybody knows a function to return the
> formula contained in one cell to another cell as a text string?
>
> Thanks
> --
> Sharon

There is no such beast but you can roll your own


http://www.mvps.org/dmcritchie/excel/formula.htm

--

Regards,

Peo Sjoblom

http://nwexcelsolutions.com



"Sharon" <Sharon@discussions.microsoft.com> wrote in message
news:7E357822-A076-46F2-9498-DB99010BD1F4@microsoft.com...
> Hi - I would be really grateful if anybody knows a function to return the
> formula contained in one cell to another cell as a text string?
>
> Thanks
> --
> Sharon

Thanks to y'all!! Really hit the spot.
--
Sharon


"Peo Sjoblom" wrote:

> There is no such beast but you can roll your own
>
>
> http://www.mvps.org/dmcritchie/excel/formula.htm
>
> --
>
> Regards,
>
> Peo Sjoblom
>
> http://nwexcelsolutions.com
>
>
>
> "Sharon" <Sharon@discussions.microsoft.com> wrote in message
> news:7E357822-A076-46F2-9498-DB99010BD1F4@microsoft.com...
> > Hi - I would be really grateful if anybody knows a function to return the
> > formula contained in one cell to another cell as a text string?
> >
> > Thanks
> > --
> > Sharon
>
>
>