valider le format des emails

[Ameline]

Bonjour,

J'ai un fichier excel avec des adresses mails mais certaines ne respectent pas le format standard email xxxx@xxxxxx.xx.
Peut on controler dans excel le "@"?
Comment peut on supprimer d'un bloc tous les mails non valides?

Merci pour votre aide

Pascal

 

[michel]

bonsoir

cette fonction de Zon permet de controler le format d'une adresse email
j'espere que cela pourra t'aider

Function VeriFCourriel(Adresse$) As Boolean 'Zon
VeriFCourriel = InStr(Adresse, "@") > 0 And InStr(1, Adresse, ".") - InStr(Adresse, "@") > 1
End Function


bonne soiree
MichelXld