O seguinte UDF retornará as fórmulas para uma determinada referência de célula:
Função VBA para mostrar a fórmula da célula
| 123 | Função Show_Cell_Formulae (Cell As Range) As StringShow_Cell_Formulae = "Cell" & Cell.Address & "tem as fórmulas:" & Cell.Formula & "'"Função Final |
Então, se tivermos:
Onde a célula B7 tem as fórmulas: ‘= MAX (B5: G5), então podemos digitar em outra célula:
B9 = Show_Cell_Formulae (b7)
E obtemos uma string de texto com a referência da célula e as fórmulas contidas nela.
Para baixar o arquivo .XLSM deste artigo, clique aqui
