[Resolvido]Validar Email (Por favor, aonde estou errando???!!!)

Olá, Equipes! e


Boa noite!



Pessoal, por favor, já tentei de tudo para "ajeitar" este código que Valida Email. Já levei uma surra de 7 x 0 e nada...

Por obséquio, galera, dei-me uma luz!!!





Fraterno Abraço,
Guilherme Pereira

A "cabeçalho" da função é

Código:

Public Function CheckEmail(ByVal EmailAddress As String)

Destrinchando
Public - O escopo de acesso (ou é private ou é public)
Function - Tipo (ou é function ou é sub)
CheckEmail - Nome da função
( - Abertura para argumentos
ByVal - Tipo de repasse (ou é ByVal ou é ByRef)
EmailAddress - Nome do argumento
As - Preparação para dizer como ele será recebido
String - Como ele é recebido
) - Fechamento para argumentos

Simples assim.

Aí você está chamando a função assim

Código:

Call CheckEmail

Pedindo para ela checar o email. Mas que email?? Você não passou o email para a função como argumento.

Código:

Call CheckEmail("contato@damascenojr.com.br")

Ou, no seu caso

Código:

Call CheckEmail(Me!Func_EmailInstitu.Value)

Valeu, Mestre DamascenoJr!!!!

Com as suas explicações, ficou mais fácil . Vou fazer uns pequenos ajustes e tocar em frente!!!


Obs.: Mestre, por favor, sem ser entrão, já sendo, dê uma olhadinha nesta dúvida que postei no decorrer da semana, por gentileza!
"Desafio para quem gosta de Datas, Validação e VBA!!!"




Um Forte e Fraterno abraço,
Guilherme Pereira