Notifications
Clear all

Função - Separa Texto de número

9 Posts
3 Usuários
0 Reactions
1,735 Visualizações
(@aprendiz2050)
Posts: 68
Trusted Member
Topic starter
 

Boa tarde!

Gostaria de saber se alguem tem conhecimento de como separar o texto de um numero . Ex: na célula A1 temos o texto "Codigo26". Gostaria de se separar o texto do valor numérico, ficando na Célula b1 o resultado "Codigo 26" e assim sucessivamente conforme o caso.

A B
Cod 26 Cod 26
Cod445 Cod 445

Alguém poderia me ajudar

Grato!

Aprendiz2050

 
Postado : 02/11/2014 2:22 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!!

Tente assim

=SOMARPRODUTO(EXT.TEXTO(0&A1;MAIOR(ÍNDICE(ÉNÚM(--EXT.TEXTO(A1;LIN($1:$25);1))*LIN($1:$25);0);LIN($1:$25))+1;1)*10^LIN($1:$25)/10)

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

 
Postado : 02/11/2014 2:43 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

Se a sugestão do alexandre nao resolver, poste o modelo da planilha compactada.

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 02/11/2014 4:17 pm
(@aprendiz2050)
Posts: 68
Trusted Member
Topic starter
 

AlexandreVBA,

A formula me retornou o somente o número "26" na B1. O que eu gostaria é que ela retornasse "Codigo 26"

Segue em anexo uma planilha para demonstração da problemática.

o Excel é o 2013

Grato!

Aprendiz2050

 
Postado : 02/11/2014 7:22 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!

Tente assim

=MUDAR(A1;6;1;" ")

Obs: neste caso estou usando Office2013
Att

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

 
Postado : 02/11/2014 7:34 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa noite!!

Caso não tenha Office2013, tente...

=ESQUERDA(A2;6)&" "&DIREITA(A2;NÚM.CARACT(A2)-MÍNIMO(PROCURAR({0;1;2;3;4;5;6;7;8;9};A2&"0123456789"))+1)

Att

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

 
Postado : 02/11/2014 7:47 pm
(@aprendiz2050)
Posts: 68
Trusted Member
Topic starter
 

AlexandreVBA

usando a formula "=MUDAR(A1;6;1;" ")" ele some com a letra "o" e retorna o resultado:

A B
Codigo26 Codig 26
Codigo445 Codig 445
Codigo1122 Codig 1122

Usando a formula "=ESQUERDA(A2;6)&" "&DIREITA(A2;NÚM.CARACT(A2)-MÍNIMO(PROCURAR({0;1;2;3;4;5;6;7;8;9};A2&"0123456789"))+1)" ela retorna correto, mas o primeiro resultado que seria "Codigo 26" não aparece e
estes não aparecem de acordo com a linha, porque o resultado de Codigo1122 que deveria aparecer do lado "Codigo 1122"
da célula aparece em cima: "Codigo 1122".

A B
Codigo26 Codigo 445
Codigo445 Codigo 1122
Codigo1122

Acredito que com a função substituir ou ext.texto combinada com alguma outra possa ser feito de outra maneira

fiquem à vontade senhores!

Grato
Aprendiz2050

 
Postado : 03/11/2014 3:04 pm
(@gtsalikis)
Posts: 2373
Noble Member
 

Aprendiz,

Não ficou muito claro.

Se o texto for sempre o mesmo, digamos q todas as células comecem com "Codigo" e depois tenham texto, pode ser assim:

=SUBSTITUIR(A1;"Codigo";"Codigo ")

Agora, se o texto for variável, e os números também, vc pode usar essa matricial:

=ESQUERDA(A1;NÚM.CARACT(A1)-SOMA(SE(ÉNÚM(VALOR(EXT.TEXTO(A1;LIN(INDIRETO("A1:A"&NÚM.CARACT(A1)));1)));1;0)))&" "&DIREITA(A1;SOMA(SE(ÉNÚM(VALOR(EXT.TEXTO(A1;LIN(INDIRETO("A1:A"&NÚM.CARACT(A1)));1)));1;0)))

Como é matricial, vc não pdoe terminar com Enter, apenas, mas com Ctrl + Shift + Enter.

Se deu certo, a f´rmula vai ficar entre chaves {}

Abs

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 03/11/2014 3:34 pm
(@aprendiz2050)
Posts: 68
Trusted Member
Topic starter
 

gtsalikis

a fórmula matricial funcionou: mais uma vez obrigado!

Att

Aprendiz2050

 
Postado : 03/11/2014 7:51 pm