Excel Como fazer o Excel mostrar apenas os números de uma frase?

[Arthur Melo]

Por exemplo: zir.45,99mm.teste
Quero que apareça em cima ou qualquer lugar no excel apenas 45,99
Obrigado...

[f_neto]

 

[Arthur Melo]

@f_neto Não funciona, eu coloco a formula citada:
=SE(E(CÓDIGO(A2)>=48;CÓDIGO(A2)<=57);A2;"")
Coloquei no A1 no B1 etc... mas não consigo, estou usando Excel online normal...
Pode me ajudar?
Tenho D RED.FAC.1.00MM    
Quero que apareça apenas 1.00    
Eu agradeço...      

[Patropi]

Boa tarde @arthur234234

 

Cada caso é um caso, não existe uma formula genérica, por isso, anexe um arquivo Excel, com todas as probabilidades de como esse número pode aparecer no meio dos textos.

 

[]s

[Arthur Melo]

2 horas atrás, Patropi disse:

Boa tarde @arthur234234

 

Cada caso é um caso, não existe uma formula genérica, por isso, anexe um arquivo Excel, com todas as probabilidades de com de como esse número pode aparecer no meio dos textos.

 

[]s

Esse deu certo... mas não consegui filtrar por '.' sabe tipo eu quero Arthur23.23mm sds
23.23mm entendeu? 
Só aparece 2223 ;(
Obrigado...
 

Option Explicit

Function Separa(Text As String, opcao As Integer)

'Text = Texto a ser separado
'opcao = 1 para Números e 2 para Textos
'------------------------------------------------

Dim A As Integer 'Atribui a variável de repetição

Select Case opcao '- Verifica se é para extrair números ou texto

Case 1 'Números

    For A = 1 To Len(Text)
    
        If IsNumeric(Mid$(Text, A, 1)) Then  'se for numérico...
        
            Separa = Separa & Mid$(Text, A, 1)  'extrai o número para a função SEPARA
        
        End If
    
    Next

    Separa = CLng(Separa) 'Converte para long

Case 2 'Textos

    For A = 1 To Len(Text)
    
        If Not IsNumeric(Mid$(Text, A, 1)) Then 'se NÃO é numérico
        
            Separa = Separa & Mid$(Text, A, 1)
        
        End If

    Next

    Separa = Trim$(Separa) 'Elimina espaços desnecessários
    
End Select

End Function
 

[f_neto]

Tente formatar a célula criando uma máscara personalizada

xx.xx

[Arthur Melo]

@f_neto Eu não manjo nada... me ajuda?
Você me pouparia horas de trabalho se me ajudasse... 

Como fazer para aparecer o número e apenas o '.' apenas um... Arthur123.00mm.teste
Quero 123.00 Eu te agradeceria muito...

Estou aguardando... se for muito difícil separar, um '.' apenas já seria o suficiente para mim... Obrigado...

Outra solução mais fácil seria: uma planilha que eu jogasse e sempre aparecer 00.00 '4 números' Por que quando eu jogar 1.00 ele corrigi para 01.00 E quando eu jogar 00.00 ele não faz nada só mantem...

[Edson Luiz Branco]

O que o amigo @Patropi falou faz todo o sentido, porque quando se tem só um valor de exemplo, o foco passa a se resumir àquela situação somente. Então quanto mais recheado de amostras de valores que podem acontecer na prática, melhor.  Por exemplo, no primeiro post, o número era apenas separado por vírgula, já no segundo, o número estava separado por ponto... Outra pergunta que poderia surgir: o número pode ser negativo? Pode ocorrer mais de um número no mesmo texto? Se sim, extrair todos ou só o primeiro? O número poderia estar formatado com separador de milhar no formato americano ex. 3,000.00? E por aí vai... Se você contempla todo o universo de situações que podem ocorrer, facilita quem vai ajudar pois dá menos retrabalho, ok?

Uma maneira de extrair usando uma UDF poderia ser:

Dim rgx As Object
Public Function ExtraiNúm(txt As Variant) As Variant
  Application.Volatile True
  If rgx Is Nothing Then Set rgx = CreateObject("VBScript.Regexp")
  rgx.Global = False: rgx.Pattern = "-?\d+([,\.]\d+)?"
  If rgx.test(txt) Then ExtraiNúm = rgx.Execute(txt)(0)
End Function

Insira num módulo comum e use-a como uma função normal do Excel. Ex.: =ExtraiNúm(A1)

[Arthur Melo]

@Edson Luiz Branco Consegui solucionar a parte de separar os números de texto... agora preciso da ajuda de vocês para apenas fazer esse tipo de separação por exemplo... eu agradeceria muito...

Se eu tenho 12, 123, 1234

Eu quero jogar no Excel ou qualquer outro lugar e que me fique assim:

12,00
1,23
12,34

É só isso...
Não parece ser tão difícil, mas deve ser... 
Ou talvez não...

[Arthur Melo]

Post duplicado.

[deciog]

@arthur234234

 

Poste um modelo com o resultado pois se 12,  é texto é valor o que é, também para os outros valores

 

Está tudo numa célula texto ou esta em células separada, poste um modelo com mais exemplos

 

Porque 12, fica 12,00 e 123, fica 1,23  explica

 

Decio

 

 

 

[Edson Luiz Branco]

Isso tudo está numa mesma célula ou cada grupo de números está em uma célula diferente? Por qual motivo 12 não foi transformado em 0,12 como os outros números e sim em 12,00 (qual o critério)?

Anexar um arquivo Excel aqui mostrando o que deseja e como quer que fique com uma quantidade razoável de valores seria muito mais produtivo.

[Arthur Melo]

@deciog Olha... só preciso da formula na coluna A1 mesmo, são só números... para quando eu jogar 00, 000, 0000 ou
99, 999, 9999 na coluna A1 do Excel eu ter respectivamente: 

00,00

0,00
00,00

99,99
9,99
99,99 

É um de cada vez entendeu que eu vou jogar no A1 do Excel para ter o resultado que eu quero na ordem  entendeu...
Número de 0-9 seria...

Obrigado pelo retorno, espero ter conseguido explicar direito...

No A1 como está no A2 como eu quero...
Só que no lugar do '.' eu quero ','
Obrigado pela resposta...

CERTO.xlsx

[Arthur Melo]

Post duplicado

 

[deciog]

@arthur234234

 

É isso formula em amarelo

 

Link  https://www.sendspace.com/file/9jdpxy

 

Se foi útil clica no curtir,na mãozinha, é uma forma de agradecimento pela ajuda
 
Decio

[Arthur Melo]

@deciog Obrigado pela intenção... está quase lá, mas... eu quero digitar SOMENTE no A1 99 ou 999 ou 9999 e ele precisa entender o comando como:

99,99
9,99
99,99

Então ele sabe que quando é dois algarismo xx ele joga para xx,xx
Quando é 3 números xxx ele sabe que é x,xx
E quando é 4 números ele sabe que é xx,xx 

Então seria um comando só no A1 que faça esse reconhecimento e essa divisão... me ajudaria muito... obrigado

Eu não entendo nada do assunto...

 

[Edson Luiz Branco]

2 minutos atrás, arthur234234 disse:

..., mas... eu quero digitar...

Digitar? Mas você não extraiu esses valores através do código que postei mais acima? Ou você fez aquela extração de outra forma?

Isso que você deseja agora, de digitar o valor e logo após digitar, na mesma célula, sofrer essa alteração só é possível com o VBA.

E já que os dados estavam sendo extraídos daqueles textos, daria pra ajustar aquela mesma macro para fazer isso também, mas daí não seria ao digitar e sim na UDF.

[Arthur Melo]

@Edson Luiz Branco Me expressei mal, veja bem é simples e só tem 3 possíbilidades... é só isso que eu preciso... você manja?

Número 99 ou 999 ou 9999 eu copio de uma planilha no Excel e colo em outra Planilha na coluna A1 para os números ficarem do jeito que eu desejo... E na ordem que eu desejo...

99,99
9,99
99,99

Então ele sabe que quando é dois algarismo xx ele joga para xx,xx
Quando é 3 números xxx ele sabe que é x,xx
E quando é 4 números ele sabe que é xx,xx