Converter texto que contem fórmula em fórmula

Question

Criei uma fórmula. Depois usei a função FÓRMULATEXTO para edita-la, trocar algumas células. Preciso que esse texto editado vire fórmula que o Excel reconheça e execute.

Exemplo:

Em B6 digitei =Pi()/4*B2^2*B3

Em C6 digitei =FÓRMULATEXTO(B6)

Em D6 digitei =MUDAR(C6;LOCALIZAR("B2";C6);2;"C2") o que resultou =Pi()/4*C2^2*B3

Agora não sei fazer o Excel calcular essa fórmula. Tentei as funções VALOR, INDIRETO. Removi o sinal de igual e depois usei CONCATENAR... nada. Troquei PI() por 3,1415... nada. O retorno é o próprio texto ou #VALOR!

Agradeço qualquer ajuda.

Answer 1

Olá ProNorba,

Olhando o teu exemplo e criando uma situação similar, realmente o erro apresentado é o mesmo.

Pelo que eu pude notar, não existe uma função direta que observa o texto em uma célula e converte em uma função executável, porém existe em VBA Script. Para isso é necessário criar uma macro como função e tudo dá certo.

A macro seria a seguinte

Public Function eval(ByVal str As String) As Variant

  eval = Application.Evaluate(str)

End Function

Segue abaixo o resultado. O que deseja esta na C19 e segue mais outra variante na C22.

Todas usam =eval(endereço)

Só tem uma observação, a função texto só vale para o idioma inglês.

Este post resolveu o problema? Selecione (X) Sim para fechar o caso.

Assim não só motiva meu trabalho voluntário, como também serve como uma forma de agradecimento ao desafio dado.

Veja mais detalhes a respeito em

https://answers.microsoft.com/pt-br/feedback/forum/all/feedback-de-respostas/49fb806d-2c68-42b0-98c8-b549371f7e03

Abs

Answer 2

Obrigado pelo retorno.

Resolvi o problema com o VBA. Minha intenção inicial era resolver sem o VBA, mas acabou dando tudo certo. 

Att

Norba