Macro excel envoi email avec piéce jointe
Résolu
beye
Messages postés
6
Date d'inscription
Statut
Membre
Dernière intervention
-
Francis -
Francis -
A voir également:
- Macro excel envoi mail avec pièce jointe pdf
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Mail delivery system - Astuces et Solutions
33 réponses
Bonjour beye,
Tu peux utiliser sendmail. Exemple ci-dessous :
En pièce jointe, c'est le classeur précisé devant Sendmail qui est envoyé.
Ça peut être le classeur contenant la macro (ThisWorkbook), ou le classeur actif (ActiveWorkbook), etc.
Tu peux utiliser sendmail. Exemple ci-dessous :
Sub EnvoiMail() Workbooks("UnClasseur").SendMail Recipients:="tartem.pion@mimi.com", _ Subject:="Test envoi classeur", _ ReturnReceipt:=True End SubCette macro envoie, via le navigateur par défaut, un mail au destinataire dont l'adresse est ici tartem.pion@mimi.com. Le sujet est indiqué dans Subject. On peut mettre ReturnReceipt à True pour demander un accusé de réception (facultatif).
En pièce jointe, c'est le classeur précisé devant Sendmail qui est envoyé.
Ça peut être le classeur contenant la macro (ThisWorkbook), ou le classeur actif (ActiveWorkbook), etc.
elle est très bien cette macro mais comment ca marche avec Word SVP?? J'ai essayer de mettre "ThisDocument" à la place de Workbooks mais ca marche pas. merci d'avance...
Sub EnvoiMail()
Workbooks("UnClasseur").SendMail Recipients:="tartem.pion@mimi.com", _
Subject:="Test envoi classeur", _
ReturnReceipt:=True
je m'addresse à Amorjax.
Ce que je souhaite faire est très proche de ce que tu proposes. Mais je voudrais envoyer, non pas le classeur entier, mais une feuille à un destinataire, puis une autre (du même classeur) à un autre destinataire... Chaque feuille les concernant personnellement. et je souhaite que ce soit en piece jointe pour qu'ils puissent corriger les données et me les revoyer.
Peux-tu m'indiquer une solution.