excel - How to convert the actual excel formula (not the result) to a text string

Question

I have been searching all over for a solution and I couldn't find one.

Let's say I type into cell A1: =if(A2>1,1,0)

Excel will interpret that and either return 1 or 0.

However, what I would like to do is literally convert that formula into the string: '=if(A2>1,1,0)'

If you press Ctrl+~ into Excel, you will see all the formulas. Basically what I want to do, in conclusion, is take all those formulas and make them strings.

(The purpose, if you care, is to compare these strings with another workbook to make sure I didn't delete anything)

score 12 · Accepted Answer

You can make a user defined function for this.

Put this code into a Module (not a worksheet code sheet, class, or form)

Function GetFormula(rng As range, Optional asR1C1 As Boolean = False) As String
    If asR1C1 Then
        getFormula = rng.FormulaR1C1
    Else
        getFormula = rng.Formula
    End If
End Function

and call it in your worksheet like so

=GetFormula(A1)

or if you want the results as R1C1

=GetFormula(A1,TRUE)

score 10 · Accepted Answer

10

Use the FORMULATEXT function. It's built into Excel.

于 2015-02-26T16:07:39.253 回答

score 2 · Accepted Answer

what I would like to do is literally convert that formula into the string: '=if(A2>1,1,0)'

Simply use the Formula Property of the cell, here is a code example:

Range("A1").Select
Dim strFormula As String
strFormula  = ActiveCell.Formula
MsgBox (strFormula)

score 1 · Accepted Answer

You can also replace the equal sign with blank using find and replace. In effect removing the equal sign and leaving only the text of the formula as a string.

score 0 · Accepted Answer

Just follow this way.

Select the range (contain formula) you want to convert to text, also you can select All range on your sheet.
Use Find and Replace command by pressing Control-F then replace "=" with "^" press replace All.. All done....
If you want to use it again as formula... Just use Find and Replace, then replace "^" with "=" just look....All formula in text format converted to formula...

score -2 · Accepted Answer

Just right-click on the column header (i.e. A) and select "Format Cells" then under the "Number" tab select "Text". Then at each cell press enter and the formula will be displayed instead of the result.

excel - How to convert the actual excel formula (not the result) to a text string

6 回答 6

Related

Reference