return formula in cell as string
 

Hi,

Is there a way to return the formula of a cell as a string in another cell?
--
Thanks for your help.
Karen53

return formula in cell as string
 

Hi Karen,

Dim strFormula As String

Range("A13").FormulaR1C1 = "=SUM(R[-12]C:R[-1]C)"

strFormula = Range("A13").Formula

Range("A14") = "'" & strFormula

--
Regards,

OssieMac


"Karen53" wrote:

Hi,

Is there a way to return the formula of a cell as a string in another cell?
--
Thanks for your help.
Karen53

return formula in cell as string
 

Thanks OssieMac
--
Thanks for your help.
Karen53


"OssieMac" wrote:

Hi Karen,

Dim strFormula As String

Range("A13").FormulaR1C1 = "=SUM(R[-12]C:R[-1]C)"

strFormula = Range("A13").Formula

Range("A14") = "'" & strFormula

--
Regards,

OssieMac


"Karen53" wrote:

Hi,

Is there a way to return the formula of a cell as a string in another cell?
--
Thanks for your help.
Karen53

return formula in cell as string
 

Activecell.Value = "'" & Range("C1").Formula

--
---
HTH

Bob


(there's no email, no snail mail, but somewhere should be gmail in my addy)



"Karen53" wrote in message
...
Hi,

Is there a way to return the formula of a cell as a string in another
cell?
--
Thanks for your help.
Karen53