Este fórum está sendo desativado

[lfgomes]

Olá... estou trabalhando em um sistema de criação de usuários e senhas para um projeto do qual eu faço parte. Gostaria da ajuda de vocês com uma fórmula que pretendo utilizar para agilizar a criação desses usuários.
É o seguinte: baseado no nome do usuário, preciso de uma fórmula que pegue as primeiras letras de cada nome e junte com o último sobrenome, ficando assim:
Adauto Marques Cardoso = amcardoso
ou
Flavio Henrique Ribeiro da Silva = fhrsilva
Lembrando que deve-se ignorar o uso de: "da", "de", "do", "das", "dos", "a", e "e" que seguem nos sobrenomes.
Espero ter sido claro no meu problema e agradeço toda a ajuda possível.

[laennder]

Criei uma função personalizada.

Código: Selecionar todos

Function GerarUsuario(nome) As String

nome = Split(nome, " ")

For i = 0 To (UBound(nome) - 1)
    If nome(i) <> "da" And _
       nome(i) <> "de" And _
       nome(i) <> "do" And _
       nome(i) <> "das" And _
       nome(i) <> "dos" And _
       nome(i) <> "a" And _
       nome(i) <> "e" Then
    
       usuario = usuario & Left(nome(i), 1)
       
    End If
    
Next i

usuario = usuario & nome(UBound(nome))

GerarUsuario = LCase(usuario)

End Function

Segue o arquivo em anexo

[lfgomes]

Laennder... você acertou em cheio no meu problema... funcionou 100%...

Muito obrigado pela ajuda...