Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 5 min.

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

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 5 min.

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 :

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

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 5 min.

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.

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 3 min.EXCEL_2010_VBA_ENVOYER_E_MAIL_PERSONNALISE_OUTLOOK

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 3 min.

Résultat pour l’exemple 1 :

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

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 5 min.

Résultat pour l’exemple 2 :

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

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 5 min.

Code source VBA :

Exemple 1: 

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 3 min.EXCEL_2010_VBA_ENVOYER_E_MAIL_PERSONNALISE_OUTLOOK

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 3 min.

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

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 5 min.

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: 

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 3 min.EXCEL_2010_VBA_ENVOYER_E_MAIL_PERSONNALISE_OUTLOOK

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 3 min.

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

Excel 2010 : Comment envoyer un e-mail Outlook 2010 personnalisé en VBA en moins de 5 min.

Version Youtube:

 

Tuto :

Recevoir la newsletter

Inscrivez-vous maintenant et recevez un e-mail les fois où je publie du contenu.

I agree to have my personal information transfered to AWeber ( more information )

Je hais les spams. Vous pouvez vous désinscrire à tout moment.

Pour marque-pages : Permaliens.

Laisser un commentaire

Votre adresse de messagerie ne sera pas publiée. Les champs obligatoires sont indiqués avec *