Como evitar a entrada de caracteres especiais no Excel?

Em alguns casos, queremos apenas inserir letras ou números nas células e evitar digitar caracteres especiais, como @#$%& e assim por diante. Existem funções no Excel para evitar a entrada de caracteres especiais ao inserirmos valores?

Evitar a entrada de caracteres especiais com Validação de Dados

Evitar a entrada de caracteres especiais com código VBA

Evitar a entrada de caracteres especiais com Kutools para Excel

Evitar a entrada de caracteres especiais com Validação de Dados

A Validação de Dados do Excel pode ajudar a permitir que você insira apenas valores alfanuméricos. Por favor, siga os passos abaixo:

1. Selecione um intervalo onde deseja evitar a entrada de caracteres especiais.

2. Em seguida, clique em Dados > Validação de Dados > Validação de Dados, veja a captura de tela:

3. Na caixa de diálogo Validação de Dados, clique na aba Configurações, e escolha Personalizado na lista suspensa Permitir, depois insira esta fórmula =ÉNÚM(SOMARPRODUTO(PROCURAR(EXT.TEXTO(A1;LIN(INDIRETO("1:"&NÚM.CARACT(A1)));1);"0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"))) no campo Fórmula, veja a captura de tela:

Observação: A1 indica a primeira célula do intervalo selecionado (da esquerda para a direita).

4. Em seguida, clique em OK para fechar esta caixa de diálogo, e agora, quando você inserir valores contendo caracteres especiais na coluna especificada onde aplicou a opção, receberá a seguinte mensagem de aviso.

Evitar a entrada de caracteres especiais com código VBA

O seguinte código VBA também pode ajudá-lo a evitar os caracteres especiais enquanto insere valores de texto.

1. Mantenha pressionadas as teclas ALT + F11, e isso abrirá a janela Microsoft Visual Basic for Applications.

2. Em seguida, escolha sua planilha usada no Explorador de Projetos à esquerda, dê um duplo clique nela para abrir o Módulo, e depois copie e cole o seguinte código VBA no Módulo em branco:

Código VBA: evitar a entrada de caracteres especiais no Excel

Private Const FCheckRgAddress As String = "A1:A100"
Private Sub Worksheet_Change(ByVal Target As Range)
'Update 20140905
    Dim xChanged As Range
    Dim xRg As Range
    Dim xString As String
    Dim sErrors As String
    Dim xRegExp As Variant
    Dim xHasErr As Boolean
    Set xChanged = Application.Intersect(Range(FCheckRgAddress), Target)
    If xChanged Is Nothing Then Exit Sub
    Set xRegExp = CreateObject("VBScript.RegExp")
    xRegExp.Global = True
    xRegExp.IgnoreCase = True
    xRegExp.Pattern = "[^0-9a-z]"
    For Each xRg In xChanged
        If xRegExp.Test(xRg.Value) Then
            xHasErr = True
            Application.EnableEvents = False
            xRg.ClearContents
            Application.EnableEvents = True
        End If
    Next
    If xHasErr Then MsgBox "These cells had invalid entries and have been cleared:"
End Sub

Observação: No código acima, você pode alterar o intervalo A1:A100 do script Private Const FCheckRgAddress As String = "A1:A100" para seu próprio intervalo onde deseja evitar os caracteres especiais.

3. Em seguida, salve e feche este código. Agora, quando você inserir valores de texto com caracteres especiais no intervalo A1:A100, a entrada será apagada imediatamente, e você receberá a seguinte mensagem de aviso.

Evitar a entrada de caracteres especiais com Kutools para Excel

Na verdade, se você tiver o Kutools para Excel -- uma ferramenta prática e multifuncional, você pode rapidamente evitar digitar caracteres especiais em uma seleção com sua utilidade Limitar Entrada com uma simples marcação.

Após instalar o Kutools para Excel, por favor, faça o seguinte:

1. Selecione uma seleção onde deseja evitar digitar caracteres especiais, e clique em Kutools > Limitar entrada > Limitar entrada. Veja a captura de tela:

2. Na Limitar entrada caixa de diálogo, marque a opção Proibir a inserção de caracteres especiais Veja a captura de tela:

3. Clique em Ok, e uma caixa de diálogo aparecerá para lembrá-lo de que removerá a Validação de Dados se aplicar essa utilidade e clique em Sim para ir para a próxima caixa de diálogo, ela lembrará que a utilidade está funcionando na seção. veja a captura de tela:

4. Clique em OK para fechar a caixa de diálogo, e a partir de agora, uma caixa de diálogo de aviso aparecerá quando você tentar inserir um caractere especial na seleção.

Dica. Se você quiser parar de digitar valores duplicados em uma coluna, tente usar o Prevenir Entradas Duplicadas do Kutools para Excel conforme mostrado na captura de tela a seguir. Faça o download e experimente gratuitamente agora.

Demonstração: Evitar a entrada de caracteres especiais usando Kutools para Excel

Artigos relacionados:

Como evitar a entrada de valores com espaços no Excel?

Como evitar entradas duplicadas em uma coluna no Excel?