Envoyer un mail Outlook avec excel VBA

6
6640

Il nous arrive que nous voulions envoyer un mail depuis une de nos bases de données sur Excel. Comme par exemple créer une mailing liste, envoyez des rappels de payement ou transmettre un dossier à une autre division de l’entreprise si une certaine tache est terminée.

C’est pourquoi nous allons voir dans ce court comment envoyer 1 mail depuis une adresse qui se situe dans une cellule, ajouter un sujet et un message.

Par la suite nous allons voir comment envoyer un mail à multiple personne et pour finir nous allons voire commet envoyer un mail aux personnes correspondant un certain critère.

Vous pouvez récupérer le fichier de l’exercices ici FIchier : envoyer un mail Outlook

La base de données

Alors nous avons une petite base de données qui comporte un nom, une adresse mail et un pays.

envoyer un mail outlook

Et nous allons utiliser au cours de ce cours ces informations afin d’envoyer un mail Outlook au destinataire.

Activer la librairie Outlook

Avant de commencer nous allons devoir activer la librairie Outlook afin de permettre de l’intégrer dans notre code et d’utiliser les propriétés d’Outlook.

Pour cela il faut aller dans visual Basic (ALT + F11) puis dans outils il faut aller sur Références…

envoyer un mail outlook

Ici il faudra trouver Microsoft Outlook xx.0 Object Library, les xx sont la version il se peut que votre version soit différente que la mienne donc vous devez prendre votre version.

envoyer un mail outlook

Cocher la case et cliquer sur OK

Envoyer un mail Outlook à une personne

Nous allons commence par envoyer un simple mail à 1 seule personne pour cela nous allons place le code suivant

envoyer un mail outlook

Ici nous avons créer une variable que nous avons nommé LeMail qui contient un objet Outlook, puis nous avons di au code créer un mail avec la commande CreateItem(OlMailItem).

Puis dans notre mail nous avons indiquer les informations telle que le subject, ou trouver l’adresse de réception qui se trouve dans la cellule C6. Nous avons aussi indiquer quelle information placer dans le contenue du mail. Pour finir nous avons demander au code de ne pas envoyer le mail mais de l’afficher avec Display.

Si nous changeons Display en Send alors le mail serra envoyer sans que nous voyions d’abord.

Envoyer un Mail Outlook personnaliser.

Désormais nous allons voir comment personnaliser un peut notre mail en placent des informations supplémentaires de notre base de données comme le nom et le pays. Avec le code suivant

envoyer un mail outlook

Se qui donne le résultat suivant

envoyer un mail outlook

Une autre solution consiste à créer un champs Sujet et Message dans une cellule

envoyer un mail outlook

et de faire référence à ces cellules comme suite

envoyer un mail outlook

Qui donne le résultat suivant

envoyer un mail outlook

Envoyer un mail Outlook à plusieurs personne

Désormais nous allons voir comment envoyer un mail toutes les personnes dans la liste et d’ajouter dans le sujet leurs nom à la fin.

Pour cela nous allons devoir travailler avec une loop For qui va exécuter le code un nombre de fois nécessaire. Pour garder cette exercice simple nous allons dire que notre base de donnée ne serra pas prolonge et s’arrête à la ligne 9.

Et donc nous allons placer le code suivant

envoyer un mail outlook

Qui donne le résultat suivant si on lance le code

envoyer un mail outlook

4 mails sont créés est prêt à être envoyer et nous pouvons voir dans chaque sujet il y a leurs noms d’indiquer.

Envoyer un mail Outlook avec une condition

Désormais nous allons envoyer uniquement un mail aux personnes qui corresponde à une condition et notre exemple la condition est le pays Belgique. C’est-à-dire que nous voulons uniquement envoyer aux personnes qui vivent en Belgique.

Cela nous allons le faire avec le code suivant.

envoyer un mail outlook

Quand on lance le code nous avons le résultat suivant.

envoyer un mail outlook

Uniquement 2 mails seront envoyés.

Désormais vous savez comment envoyer un mail Outlook avec Excel VBA. Bien sûr il y a plusieurs possibilités comme ajouter une pièce jointe, ajouter une date de rappelle et la prolonger après avoir envoyer un mail à une personne qui n’as pas encore payer ça facture. Faite moi savoir dans les commentaires dans quelle situation vous aimerez voir un exemple d’utilisation de mail. D’ici la je vous retrouve dans un prochain cours salut tous le monde

6 Commentaires

  1. Bonjour, est-il possible d’intégrer des lignes du tableau en fonction d’une condition?
    Exemple : Envoyer toutes lignes de l’ensemble des personnes vivants en belgique dans un même email ?
    Merci d’avance

LAISSER UN COMMENTAIRE

Please enter your comment!
Please enter your name here

Ce site utilise Akismet pour réduire les indésirables. En savoir plus sur comment les données de vos commentaires sont utilisées.