O simples sempre é belo.
Resolve uma multidão de necessidades. Se esta for a sua, apenas usufrua da solução e copie!
Extraia o primeiro nome de um nome completo ou mesmo a primeira palavra de uma frase.
Function DecompoeNomeEmDimensoes (s As String)Dim nArr() As String
's = "Ana Cláudia Maria"
Let nArr = Split (s, " ")
Debug.Print nArr (0) ' Ana
Debug.Print nArr (1) ' Cláudia
Debug.Print nArr (2) ' Santos
End Function
Conheça também estes outros códigos:
Série de Livros nut Project
Série DONUT PROJECT 2015
Clique aqui e nos contate via What's App para avaliarmos seus projetos
Nenhum comentário:
Postar um comentário