Notifications
Clear all

Como extrair apenas o Ano do texto

13 Posts
3 Usuários
1 Reactions
1,770 Visualizações
(@jcgmcs)
Posts: 69
Estimable Member
Topic starter
 

Olá boa tde!

Ajuda pra uma formula ou VBA que extraia do texto apenas o Ano e a cole em outra celula.

Exemplo:

Origem: "R5"

Texto: ATIVO AGO/20+

Destino: AI

Colar ano 2020 em "AI5"

OBs: Tenho esta fórmula abaixo em "AI5" mas não colando apenas o Ano.

=SE(R5="";"";(MAIÚSCULA(TEXTO(R5;"aaaa"))))

Obg.

Att, Carlos

 

 

 
Postado : 02/03/2021 1:01 pm
EdsonBR
(@edsonbr)
Posts: 1057
Noble Member
 

Boa tarde, @jcgmcs

 

Mas sempre vai ser a palavra "ATIVO", um espaço em branco, mês com três letras, barra, ano com 2 dígitos e o sinal de adição?

De qualquer forma, vou supor que a data comece logo após o espaço em branco. Teste a seguinte fórmula:

=ANO(1&EXT.TEXTO(R5;LOCALIZAR(" ";R5)+1;6))

Se houver outras situações ou exemplos diferentes, dê mais exemplos.

Melhor seria se vc tivesse anexado um arquivo Excel aqui com todas as possibilidades.

 
Postado : 02/03/2021 1:33 pm
(@jcgmcs)
Posts: 69
Estimable Member
Topic starter
 

Olá Edson, boa tde...

Então preciso somente do ano msm de 4 dígitos, sem o ATIVO.. Mês.. Barra.. e o sinal de +

Só 2020 na celula destino ok..

Este post foi modificado 4 anos atrás por jcgmcs
 
Postado : 02/03/2021 1:57 pm
EdsonBR
(@edsonbr)
Posts: 1057
Noble Member
 

Testou a fórmula?

 
Postado : 02/03/2021 3:28 pm
(@jcgmcs)
Posts: 69
Estimable Member
Topic starter
 

Edson testei sua formula inserindo em "AB5" e não funcionou... Qdo teclo Enter é exibido "13/07/1905" e nada mais...

 
Postado : 02/03/2021 5:52 pm
(@teleguiado)
Posts: 142
Estimable Member
 

@jcgmcs

A célula esta formata como Data? Aqui apareceu a mesma coisa quando a célula esta formatada como Data, caso esteja formatada como Texto, número ou Geral aparece somente o ano.

 

Obrigado.

Teleguiado.
E-mail: [email protected]

 
Postado : 02/03/2021 6:06 pm
(@jcgmcs)
Posts: 69
Estimable Member
Topic starter
 

Sim verifiquei isso tbém e estava como DATA. Tentei mudar as opções e nada mudou...

 
Postado : 02/03/2021 6:21 pm
EdsonBR
(@edsonbr)
Posts: 1057
Noble Member
 

Veja que a fórmula retorna os algarismos do ano e não uma data (são conceitos diferentes). Portanto a célula não deve estar formatada como Data e sim como Geral ou número (sem decimais, obviamente).

 
Postado por: @jcgmcs

...e não funcionou... Qdo teclo Enter é exibido "13/07/1905"

Na verdade funcionou sim. É a exibição (formato de saída) que tem que ser corrigido. Vejamos o porquê: O Excel entende datas como o número de dias que se passaram desde 00 de Janeiro de 1900, portanto o dia 13/07/1905 equivale a 2021 dias após o dia 00/01/1900. Por esse motivo é que o formato da célula não deve ser data, pois vc não quer uma data e sim o ano dela.

Na verdade grande parte dessa discussão poderia ter sido resumida se o arquivo Excel estivesse anexado aqui, como sempre se espera... 😉 👍 

 

 
Postado : 03/03/2021 12:51 am
teleguiado reacted
(@jcgmcs)
Posts: 69
Estimable Member
Topic starter
 

Edson boa noite!!

De volta ao tópico... Rsrs

Vc tinha razão na formatação da celula... rss

Bem, o caso éq agora surgiu uma nova necessidade sobre isso: Texto: ATIVO AGO/20+

Eu preciso do Mês e Ano em "AI5"

Podem me ajudar por favor...?

Obg..

 
Postado : 25/05/2021 10:17 pm
EdsonBR
(@edsonbr)
Posts: 1057
Noble Member
 

@jcgmcs, boa noite!

Dá pra usar a mesma fórmula que te passei, com exceção da função ano:

=EXT.TEXTO(R5;LOCALIZAR(" ";R5)+1;6)  Se quiser como Texto

=1*EXT.TEXTO(R5;LOCALIZAR(" ";R5)+1;6)  Se quiser como Data Serial. Nesse caso, formate a célula como Data com formato válido, digamos "ddd/aa"

 
Postado : 25/05/2021 10:42 pm
(@jcgmcs)
Posts: 69
Estimable Member
Topic starter
 

Isso msm q preciso.. Rss

Mas um porém... nas celulas origem que estão vazias, o destino está preenchendo com isso: #VALOR!

É possível corrigir deixando-as vazias e as preenchidas em MAIÚSCULAS tipo assim "AGO/20"...?

Este post foi modificado 4 anos atrás por jcgmcs
 
Postado : 25/05/2021 10:59 pm
EdsonBR
(@edsonbr)
Posts: 1057
Noble Member
 

Maiúscula só considerando a primeira fórmula, ou seja, o retorno será do tipo Texto, pois infelizmente não há formatação do tipo Data/Hora no Excel que retornem o resultado com variações personalizadas maiúsculas/minúsculas.

Essa é uma conhecida limitação do Excel cuja correção está em votação no agora agonizante UserVoice do Excel pra ser mudado, mas que ainda não obteve votação mínima suficiente para atrair a atenção do time do Excel: Excel UserVoice>Excel for Windows>Case Sensitive Date Format Rules

=SEERRO(MAIÚSCULA(EXT.TEXTO(R5;LOCALIZAR(" ";R5)+1;6));"")

 
Postado : 26/05/2021 8:52 am
(@jcgmcs)
Posts: 69
Estimable Member
Topic starter
 

Bom dia Edson!

Muito obg amigo.. Parece q ficou perfeito, vou testar no decorrer do dia... Abç..

 
Postado : 26/05/2021 9:22 am