Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 5 min.
EXCEL_2010_VBA_ENVOYER_E_MAIL_PERSONNALISE_OUTLOOK
Problématique :
Comment envoyer un e-mail personnalisée avec EXCEL VBA en moins de 5 min.
Solution :
Suite à la demande d’un de mes lecteurs, voici un exemple de comment procéder pour l’envoi d’un e-mail que l’on peut personnaliser sur Excel pour envoyer un e-mail en VBA sur Outlook.
Dans cette page, nous allons voir comment faire, en VBA, pour accéder à Outlook. L’intérêt de cette démarche est de pouvoir, par exemple, envoyer des E-Mails en masse de manière automatique avec Excel . Nous utiliserons ici Excel.
Aperçu :
La liste de données se trouve sur la plage C8 à F11 dans le cadre de l’exemple 1 :
La liste de données se trouve sur la plage A8 à F11 dans le cadre de l’exemple 1 :
Ajout du prénom en plus ainsi que du matricule, bien sur vous pouvez personnalisé à votre guise.
Résultat pour l’exemple 1 :
Résultat pour l’exemple 2 :
Code source VBA :
Exemple 1:
On crée une instance d’Outlook : Set OutApp= CreateObject(« Outlook.Application »)
On crée un élément Outlook, qui sera un message E-Mail : Set OutMail = Outapp.CreateItem(0)
Pour le détail du mail :
To : A qui est destiné ce message
Cc : A qui veut-on envoyer une copie ?
Cci : A qui veut-on envoyer une copie invisible ?
Subject : Quel est le sujet du message (Le titre)
Body : Quel est le contenu (corps proprement dit) du message ?
Attacher un ou plusieurs fichiers Attachments.Add
Et la propriété Send pour envoyer le message ; .Display pour juste l’afficher
Exemple 2:
Version Youtube:
Tuto :
PACK SPECIAL OUTLOOK :
Liens vers le fichier spécial pack compilation OUTLOOK
Bonjour,
chez moi (Office 2010) le mail se créé mais la commande .Send n’est pas reconnu dans VBA. La commande .Display et .Save marche sans problème.
Une idée du problème ?