Extraire email cellule
Fermé
padrio
Messages postés
1
Date d'inscription
mardi 10 août 2021
Statut
Membre
Dernière intervention
10 août 2021
-
10 août 2021 à 17:56
Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 - 10 août 2021 à 18:10
Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 - 10 août 2021 à 18:10
A voir également:
- Extraire email cellule
- Extraire une video youtube - Guide
- Excel cellule couleur si condition texte - Guide
- Extraire son video - Guide
- Comment creer un compte email - Guide
- Aller à la ligne dans une cellule excel - Guide
1 réponse
Zoul67
Messages postés
1959
Date d'inscription
lundi 3 mai 2010
Statut
Membre
Dernière intervention
30 janvier 2023
149
10 août 2021 à 18:10
10 août 2021 à 18:10
Bonjour,
En fonction personnalisée :
A+
En fonction personnalisée :
Function adresse_mail(s As String) Dim Tableau() As String Dim i As Integer Tableau = Split(s, """") For i = 0 To UBound(Tableau) If InStr(Tableau(i), "@") > 0 Then adresse_mail = Tableau(i) Exit For End If Next i End Function
A+