A Elaine pediu e aqui está uma função em VBA para tirar acentos das palavras, muito útil dependendo do serviço que cada um está acostumado a fazer não é? Primeiro abra o editor de Visual Basic, alt+F11.
Clique em Inserir > Módulo.
Cole o código abaixo:
Function Acento(caract)
codiA = "àáâãÀÁÂÃéèêëÉÈÊïîíôóõÕÔùúûç"
codiB = "aaaaAAAAeeeeEEEiiioooOOuuuc"
temp = caract
For i = 1 To Len(temp)
p = InStr(codiA, Mid(temp, i, 1))
If p > 0 Then Mid(temp, i, 1) = Mid(codiB, p, 1)
Next
Acento = temp
End Function
Feche o VBA e vamos testar!
Na célula A1 temos Maçã.
Na célula B1 irei colocar a seguinte fórmula =acento(a1).
Legal!!! Mas e agora? ficarei com duas colunas com o mesmo valor? Vamos ocultar a coluna A para que não haja nenhum problema então! Clique com o botão direito sobre a coluna A e selecione a opção Ocultar.
É isso.
sábado, 6 de fevereiro de 2010
Assinar:
Postar comentários (Atom)
Valeu tava procurando algo asiim
ResponderExcluirFinalmente encontrei a solução para os meus problemas rsrsr.
ResponderExcluirVlw.
VALEU \0/
ResponderExcluirOlá, tudo bem??
ResponderExcluirMuito legal a função, acontece que o meu deu certo com Maçã, mas não deu certo em casos com mais de uma palavra.
Ex: Carla Araújo
Você pode verificar para mim??
Obrigado
Obrigado, quebrou um galhão
ResponderExcluirQuase 3 anos depois de postada, essa função ainda ajuda algumas pessoas. Valeu!! Me poupará um trabalho do cão!!
ResponderExcluirDesculpa, gente ... Mas nao acho esse inseir>modulo de jeito nenhum
ResponderExcluirO meu é o Excel 2007
Aperta ALT + F11
ExcluirValeu! Funcionou perfeitamente.
ResponderExcluirta osso
ResponderExcluir