IP - EX VBA 9-TratamentoTextosVBA pptx

Prévia do material em texto

SE TRANSFORME EM UM 
PROFISSIONAL DESEJADO POR 
CONSULTORIAS, EMPRESAS 
MULTINACIONAIS E STARTUPS!
2
Tratamento de textos
Juntamente com funções SE, os comandos LCase e UCase são muito 
utilizados em sistemas de busca e usuário & senha, por exemplo.
LCase()
Lower Case
Torna o valor do tipo texto (string) da 
célula escolhida no seu Range, em 
minúscula.
UCase()
Upper Case
Torna o valor do tipo texto (string), da 
célula escolhida no seu Range, em 
maiúscula
Caso haja necessidade de alterar parte de uma palavra, obter apenas seu 
início ou final:
LEFT()
Utilizada quando necessário um número 
de caracteres começando pelo lado 
EQUERDO da sua função. Basta inserir 
quantos caract. você precisa.
Range("A1").Value = "Zambinati"
funcao_left = left(Range("A1").Value = "Zambinati",5)
funcao_left retornará == "Zambi"
MID()
Utilizada quando se deseja um número 
de caracteres começando por um ponto 
definido e finalizando após a coleta de 
uma quantidade de caracteres de sua 
escolha.
Range("A1").Value = "Zambinati"
funcao_mid = mid(Range("A1").Value = "Zambinati",2, 
4)
funcao_mid retornará == "ambi"
RIGHT()
Utilizada quando se almeja um 
número de caracteres começando 
pelo lado DIREITO da sua função. 
Basta definir quantos caract. você 
deseja.
Range("A1").Value = "Zambinati"
funcao_right = 
right(Range("A1").Value="Zambinati",4)
funcao_right retornará == "Nati"
3
Localização de 1 caractere específico, geralmente algum:
 "especial" -> "@" "-"
inStr()
Start → É um número e este argumento é opcional. Este número define onde 
será o ponto de partida no texto. Se não colocar nada, ele iniciará da primeira 
letra. Colocaremos "1" no exemplo abaixo, mas é opcional:
String 1 → O texto que será feita a procura.
String 2 → Qual caractere é o alvo da busca: "@" ou "-"
Esta função retorna a posição do que se está buscado no texto, sendo 
possível combinar esta função com as descritas acima.
___________________________________________________________________________
Dim nome as String
Dim caractere as String
Dim funcao_inStr as Variant (or Integer, or Double, or Long, etc)
nome = "Zambinati@dinamicatreinamentos.com"
caractere = "@"
funcao_inStr = inStr(1, nome, @)
Msgbox funcao_inStr
____________________________________________________________
→ Aparecerá um Pop-up na tela com o valor: 10
___________________________________________________________________________
Obs.: há distinção de letra maiúscula e minúscula para esta função. 
Por exemplo: "Z" é diferente de "z” na procura.
4
TRIM()
Dim frase as String
frase = " Testando o código "
Msgbox Trim(frase)
____________________________________________________________
→ Aparecerá um Pop-up na tela com a frase : “Testando o código” sem os 
espaços inicial e final definidos quando declarou-se a variável “frase”. 
____________________________________________________________
Obs: Ltrim() e RTrim(), também retiram espaços extras, entretanto o primeiro 
retira espaços à esquerda e o segundo, à direita.
A função LEN() é utilizada para contar o número de caracteres 
presente, muito utilizado para validar CPF, telefone, entre outros.
LEN()
Dim nome as String
Dim funcao_len as Variant (or Integer, or Double, or Long, etc)
nome = "Zambinati@dinamicatreinamentos.com"
funcao_len = LEN(nome)
Msgbox funcao_len
____________________________________________________________
→ Aparecerá um Pop-up na tela com o valor: 34 
 (Para CPF tem que aparecer 11 - desconsiderando caracteres especiais)
A função TRIM() assemelha-se a função =ARRUMAR() do front do 
excel, fazendo a correção de todos os espaços adicionais que um 
cliente possa ter adicionado em um formulário de cadastro, por 
exemplo.