Como remover caracteres numéricos de células no Excel?
Imagine que tem uma folha de cálculo repleta de entradas como «James987den», nas quais os dados combinam letras e números, e pretende manter apenas os caracteres alfabéticos, eliminando todos os dígitos — por exemplo, transformar «James987den» em «Jamesden». Existem métodos rápidos para resolver isto?
Remover caracteres numéricos com código VBA
Remova rapidamente caracteres numéricos com Kutools para Excel
 |  |  |
Remover caracteres numéricos com código VBA
Se estiver familiarizado com o código VBA, pode utilizar este método seguindo os passos abaixo:
1. Clique em «Programador» > «Visual Basic» ou use o atalho «ALT» + «F11» no Excel para abrir a janela do Microsoft Visual Basic para Aplicações e, de seguida, selecione «Inserir» > «Módulo».
2. Introduza o seguinte código no módulo:
Sub RemoveNum()
'Updateby Extendoffice
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 "[0-9.]" Then
xStr = ""
Else
xStr = xTemp
End If
xOut = xOut & xStr
Next i
Rng.Value = xOut
Next
End Sub
4. Depois, clique no botão «Executar» para aplicar o código. Irá aparecer uma caixa de diálogo no ecrã, permitindo-lhe selecionar um intervalo para remover todos os caracteres numéricos. Veja a captura de ecrã:
5. Clique em «OK» e todos os caracteres numéricos serão removidos.
Remova rapidamente caracteres numéricos com Kutools para Excel
A ferramenta «Eliminar Caracteres» do «Kutools para Excel» é uma solução poderosa para remover diversos tipos de caracteres.
«Kutools para Excel»: com mais de 300 extras práticos para Excel, disponível gratuitamente para experimentar sem limitações durante 30 dias.Obtenha já
Passo 1. Selecione o intervalo com o qual pretende trabalhar.
Passo 2. Clique em «Kutools» > «Texto» > «Excluir Caracteres Específicos»; na caixa de diálogo, selecione a opção «Numérico». Veja a captura de ecrã:
Passo 3. Clique em «OK» ou «Aplicar» para remover os caracteres numéricos dos intervalos selecionados.
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