Envoi d’une seule feuille de travail par e-mail (Outlook), Excel VBA

Vous pouvez envoyer une seule feuille de calcul par courrier électronique à l’aide de SendMail avec Microsoft Outlook. La macro suivante copie la feuille de calcul active et l’envoie en tant que feuille de calcul unique dans son propre classeur:

Sub EnvoyerFeuilleEmail ()
ActiveSheet.Copy
On Error Resume Next
ActiveWorkbook.SendMail "chancelin@yahoo.com", " Test d'une seule feuille."
Err.Clear
ActiveWorkbook.Close False
End Sub

 

Remarque

SendMail peut envoyer une seule feuille de calcul en tant que pièce jointe en hébergeant cette feuille de calcul dans son propre classeur et en l’envoyant par courrier électronique. SendMail ne nécessite pas la spécification d’un serveur SMTP (Simple Mail Transport Protocol); il envoie le courrier en utilisant votre système de messagerie installé. Cela a l’avantage de contourner une grande partie du code lié à Outlook que vous avez vu jusqu’à présent, mais cela présente des inconvénients, tels qu’une capacité limitée à joindre des fichiers et aucun argument CC disponible.

S’abonner
Notifier de
0 Commentaires
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x
()
x