How to print formulas and their results on the same page?

[Ron de Bruin]

Do you copy the functions in a module in the same file or in your
personal.xls

 

[Dmitriy Kopnichev]

I placed this formula in B7 to see the formula in A7 on a new worksheet.

 

[Dmitriy Kopnichev]

What do you mean by module? I copy the functions to cells on a new
worksheet.

 

[Ron de Bruin]

Hi Dmitriy

Alt-F11
Insert>Module from the menubar
paste the functions in this module
Alt-Q to go back to Excel

Function ShowAllInfo(rng As Range)
' show Formula and Result from cell
ShowAllInfo = Right(rng.Formula, Len(rng.Formula) - 1) _
& " = " & rng.Value
End Function

Function ShowFormula(rng As Range)
ShowFormula = rng.Formula
End Function


In a worksheet cell you can use these formulas

=ShowAllInfo(A7)

Or

=Showformula(A7)