Skip to main content

Como remover apenas o texto de células que contêm números e texto no Excel?

Author: Siluvia Last Modified: 2025-06-04

Como mostra a captura de tela abaixo, para aquelas células misturadas com números e textos, como remover todos os textos e manter apenas os números nas células? Os métodos neste artigo podem ajudar você.

A screenshot showing Excel cells with numbers and text mixed, and result with text removed

Remova apenas o texto de células contendo números e texto com uma função definida pelo usuário
Remova facilmente apenas o texto de células contendo números e texto com o Kutools para Excel


Remova apenas o texto de células contendo números e texto com uma função definida pelo usuário

Você também pode usar a função definida pelo usuário abaixo para remover textos de células especificadas e manter apenas números.

1. Pressione simultaneamente as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.

2. Na janela do Microsoft Visual Basic for Applications, clique em Inserir > Módulo. Em seguida, copie e cole o código VBA abaixo na janela de Código. Veja a captura de tela:

Código VBA: Remova apenas o texto de células contendo números e texto

Function OnlyNums(strWord As String)
    Dim strChar As String
    Dim x As Integer
    Dim strTemp As String

    strTemp = ""
    Application.ScreenUpdating = False
    For x = 1 To Len(strWord)
        strChar = Mid(strWord, x, 1)
        If Asc(strChar) >= 48 And _
          Asc(strChar) <= 57 Then
            strTemp = strTemp & strChar
        End If
    Next
    Application.ScreenUpdating = True
    OnlyNums = Val(strTemp)
End Function

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Not Intersect(Target, Range("A1:B10")) Is Nothing Then Cancel = True
End Sub

A screenshot showing VBA code entry in Excel for removing text

3. Pressione as teclas Alt + Q para fechar a janela do Microsoft Visual Basic for Applications.

4. Selecione uma célula em branco, insira a fórmula =OnlyNums(A2) na Barra de Fórmulas e pressione a tecla Enter para obter o resultado. Mantenha a célula de resultado selecionada, arraste sua Alça de Preenchimento para baixo para obter todos os resultados. Veja a captura de tela:

A screenshot showing results after applying VBA code to remove text in Excel

Observação: Na fórmula, A2 é a célula da qual você removerá os textos e manterá apenas os números. Altere conforme necessário.

Agora você pode ver que todos os textos foram removidos e apenas os números são mantidos nas células especificadas.


Remova facilmente apenas o texto de células contendo números e texto com o Kutools para Excel

Esta seção recomendará o utilitário Remover Caracteres do Kutools para Excel. Com este utilitário, você pode remover todos os caracteres não numéricos das células com apenas alguns cliques e manter apenas os números nas células. Por favor, faça o seguinte.

Kutools para Excel oferece mais de 300 recursos avançados para simplificar tarefas complexas, aumentando a criatividade e a eficiência. Integrado com capacidades de IA, o Kutools automatiza tarefas com precisão, tornando a gestão de dados fácil e eficiente. Mais informações sobre o Kutools para Excel...  Teste gratuito...

1. Selecione as células das quais você precisa remover os textos e manter apenas os números, depois clique em Kutools > Texto > Remover Caracteres.

A screenshot of Kutools Remove Characters feature in Excel

2. Na caixa de diálogo Remover Caracteres, marque apenas a caixa Não-numérico e clique no botão OK.

A screenshot of Kutools Remove Characters dialog

Todos os caracteres não numéricos são imediatamente removidos das células selecionadas, como mostrado na captura de tela abaixo.

A screenshot showing results in Excel after removing non-numeric characters with Kutools

Kutools para Excel - Potencialize o Excel com mais de 300 ferramentas essenciais. Aproveite recursos de IA permanentemente gratuitos! Obtenha Agora


Artigo relacionado:

Melhores Ferramentas de Produtividade para Office

🤖 Assistente AI do KUTOOLS: Revolucione a análise de dados com base em: Execução Inteligente | Gerar Código | Criar Fórmulas Personalizadas | Analisar Dados e Gerar Gráficos | Invocar Funções Aprimoradas
Recursos Populares: Encontrar, Destacar ou Marcar Duplicatas | Excluir Linhas em Branco | Combinar Colunas ou Endereço sem Perder Dados | Arredondar...
Super PROC: PROC com Múltiplos Critérios | PROC com Múltiplos Valores | Procura em várias planilhas | Correspondência Fuzzy...
Lista Suspensa Avançada: Crie rapidamente uma Lista Suspensa | Lista Suspensa Dependente | Lista Suspensa com Múltipla Seleção...
Gerenciador de Colunas: Adicionar um Número Específico de Colunas | Mover Colunas | Alternar Estado de Visibilidade das Colunas Ocultas | Comparar Intervalo & Colunas...
Recursos em Destaque: Grade de foco | Visualização de Design | Barra de fórmulas aprimorada | Gerenciador de Pasta de trabalho & Planilha | Biblioteca de AutoTexto | Selecionador de Data | Mesclar Dados | Criptografar/Descriptografar Células | Enviar Email por Lista | Super Filtro | Filtro Especial (filtrar negrito/itálico/tachado...)...
Top15 Conjuntos de Ferramentas:12 Ferramentas de Texto (Adicionar Texto, Excluir Caracteres Específicos, ...) | Mais de50 Tipos de Gráficos (Gráfico de Gantt, ...) | Mais de40 Fórmulas Práticas (Calcular a idade com base na data de nascimento, ...) |19 Ferramentas de Inserção (Inserir Código QR, Inserir Imagem a partir do Caminho, ...) |12 Ferramentas de Conversão (Converter em Palavras, Conversão de Moeda, ...) |7 Ferramentas de Mesclar & Dividir (Mesclar Linhas Avançado, Dividir Células, ...) | ... e muito mais

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!