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 :

 

PACK SPECIAL OUTLOOK : 

Liens vers le fichier spécial pack compilation OUTLOOK 

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.

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

  1. Stephane dit :

    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 ?

Répondre à Stephane Annuler la réponse

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