Funçao personalizada retorna a fórmula em determinada célula
Saberexcel - Dicas de Funções Personalizada

Essas funções retornam a Fórmula usada em determinada célula
a segunda retorna a função local, isto é na lingua pt_BR

Esta função retorna a célula usada em uma determinada célula
porém o código Cell.Formula, retorna a fórmula na língua inglesa.

Function Retorna_Formula(Cell As Range) As String
Retorna_Formula = Cell.Formula
End Function

Esta função retorna a célula usada em uma determinada célula
porém o código Cell.FormulaLocal, retorna a fórmula na pt_BR

Function Retorna_Formula_Local(Cell As Range) As String
Retorna_Formula_Local = Cell.FormulaLocal
End Function

Baixe o exemplo das funções Retorna_Formula
Excel formulas fp retorna formula usada na celula (22.42 kB 2010-12-08 17:17:09)