Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Adresse mail dans cellule et macro

  • Initiateur de la discussion Initiateur de la discussion morpetk
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

M

morpetk

Guest
Bonjour,

Dans une feuille excel nommee "Mail Bapteme", j'ai une cellule (F14) avec une adresse e-mail et je souhaite envoyer cette feuille a l'adresse du (F14). J'aimerais donc utilise une macro type ci-dessous:

Sub Mailbapteme()
'
' Mailbapteme Macro
'

With Worksheets("Mail Bapteme").MailEnvelope
With .Item
.Subject = "Un an déjà!"
.Recipients.Add "toto@toto.com"
.send
End With
End With

'
End Sub


Mais en ayant l'adresse de la cellule (F14) a la place de (toto@toto.com).
J'ai essaye ci-dessous, mais ca ne fonctionne pas. Merci de ce que vous pourrez me dire.

Sub Mailbapteme()
'
' Mailbapteme Macro
'

With Worksheets("Mail Bapteme").MailEnvelope
With .Item
.Subject = "Un an déjà!"
.Recipients.Add "Range(" 'Mail Bapteme'!F14").value"
.send
End With
End With

'
End Sub
 
Re : Adresse mail dans cellule et macro

Malheureusement, ca (en-dessous) ne marche pas encore. Ne connaissant pas la synthaxe, il manque peut-etre un detail. Merci pour vos idees...

Sub Mailbapteme()
'
' Mailbapteme Macro
'

With Worksheets("Mail Bapteme").MailEnvelope
With .Item
.Subject = "Un an déjà!"
.Recipients.Add Sheets Range("F14").Value
.send
End With
End With

'
End Sub
 
Re : Adresse mail dans cellule et macro

Bonjour,
Au cas ou ma questionr resterait sans reponse car mal formulee, je recommence:
1. je cherche à envoyer une feuille active en tant que corps du message outlook.
2. l'adresse a laquelle je l'envoie n'est jamais la meme et est contenue dans une cellule de la feuille active

Quelqu'un saurait-il repondre aux deux points separemment?
Merci d'avance.🙂
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
Microsoft 365 Code VBA
Réponses
7
Affichages
1 K
Réponses
2
Affichages
1 K
Réponses
4
Affichages
735
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…