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
Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!