XL 2013 Cellule nommée = destinataire du mail

papy 73 ans

XLDnaute Occasionnel
Bonjour à tous,
Est-il possible d'envoyer un mail dont le destinataire serait une cellule nommée, par souci de discrétion ?
En vous remerciant.
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour papy,

[A1].Name.Name renvoie bien le nom de la cellule A1. Nom que vous avez prédéfini.
J'ai vérifié ça marche.

Mettez bcc = Trans = [A1].Name.Name en commentaires et remplacez le par :

msgbox [A1].Name.Name

La réponse est elle correcte ?
Car c'est soit le nom qui n'est pas correct, soit la syntaxe bcc=trans ...

Au fait pourquoi bcc=trans=.... pourquoi pas bcc=[A1].Name.Name ?
 

papy 73 ans

XLDnaute Occasionnel
Bonjour sylvanu,
Je ne suis pas très doué, je voudrais envoyer un mail dont le destinataire serait la cellule nommée.
Les codes ne sont pas de moi et je ne sais comment il faut modifier.
SI je nomme la cellule xxxxx@xxx.xx j’obtiens :
Capture.JPG

Voici le fichier sur cjoint :

en te remerciant vivement.
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Papy,
Tout ça pour arriver à ça !
Dans les noms de cellule le @ est interdit par XL. :)
Si vous tenez à votre méthode pour entrer les adresses email, dans le nom de la cellule remplacez @ par _ : papy73@gmail.com par papy73_gmail.com ( je fais l'essai en cellule D8 d'une feuille )
Puis vous faites :
VB:
AdresseEmail = Replace(Range("D8").Name.Name, "_", "@")
Et vous obtenez bien AdresseEmail = papy73@gmail.com
Si vous avez peur qu'une adresse email contienne _ , dans ce cas vous pouvez utiliser £ ou µ ou __ ...
 

Discussions similaires

Réponses
11
Affichages
394

Statistiques des forums

Discussions
311 725
Messages
2 081 939
Membres
101 844
dernier inscrit
pktla