Convertir données E@mail

[Claudy]

Bonjour à tous,
J'ai dans une colonne toutes des adresses dans le genre:
sosso colllard <scolllard@stattestreeet.com>
Ma question:
Comment récupérer uniquement l'adresse mail sans les <> pour avoir , ici mon exemple: scolllard@stattestreeet.com
Cette colonne possède plus de 200 adresses...
Merci d'avance, Claudy

 

[Gael]

Re : Convertir données E@mail

Bonjour Claudy, bonjour à tous,

Essaye la formule suivante (L'adresse étant en B5):

=STXT(B5;CHERCHE("<";B5;1)+1;NBCAR(B5)-CHERCHE("<";B5;1)-1)

@+

Gael

 

[Staple1600]

Re : Convertir données E@mail

Bonsoir


Par macro (s'il y a 200 lignes, ca soulage les doigts 😉

Sub purgemail()
Application.ScreenUpdating = False
With ActiveSheet
    With .UsedRange.SpecialCells(xlCellTypeConstants, 23)
        .Replace "<", ""
        .Replace ">", ""
    End With
End With
Application.ScreenUpdating = True
End Sub

Pour insérer cette macro:
ALT+F11
Insertion/Module
Y copier le code VBA ci-dessus
ALT+Q
Outils/Macros
Sélectionner purgemail puis cliquer sur [Exécuter]

 

[Claudy]

Re : Convertir données E@mail

Ok, merci à vous deux et bon dimanche (Pluvieux?) ici à Namur , c'est la drache!