Reading formulae in a different cell

[Guest]

If cell A1 contains a formula e.g. =Vlookup(50,RANGE,2)=99.45 say, how can I
reference or find the 3rd argument in the formula from another cell. When I
use any formula that references A1 it always uses the result of the formula
(99.45 here) and not the text of the formula ( =vlookup(50.RANGE,2) ).

Thanks

 

[Niek Otten]

Hi Albert,

You can use this User Defined Function (UDF):

Function ShowFormula(a As Range)
If Application.ReferenceStyle = xlR1C1 _
Then ShowFormula = a.FormulaR1C1 _
Else: ShowFormula = a.Formula
End Function


--
Kind regards,

Niek Otten

| If cell A1 contains a formula e.g. =Vlookup(50,RANGE,2)=99.45 say, how can I
| reference or find the 3rd argument in the formula from another cell. When I
| use any formula that references A1 it always uses the result of the formula
| (99.45 here) and not the text of the formula ( =vlookup(50.RANGE,2) ).
|
| Thanks
| --
|
| Albert

 

[Guest]

You could use a UDF to display the formula as a string and then parse the
string with MID(), LEFT(), etc.:

Function textofformula(r As Range) As String
textofformula = r.Formula
End Function



and use like =textofformula(A1)

 

[Guest]

Many thanks for your help.