Comment envoyer des e-mails en masse à partir dOutlook à laide dExcel VBA

Avez-vous besoin d'envoyer des e-mails de masse personnalisés à vos clients, clients, amis ou tout autre contact ? Voulez-vous le faire en un seul clic ? C'est possible! Il existe un outil magique dans Microsoft Excel qui fait tout cela. C'est le Visual Basic pour Applications alias Excel VBA.

Continuez à lire pour savoir comment envoyer des e-mails en masse à partir d'Outlook à l'aide d' Excel VBA . Il y a plus! Vous pouvez vous entraîner en suivant les étapes les plus simples mentionnées dans le didacticiel ci-dessous. Allons creuser !

Comment envoyer des e-mails en masse à partir d'Outlook à l'aide d'Excel VBA

Comment envoyer des e-mails en masse à partir d'Outlook à l'aide d'Excel VBA

Le didacticiel actuel vous fournira le code VBA dont vous avez besoin pour automatiser l'envoi d'e-mails en masse à partir d'Excel. Tout ce que vous avez à faire est de rassembler vos données dans un fichier Excel et d'effectuer un formatage rapide.

Le programme VBA que vous exécuterez utilisera Microsoft Outlook comme application d'envoi d'e-mails. Ainsi, vous devez installer et configurer Outlook sur votre ordinateur. Le code VBA ne pourra pas utiliser le programme Outlook basé sur un navigateur Web.

Une fois que vous êtes prêt avec le fichier Excel et l'application Outlook, procédez comme suit :

  • Organisez la feuille de calcul des e-mails en masse en 6 colonnes.
  • Tapez les en-têtes de colonne dans la ligne A1 : Courriel à (A) ; Courriel CC (B); Objet de l'e-mail (C) ; Corps de l'e-mail (D), pièce jointe (E), état (F).
  • Ajoutez toutes les « adresses de destination » sous l' en-tête de la colonne A. Vous pouvez ajouter des milliers d'e-mails si vous le souhaitez.
  • De même, saisissez les « Adresses CC » sous l' en-tête de la colonne B.
  • Il est temps de personnaliser la ligne d'objet de l'e-mail. Vous pouvez ajouter des sujets d'e-mail personnalisés pour chaque contact sous l' en-tête de la colonne C.
  • Il en va de même pour le contenu du corps de l'e-mail. Copiez-collez le contenu de l'e-mail dans les lignes sous l' en-tête de la colonne D.
  • Copiez-collez les emplacements des pièces jointes sous l' en-tête de la colonne E.
  • Pour obtenir l'emplacement de la pièce jointe, appuyez sur Maj et sélectionnez le fichier cible sur votre ordinateur.
  • Maintenant, faites un clic droit et sélectionnez Copier comme chemin pour copier l'adresse du fichier dans le presse-papiers du PC.
  • Vous pouvez maintenant coller l'adresse directement dans les lignes de la colonne E.
  • Laissez la colonne F vide car le code VBA remplira automatiquement les statuts.

Comment envoyer des e-mails en masse à partir d'Outlook à l'aide d'Excel VBA

  • Enregistrez la feuille Excel en tant que fichier prenant en charge les macros.
  • Maintenant, appuyez sur Alt + F11 pour afficher l'éditeur de code VBA.
  • Cliquez sur Outils dans le menu supérieur puis sélectionnez Références .
  • Recherchez la bibliothèque d'objets Microsoft Office 16.0 dans la liste qui suit et cochez la case.
  • Cliquez sur OK pour enregistrer Outlook en tant qu'objet pour VBA.

Comment envoyer des e-mails en masse à partir d'Outlook à l'aide d'Excel VBA

  • Maintenant, cliquez sur Insérer , puis choisissez Module pour ouvrir un éditeur de code.
  • Copiez-collez le code mentionné ci-dessous dans le module .

Sub Send_Bulk_Mails() Dim sh As Worksheet Set sh = ThisWorkbook.Sheets("Worksheet_Name") Dim i As Integer Dim OA As Object Dim msg As Object Set OA = CreateObject("outlook.application") Dim last_row As Integer last_row = Application. CountA(sh.Range("A:A")) For i = 2 To last_row Set msg = OA.createitem(0) msg.to = sh.Range("A" & i).Value msg.cc = sh. Range("B" & i).Value msg.Subject = sh.Range("C" & i).Value msg.body = sh.Range("D" & i).Value If sh.Range("E" & i).Value <> "" Then msg.attachments.Add sh.Range("E" & i).Value End If msg.send sh.Range("F" & i).Value = "Sent" Next i MsgBox "Tous les e-mails ont été envoyés" End Sub

  • Entrez le nom de la feuille de calcul actuelle séparé par des traits de soulignement dans la ligne de code 3 où il est écrit (« Worksheet_Name »).
  • Cliquez sur Enregistrer dans le menu pour enregistrer le script.
  • Vous pouvez appuyer sur F5 pour exécuter la macro et Excel enverra automatiquement les e-mails via Outlook.

Comment envoyer des e-mails en masse à partir d'Outlook à l'aide d'Excel VBA

  • Vous pouvez également accéder à cette macro ultérieurement à partir de l' onglet Développeur du menu ruban Excel.

Conclusion

Maintenant que vous avez suivi la procédure d'envoi d'e-mails en masse à partir d'Outlook à l'aide du didacticiel Excel VBA, vous pouvez facilement envoyer des e-mails en masse sans perdre de temps avec l'envoi manuel d'e-mails.

Vous voulez apprendre une autre astuce VBA pour Excel ? Suivez ce didacticiel pour apprendre à automatiser la vérification orthographique dans Excel à l'aide de VBA.

Leave a Comment

OneNote 2010 : Écrire des équations mathématiques (Ink To Math)

OneNote 2010 : Écrire des équations mathématiques (Ink To Math)

Les applications de la suite Microsoft Office 2010 fournissent une énorme liste d'équations qui vous permet de les ajouter rapidement à votre travail, mais il est parfois difficile de les trouver.

Word 2010 : Défilement synchrone (affichage côte à côte)

Word 2010 : Défilement synchrone (affichage côte à côte)

Grâce à la fonctionnalité Afficher côte à côte, vous pouvez ouvrir instantanément deux documents et consulter les deux documents simultanément dans Word 2010.

Outlook 2010 : télécharger automatiquement les images

Outlook 2010 : télécharger automatiquement les images

Pour des raisons de sécurité, Outlook 2010 ne télécharge pas automatiquement les images à la réception d'un nouvel e-mail. Voyons comment modifier les paramètres par défaut.

Quest-ce que le volet Personnes dOutlook 2010 et comment le désactiver ?

Quest-ce que le volet Personnes dOutlook 2010 et comment le désactiver ?

Microsoft Outlook 2010 vous permet de suivre vos contacts sociaux directement depuis votre boîte de réception. Le volet de suivi de vos réseaux sociaux

Comment remplir automatiquement des lettres dans Excel : guide étape par étape

Comment remplir automatiquement des lettres dans Excel : guide étape par étape

Apprenez à saisir automatiquement des lettres dans Excel grâce à ce guide simple. Découvrez des astuces pour saisir rapidement des séquences alphabétiques dans vos feuilles de calcul.

Visionneuse PowerPoint 2010

Visionneuse PowerPoint 2010

PowerPoint se distingue incontestablement lorsqu'il s'agit de créer des présentations captivantes et attrayantes, ce qui explique son utilisation généralisée.

Correction de lerreur dinstallation 1402 dOffice 2010 : Impossible douvrir la clé de registre

Correction de lerreur dinstallation 1402 dOffice 2010 : Impossible douvrir la clé de registre

La suppression de Grooveex.dll était l'un des deux problèmes que j'ai rencontrés récemment lors de la réinstallation d'Office 2010 sous Windows 7. Cet article se concentrera sur le

Word 2010 : Insérer un numéro de ligne dans un document

Word 2010 : Insérer un numéro de ligne dans un document

Lorsque vous travaillez sur un document Word 2010, vous avez parfois besoin d'afficher les numéros de ligne. Word 2010 propose une fonctionnalité permettant d'insérer des lignes.

Masquer le texte dans Microsoft Word 2010/2007

Masquer le texte dans Microsoft Word 2010/2007

L'outil de rédaction Word 2007 est un module complémentaire gratuit pour Microsoft Word 2010 et 2007 permettant de masquer n'importe quel texte de votre document. « Rédiger » signifie censurer.

Récupérer les mots de passe Outlook avec OutlookPasswordDecrypter

Récupérer les mots de passe Outlook avec OutlookPasswordDecrypter

Si vous avez oublié votre mot de passe Outlook, essayez OutlookPasswordDecryptor. Cette application portable exceptionnelle vous permettra de