UDF: GetFormula()

No seguimento da publicação anterior, para podermos ver a fórmula que digitámos, em termos de exemplo, podemos utilizar a seguinte função UDF:

'---------------------------------------------------------------------------------------
' Procedure : GetFormula
' Author    : JRod
' Date      : 02/12/2013
' Purpose   : Fornece a fórmula da célula pretendida
'---------------------------------------------------------------------------------------
'
Public Function GetFormula(cell As Range) As String

    GetFormula = cell.Formula

End Function