Como remover caracteres numéricos de células no Excel?
Suponha que você tenha uma planilha contendo muitas informações como "James987den", os dados contêm tanto caracteres alfabéticos quanto caracteres numéricos, e você deseja manter os caracteres alfabéticos e remover os caracteres numéricos de todos esses dados. Por exemplo, converter "James987den" para "Jamesden". Existem maneiras rápidas de lidar com isso?
Remover caracteres numéricos com código VBA
Remova rapidamente caracteres numéricos com o Kutools para Excel
 |  |  |
Remover caracteres numéricos com código VBA
Se você está familiarizado com o código VBA, pode usar este método seguindo as etapas abaixo:
1. Clique em "Desenvolvedor" > "Visual Basic" ou use os atalhos ("ALT" + "F11") no Excel para ativar a janela do Microsoft Visual Basic para aplicativos, e clique em "Inserir" > "Módulo".
2. Insira 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. Em seguida, clique no botão "Executar" para aplicar o código. Um diálogo aparecerá na tela, onde você poderá selecionar um intervalo para remover todos os caracteres numéricos. Veja a captura de tela:
5. Clique em "Ok" e todos os caracteres numéricos terão sido excluídos.
Remova rapidamente caracteres numéricos com o Kutools para Excel
A ferramenta "Excluir Caracteres" do "Kutools para Excel" é uma ferramenta poderosa para excluir vários tipos de caracteres.
"Kutools para Excel": com mais de 300 complementos úteis para o Excel, grátis para experimentar sem limitação por 30 dias. Obtenha agora
Passo 1. Selecione o intervalo com o qual deseja trabalhar.
Passo 2. Clique em "Kutools" > "Texto" > "Remover Caracteres", na caixa de diálogo, marque "Numérico", veja a captura de tela:
Passo 3. Clique em "Ok" ou "Aplicar" para excluir os caracteres numéricos nos intervalos.
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins