MACRO: Supprimer une chaîne de caracteres contenues dans une chaîne
Bonjour,
Je cherche à creer une macro qui permet de Vérifier dans une chaine caractère, s'il existe ce type de chaine : /#/##/###/## (exemple:/E/PS/TRE/FR)
Si elle existe, alors on supprime.
La Recherche doit ce faire uniquement dans la partie cc: du mail appelé dans VBA "Email_adress" :
"Email_adress"
Voici le code que j'essai de faire, mais sans succès
Je vous remercie pour votre aide
Bonjour,
Je cherche à creer une macro qui permet de Vérifier dans une chaine caractère, s'il existe ce type de chaine : /#/##/###/## (exemple:/E/PS/TRE/FR)
Si elle existe, alors on supprime.
La Recherche doit ce faire uniquement dans la partie cc: du mail appelé dans VBA "Email_adress" :
"Email_adress"
Code:
Envoyé par : Pierre
31/05/2010 14:35
Pour : BOITE-FOUR-CENT@TRE.com, BOITE-GP.TRE.com
cc : Robert-externe CHAMB/E/PS/TRE/FR, christian.Bowaer@TRE.com, Laure FAUVE/A/PS/TRE/FR, Luc ROBERT/A/PS/TRE/FR
Voici le code que j'essai de faire, mais sans succès
Code:
Dim Email_adress As String
Dim i As String
Code_LNotes = Mid(Email_adress, InStr(1, Email_adress, "/"), 12)
i = Code_LNotes
For Each i In Email
i.Value = Replace(Email_adress, Code, "")
Next i
Je vous remercie pour votre aide
Dernière édition: