Página 1 de 1
FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 18 Mar 2021 às 12:31
por Inovacao
Pessoal uma ajudinha por favor!!
Alguém conhece uma que pegue somente as inicias do nome e Sobrenome, exemplo:
Antônio Jeremias Calixto, INICIAIS = AJC
Obrigado!!
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 18 Mar 2021 às 13:01
por Kledison
@Inovacao
Tenta assim, supondo que o nome esteja em A1:
Código: Selecionar todos=SE(ÉERRO(ESQUERDA($A$1;1)&EXT.TEXTO($A$1;PROCURAR(" ";$A$1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1;PROCURAR(" ";
$A$1)+1)+1)+1)+1;1));SE(ÉERRO(ESQUERDA($A$1;1)&EXT.TEXTO($A$1;PROCURAR(" ";$A$1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1)+1;1));
SE(ÉERRO(ESQUERDA($A$1;1)&EXT.TEXTO($A$1;PROCURAR(" ";$A$1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1;1));
SE(ÉERRO(ESQUERDA($A$1;1)&EXT.TEXTO($A$1;PROCURAR(" ";$A$1)+1;1));
SE(ÉERRO(ESQUERDA($A$1;1));"";ESQUERDA($A$1;1));ESQUERDA($A$1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1)+1;1));ESQUERDA($A$1;1)&EXT.TEXTO($A$1;PROCURAR(" ";$A$1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1;1));
ESQUERDA($A$1;1)&EXT.TEXTO($A$1;PROCURAR(" ";$A$1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1)+1;1));ESQUERDA($A$1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1)+1;1)&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)+1)+1;1)
&EXT.TEXTO($A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1;PROCURAR(" ";$A$1)+1)
+1)+1)+1;1))
Att
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 18 Mar 2021 às 13:33
por Inovacao
Boa tarde, Kledison!!
Voce não conhece alguma fórmula que faça isto?
Obrigado!!
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 18 Mar 2021 às 13:39
por Kledison
@Inovacao
Essa que te enviei acima:
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 18 Mar 2021 às 13:43
por Inovacao
Eu achei essa muito grande achei que voce VBA, rs
Não tem uma menor?
Obrigado!!
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 18 Mar 2021 às 13:54
por Kledison
Tem sim:
Código: Selecionar todosFunction GetFirstLetters(rng As Range) As String
Dim arr
Dim I As Long
arr = VBA.Split(rng, " ")
If IsArray(arr) Then
For I = LBound(arr) To UBound(arr)
GetFirstLetters = GetFirstLetters & Left(arr(I), 1)
Next I
Else
GetFirstLetters = Left(arr, 1)
End If
End Function
cole a função acima em modulo, depois na célula que deseja a extração coloque:
lembrando que para o exemplo o texto está em A1.
Att
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 18 Mar 2021 às 15:53
por Inovacao
Certo, legal esse código.
Mas não teria como colocar somente uma fórmula simples direto na celular, sem módulo , sem código, sem vba?
Obrigado!!
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 19 Mar 2021 às 00:26
por AlbertoBraga
Boa noite
Considerando que o nome completo esteja na célula A1 e que primeiro nome e sobrenomes estejam separados por espaços.
A formula matricial abaixo deve resolver:
{=MAIÚSCULA(ESQUERDA(A1;1)&CONCAT(SE(EXT.TEXTO(A1;LIN(INDIRETO("2:"&NÚM.CARACT(A1)));1)=" ";EXT.TEXTO(A1;LIN(INDIRETO("2:"&NÚM.CARACT(A1)))+1;1);"")))}
Não digite as chaves {} tecle -> Ctrl+Shift+Enter -> formula matricial
É isso.
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 19 Mar 2021 às 10:02
por Deciog
AlbertoBraga, Bom Dia.
Muito boa logica gostei, aprendi mais uma
Abraços
Decio
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 19 Mar 2021 às 10:17
por Inovacao
Bom dia, AlbertoBraga!!
Grato pela ajuda!!
Mas deu o seguinte erro: #NOME?
Segue Planilha para melhor compreensão.
Obrigado!!
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 19 Mar 2021 às 10:29
por Inovacao
Boa tarde, Kledison!!
Fiz o teste com o segundo código mais curto, ele funcionou porem quando escreve exemplo:
Marcio de Santana Perez = MDSP, ou seja ele pegou o a letra D, tem como excluir essa letra D e deixar somente assim = MSP.
Obrigado!!
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 19 Mar 2021 às 11:36
por babdallas
Inovacao, a função CONCAT não tem em todas as versões do Excel. Provavelmente esse é o motivo de não ter funcionado para você.
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 19 Mar 2021 às 12:45
por Inovacao
Boa tarde, babdallas!!
Entendi, então só pode ser isto!!
Obrigado!!
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 19 Mar 2021 às 13:56
por AlbertoBraga
Boa tarde
Estou usando o Excel 365 versão 2102, o erro #NOME? como o babdallas disse pode ser a versão.
Fiz um ajuste na formula para que não tenha as iniciais das preposições de, da , etc. ou qualquer expressão de ligação desde que sejam escritas em letras minúsculas.
O nome e sobrenomes devem no mínimo terem as inicias maiúsculas.
{=ESQUERDA(A1;1)&CONCAT(SE(EXT.TEXTO(A1;LIN(INDIRETO("2:"&NÚM.CARACT(A1)));1)=" ";SE(CÓDIGO(EXT.TEXTO(A1;LIN(INDIRETO("2:"&NÚM.CARACT(A1)))+1;1))<91;EXT.TEXTO(A1;LIN(INDIRETO("2:"&NÚM.CARACT(A1)))+1;1);"");""))}
É isso
Re: FÓRMULA QUE PEGA APENAS AS INICIAIS DO NOME DO SOBRENOME
Enviado: 19 Mar 2021 às 14:28
por Inovacao
Boa tarde, AlbertoBraga!!
Ficou top, show, parabéns!!
Mas Infelizmente devido a minha versão não vou conseguir utilizar.
Mesmo assim meus agradecimentos, eu salvei essa relíquia de fórmula para quando eu atualizar de versão.
Haa voce sabe se essa fórmula funciona na versão 2016?
Abraço!!