Vérifier le (bon) format d'une adresse email
s
Bonjour à tous,
Auriez-vous connaissance d'une formule ou d'un système permettant de verifier une colonne remplie d'adresse email.
Sachant que j'ai pu trouver ces données sur le web :
Selon la RFC, tous les caractères sont valides et autorisés, sauf:
les lettres accentuées
les espaces
les signes spéciaux comme ()<>,;:"[]|ç%&,Exemples d'adresses non valides :
Abc.example.com - Le caractère @ manque.
Abc.@example.com - Le caractère . est situé juste avant le caractère @ .
Abc.@@example.com - Le caractère @ apparait 2 fois.
Abc..123@example.com - Le caractère . apparaît deux fois de suite.
Abc 123@example.com - Le caractère "espace" apparaîtMerci
EDIT : une solution ici -> https://www.excel-pratique.com/fr/fonctions-complementaires/is-email
Bonjour,
une méthode tout à fait adaptée est l'utilisation des expressions régulières
voici un exemple, mais il ne comprend sans doute pas tous les raffinements souhaités
il faut donc peut-être retravailler le modèle "([\w\.\-])+@([\w\.\-])+"
Bonjour surpriz,
slt Steelson,
un début de piste,
Function test(cellule As Range)
n = 0
If Len(cellule) - Len(Application.Substitute(cellule, "@", "")) > 1 Then n = 1
t = Split(cellule, "@")
If Asc(Right(t(0), 1)) = 46 Then n = 1
For i = 1 To Len(t(0))
x = Asc(Mid(t(0), i, 1))
Select Case x
Case 32: n = 1
Case 46: p = p + 1
Case 160: n = 1
End Select
If p > 1 Then n = 1
Next i
If n = 0 Then test = "vrai" Else test = "faux"
End Function