Como verificar se um endereço de e-mail é válido no Excel?

Na gestão de bases de dados no Excel, é comum precisar verificar se todos os endereços de e-mail estão corretamente formatados antes de enviar comunicações ou importar listas de contactos. Endereços eletrónicos inválidos podem provocar mensagens devolvidas, correspondência incompleta ou erros em sistemas integrados. Em vez de verificar manualmente cada entrada, o Excel oferece formas práticas de validar automaticamente os endereços de e-mail, simplificando a limpeza dos dados e garantindo maior precisão no seu fluxo de trabalho de gestão de informação.

Verificar se o Endereço de Email é válido ou não com fórmula

Código VBA – Apenas endereços de e-mail podem ser inseridos automaticamente

---

Verificar se o Endereço de Email é válido ou não com fórmula

Para verificar eficientemente se um endereço de e-mail na sua folha de cálculo é provavelmente válido, utilize uma fórmula do Excel. Esta abordagem é ideal para analisar rapidamente uma longa lista de endereços eletrónicos e destacar entradas que possam não cumprir os requisitos básicos do formato de endereço de e-mail.

A fórmula abaixo analisa o endereço de e-mail para garantir que contenha pelo menos um ponto («.») e que exista um ponto após o símbolo «@» — elementos essenciais em formatos válidos de endereços eletrónicos.

1. Introduza ou copie a fórmula seguinte para uma célula vazia onde deseja obter o resultado da verificação:

2. Após introduzir a fórmula, prima Enter para confirmar. Em seguida, arraste a alça de preenchimento para baixo, de modo a aplicar esta fórmula às restantes células da coluna pretendida. A fórmula devolverá VERDADEIRO para as entradas que passarem na verificação (provavelmente válidas) e FALSO para as entradas que não cumprirem estes requisitos.

Notas e dicas:

• Esta fórmula verifica apenas o formato básico: confirma a presença de pontos e a sua posição relativa ao símbolo «@», mas não garante que o domínio ou o nome de utilizador existam, nem filtra alguns casos raros, ainda que válidos.
• Se os seus dados incluírem espaços, caracteres especiais ou pontuação final, isso poderá provocar uma verificação de validade incorreta.
• Para uma validação mais rigorosa do formato dos endereços de e-mail, considere implementar verificações adicionais ou recorrer a macros VBA, conforme descrito abaixo.

---

Código VBA – Apenas endereços de e-mail podem ser inseridos automaticamente

Para uma validação de endereços eletrónicos mais avançada e automatizada — especialmente se pretender sinalizar ou destacar programaticamente os endereços inválidos — a utilização de uma macro VBA revela-se extremamente eficaz. Esta abordagem é ideal para folhas de cálculo com um elevado volume de registos de endereços eletrónicos ou sempre que for necessário um processamento em lote para garantir conformidade com os protocolos de comunicação.

Este código verifica se os endereços de e-mail num intervalo selecionado cumprem normas básicas de formatação — nomeadamente, a presença do símbolo «@» e, pelo menos, um «.» após esse símbolo. Opcionalmente, pode destacar as células inválidas colorindo-as ou adicionando um comentário, facilitando assim a revisão durante a limpeza dos dados.

1. Clique em Ferramentas de Programador > Visual Basic. Depois, na janela Microsoft Visual Basic para Aplicações, clique em Inserir > Módulo e cole o seguinte código VBA no módulo:

Sub ValidateEmailAddresses()
    Dim rng As Range
    Dim cell As Range
    Dim email As String
    Dim atPos As Long
    Dim dotPos As Long
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set rng = Application.InputBox("Select email range", xTitleId, Selection.Address, Type:=8)
    
    For Each cell In rng
        email = Trim(cell.Value)
        atPos = InStr(1, email, "@")
        
        If atPos > 1 Then
            dotPos = InStr(atPos + 1, email, ".")
            
            If dotPos > atPos + 1 Then
                cell.Interior.ColorIndex = xlNone ' Format as valid
            Else
                cell.Interior.Color = vbYellow ' Flag as invalid
                cell.AddComment "Invalid email format"
            End If
        Else
            cell.Interior.Color = vbYellow ' Flag as invalid
            cell.AddComment "Invalid email format"
        End If
    Next cell
End Sub

2. Para executar a macro, clique no botão . Irá surgir uma caixa de diálogo a solicitar-lhe que selecione o intervalo que contém os seus endereços de e-mail. As entradas inválidas serão destacadas a amarelo e receberão um comentário («Formato de endereço eletrónico inválido»), enquanto as entradas válidas permanecerão inalteradas.

• Se a sua folha de cálculo estiver protegida, poderá precisar de a desproteger antes de executar a macro. Guarde o seu trabalho primeiro.
• Remova ou limpe os comentários antes de voltar a executar a macro para evitar marcas duplicadas.
• A macro não verifica se o endereço de e-mail existe, apenas se o seu formato está correto. Para validações a nível organizacional, considere exportar os resultados para uma verificação adicional, se necessário.

Ao utilizar estas soluções do Excel, reduz o esforço manual na gestão de endereços eletrónicos, minimiza erros nas comunicações e agiliza a preparação das suas listas de contactos para campanhas de e-mail ou relatórios.

• Se encontrar erros causados pelo Formato de Célula (como números armazenados como texto), certifique-se de que a coluna com os endereços eletrónicos está formatada como Geral ou Texto antes de aplicar fórmulas ou validação.
• Para conjuntos de dados volumosos, combine verificações por fórmula com marcação por VBA e garanta uma revisão exaustiva.
• Audite periodicamente a sua base de dados para verificar alterações nos requisitos de domínio ou nas normas de formato do Novo Email.

Mais artigos relacionados: