Notifications
Clear all

Fórmula texto

6 Posts
4 Usuários
0 Reactions
1,515 Visualizações
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Senhores bom dia à todos.
Por gentileza, gostaria, se possível de mais uma ajuda dos senhores.
Utilizo o Excel 97/2003. Queria saber dos senhores se existe alguma função, não personalizada e sim do Excel para que me trouxesse a fórmula digitada em uma determinada célula.
Exemplo
Digito em (a1) a seguinte fórmula. =56*9.
E, na célula (b1) com a função em questão traria exatamente o que está escrito na célula (a1)
É como disse antes. Não função personalizada e sim uma função própria para o 97/2003.
Se um dos senhores puder me ajudar fico imensamente grato.
Agradeço a todos.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 05/04/2017 8:46 pm
tfcastro
(@tfcastro)
Posts: 131
Estimable Member
 

coloca entre aspas "=56*9."

Resposta útil? Clique na mãozinha ao lado do botão Citar.

 
Postado : 05/04/2017 9:20 pm
Syrax
(@syrax)
Posts: 160
Estimable Member
 

PAYZZANNO,

Tem uma função do Excel chamada "FÓRMULATEXTO"

=FÓRMULATEXTO(A1)

Se isso te ajudou, clique no "joinha" ao lado de citar

Se essa resposta te ajudou e resolveu o seu problema, clique no "joinha" ao lado de citar, e não esqueça de colocar o tópico como resolvido, clicando no ✓

 
Postado : 05/04/2017 10:07 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Tem uma função do Excel chamada "FÓRMULATEXTO"

Essa função é nova e não funciona no Excel 97/2003, conforme ele especificou.

[]s

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 06/04/2017 6:20 am
EdsonBR
(@edsonbr)
Posts: 1057
Noble Member
 

Bom dia, Payzzanno.

Queria saber dos senhores se existe alguma função, não personalizada e sim do Excel

Como bem observou o Patropi, pelo fato de seu Excel ser mais antigo a função FórmulaTexto não está disponível.
Se fosse através de uma UDF seria bem simples, algo como:

Function udfFórmula(Célula As Range) As String
   udfFórmula = IIf(Célula(1).HasFormula, Célula(1).FormulaLocal, "")
End Function

aí seria só inserir a função como uma fórmula normal, como vc bem sabe: =udfFórmula(A1)

Mas como vc não quer apelar para funções personalizadas no VBA, outra alternativa seria criar uma função do Excel 4.0 nomeada. Uma das principais desvantagens é que de qualquer forma será necessário salvar sua pasta como .xlsm ou .xlsb, fato que torna a versão em VBA mais atraente do que esta.

Para fazer por fórmula nomeada, supondo que em A1 esteja a fórmula que vc deseja extrair o texto e em B1 o destino, sendo B1 a célula ativa, ficaria algo como:

  • Na guia Fórmulas, grupo Nomes Definidos, Definir Nome[/*:m:2nrnr9b6]
  • No campo Nome, dê um nome para sua função, digamos Fórmula[/*:m:2nrnr9b6]
  • No campo Refere-se a, insira:
  • =INFO.CÉL(6;A1)
    assim estaria pronta sua "Fórmula"[/*:m:2nrnr9b6]

  • Agora em B1, seria só inserir
  • = Fórmula[/*:m:2nrnr9b6][/list:u:2nrnr9b6]

    Obs.: Logicamente vc pode incrementar sua INFO.CÉL usando referências relativas LC e/ou tornar o segundo parâmetro mais flexível usando DESLOC/INDIRETO, etc.

     
Postado : 06/04/2017 8:15 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
Topic starter
 

Senhores, bom dia à todos.
Gostaria de agradecer por vossa ajuda.
Uma vez não tendo solução para o problema em questão, só me resta aplicar, então, o vba como sugerido pelo colega EdsonBR.
De fato conheço a função nativa "Fórmulatexto", na versão mais recente do Excel, proposta pelo colega Syrax. Porém, como disse antes, tinha esperança que, de alguma forma, houvesse meios de buscar tal resultado no 97/2003. Embora, os recursos do Excel mais recentes sejam maiores, onde trabalho ainda usa se o mais antigo.
Patropi, obrigado por a ti também pela gentileza.

Fica aqui o meu agradecimento a todos.
Um forte abraço.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 08/04/2017 6:11 am