Envoyer Mail par vba

  • Initiateur de la discussion Initiateur de la discussion Bruno
  • 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 !

B

Bruno

Guest
Bonjour a tous

Comment faire pour qu'a partir d'Excel je clique sur un bouton est mon fichier va directement ce mettre en pièce jointe, et que l’adresse, l’objet et Qu'un message prédéfini se mettre automatiquement dans mon nouveau E-mail que je veux envoyer.

Merci a tous et bon Week end
 
Salut Bruno,

Avec Outlook de Office tu peux faire comme çà :

Sub EnvoieFichierJoint()
Dim Dest As String
Dim Sujet As String
Dest = "toto@laposte.net"
Sujet = "Test d'envoi d'email"
ActiveWorkbook.SendMail Dest, Sujet, True
End Sub

(Dest et Sujet peuvent renvoyer la valeur d'une cellule, ou d'un conrôle)

Si çà te vas...

Bon App
@+Thierry
 
Salut Bruno,
J'espère bien que tu as pris ma remarque au deuxième dégré.
Je m'énerve souvent, en tant que non francophone, de voir combien certains n'apprécient pas suffisament le bonheur qu'ils ont eu d'avoir reçu la langue de Voltaire comme langue maternelle (bien que celle de Vondel n'est pas mal non plus) et du peu de respect qu'ils affichent envers elle.
Quant à ton problème, je n'en ai aucune idée, je suis complètement ignare lorsqu'il s'agit de courriel.
André.
 
Bonjour André, re-Salut Bruno,

Sangt rang très dent la Paul et Mic... (Sur l'orthographe...)

Non tu ne peux pas avec "SendMail" contrôler le corps du message ni le CC... l'expression ne gère que "SendMail(Recipients, Subject, ReturnReceipt)"

Si tu veux à tous prix mettre un message et un CC il faut faire une autre procédure plus complexe.
(voir ce fichier demo pour Outlook uniquement : <http://www.excel-downloads.com/html/French/forum/download.php/1,6156,396/EmailReport.zip>

Bon Courage
@+Thierry
 
- 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
Réponses
5
Affichages
290
  • Question Question
Microsoft 365 Code VBA
Réponses
7
Affichages
908
Réponses
1
Affichages
390
Réponses
2
Affichages
923
  • Question Question
Microsoft 365 Formule Outlook,
Réponses
8
Affichages
232
Réponses
1
Affichages
416
Compte Supprimé 979
C
Retour