Como remover caracteres não alfabéticos das células no Excel?
Por exemplo, tem um intervalo de dados como Jacob "001" @#$% e pretende remover todos os caracteres não alfabéticos da cadeia, deixando apenas Jacob. No Excel, como pode remover rapidamente todos os caracteres não alfabéticos das células?
Remover caracteres não alfabéticos das células com código VBA
Remover rapidamente caracteres não alfabéticos das células com Kutools para Excel
Remover caracteres não alfabéticos das células com código VBA
Com código VBA, pode remover caracteres não alfabéticos e manter apenas os caracteres alfabéticos (a-z)nas células, seguindo os passos abaixo:
1. Destaque o intervalo do qual pretende remover todos os caracteres não alfabéticos.
2. Clique em Programador > Visual Basic. Será apresentada uma nova janela do Microsoft Visual Basic para Aplicações. Clique em Inserir > Módulo e introduza o seguinte código no Módulo:
VBA: remover todos os caracteres não alfabéticos das células
Sub RemoveNotAlphas()
'Updateby2014128
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
xOut = ""
For i = 1 To Len(Rng.Value)
xTemp = Mid(Rng.Value, i, 1)
If xTemp Like "[a-z.]" Or xTemp Like "[A-Z.]" Then
xStr = xTemp
Else
xStr = ""
End If
xOut = xOut & xStr
Next i
Rng.Value = xOut
Next
End Sub3. Em seguida, clique no botão 
para executar o código. Será apresentada uma caixa de diálogo no ecrã, permitindo-lhe selecionar o intervalo do qual pretende remover todos os caracteres não alfabéticos. Veja a imagem:
4. Depois de clicar em OK, todos os caracteres não alfabéticos foram removidos. Veja a imagem:
 |  |  |
Remover rapidamente caracteres não alfabéticos das células com Kutools para Excel
Se não quiser remover todos os caracteres não alfabéticos utilizando uma macro VBA, poderá preferir usar a ferramenta Eliminar Caracteres do Kutools para Excel.
Kutools para Excel: com mais de 300 complementos práticos para Excel, experimente gratuitamente sem limitações durante 30 dias.Obtenha Agora
Após instalar o Kutools para Excel, pode remover facilmente e de forma conveniente todos os caracteres não alfabéticos de um intervalo de células.
1. Selecione o intervalo do qual deseja remover os caracteres não alfabéticos.
2. Clique em Kutools > Texto > Eliminar Caracteres.
Será apresentada a caixa de diálogo Eliminar Caracteres. Assinale a opção Caracteres não alfabéticos na caixa de diálogo Eliminar Caracteres. Entretanto, pode pré-visualizar o resultado no painel Pré-visualização. Veja a imagem:
4. Em seguida, clique em OK ou Aplicar. Todos os caracteres não alfabéticos serão removidos.
Esta utilidade permite também eliminar caracteres numéricos, não numéricos, não imprimíveis, entre outros. Para obter informações mais detalhadas sobre Eliminar Caracteres, consulte a descrição da funcionalidade Eliminar Caracteres.
Artigos relacionados:
- Remover caracteres alfabéticos das células
- Remover caracteres não numéricos das células
- Remover caracteres numéricos das células
- Remover caracteres não imprimíveis das células
- Remover rapidamente quebras de linha
- Remover caracteres não alfanuméricos
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos