Lorsque vous devez envoyer un courrier électronique de masse à un grand groupe de personnes, vous avez besoin d'un processus automatisé capable de traiter rapidement les tâches répétitives. Excel avec une liste d'emails est le moyen le plus courant d'envoyer des emails en masse. Ainsi, dans ce tutoriel, nous allons vous montrer comment envoyer des emails à partir d'un fichier de type Excel automatiquement à un grand nombre de personnes.

Télécharger le cahier d'exercices

Téléchargez ce cahier d'exercices pour vous entraîner pendant que vous lisez cet article.

2 méthodes pratiques pour envoyer des e-mails à partir d'une liste Excel

Nous avons inclus un ensemble de données avec le nom de certaines personnes, ainsi que leur adresse électronique et leur numéro d'immatriculation, dans l'image ci-dessous. Excel nous devons envoyer des courriels à chaque personne. Pour ce faire, nous utiliserons la fonction La fusion postale de Microsoft Word fonction suivi d'un VBA pour envoyer des courriels aux personnes préférées de la liste existante.

1. appliquer la fonction de fusion de courrier pour envoyer plusieurs courriels à partir d'une liste Excel

⇒ Étape 1 : Ouvrir un nouveau fichier Word

• Ouvrir une page blanche Word document.
• Cliquez sur le Mailings onglet.
• De la Sélectionner les destinataires choisissez l'option Utiliser une liste existante option.

⇒ Étape 2 : Lier la liste Excel au fichier Word

• Sélectionnez le Excel où vous avez créé la liste et cliquez sur Ouvrir pour ouvrir le fichier.

• Sélectionnez le numéro de la feuille où vous avez écrit la liste.
• Ensuite, cliquez sur OK .

⇒ Étape 3 : Insérer des champs

• De la Mailings cliquez sur l'option Insérer un champ de fusion pour saisir les champs que vous souhaitez insérer.
• Tout d'abord, insérez le Nom en cliquant dessus et dans la position préférée du courrier général.

• Comme le montre l'image ci-dessous, après avoir ajouté l'élément Nom il apparaîtra comme la variable du nom de chaque personne.

• De même, placez le Reg où vous voulez dans le message texte.

• Par conséquent, il apparaîtra comme l'image ci-dessous.

⇒ Étape 4 : Vérifiez les résultats de l'aperçu

• Cliquez sur le Résultats préliminaires pour voir l'aperçu final avant d'envoyer l'e-mail.
• La capture d'écran ci-dessous montre à quoi ressemblera un exemple d'e-mail.

⇒ Étape 5 : Fusionner les courriels

• Pour fusionner les e-mails, cliquez sur le bouton Terminer & ; Fusionner option.
• Pour ouvrir le Fusionner vers l'e-mail sélectionnez le Envoyer des messages électroniques option.

• Dans la case À, sélectionnez le Courriel : option.
• Tapez l'objet de votre choix dans le champ Objet boîte.
• Le format du courrier sera HTML par défaut, vous n'avez donc pas besoin de le modifier.
• Dans l'option Envoyer les enregistrements, cliquez sur Tous .
• Enfin, cliquez sur OK pour envoyer les e-mails à plusieurs destinataires en même temps.

• Par conséquent, tous les courriels seront envoyés par l'intermédiaire de vos associés. Outlook Vérifiez votre Outlook option envoyée pour confirmer que les courriels ont été envoyés.

• Lorsque vous ouvrez un courriel envoyé, vous remarquerez que chaque champ est rempli avec les informations d'une personne spécifique.

Lire la suite : Comment envoyer automatiquement un courriel lorsque la condition est remplie dans Excel ?

Lectures similaires

• Comment envoyer une feuille de calcul Excel modifiable par courriel (3 méthodes rapides)
• [Résolu] : Le classeur partagé ne s'affiche pas dans Excel (avec des étapes faciles)
• Envoyer automatiquement un courriel de rappel à partir d'une feuille de calcul Excel en utilisant VBA
• Comment voir qui est dans un fichier Excel partagé (avec des étapes rapides)
• Comment activer le partage de classeur dans Excel

2. exécuter un code VBA pour envoyer des e-mails à partir de la sélection d'une plage

Avec les bénédictions de VBA vous pouvez créer un programme pour envoyer des courriels à partir d'un site Web. Excel Suivez les étapes décrites ci-dessous pour effectuer cette tâche.

⇒ Étape 1 : Créer un module

• Pour ouvrir le Macro VBA , appuyez sur Alt + F11 .
• Cliquez sur le Insérer onglet.
• Sélectionnez le Module pour créer l'option Module .

⇒ Étape 2 : Coller les codes VBA

• Dans le nouveau Module coller le texte suivant Code VBA .

 #If VBA7 And Win64 Then 'Ptr is used to change for operating 32 bit to 64 bit Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _ ByVal wnd As LongPtr, ByVal lpDirect As String, _ ByVal Parameters As String, ByVal File As String, ByVal Operation As String, _ ByVal nCmd As Long) As LongPtr #Else #End If Sub SendExcelListEMail() 'Declare the variables DimxMailAdd As String Dim xRegCode As String Dim xBody As String Dim xURLink As String Dim xRngCell As Range Dim xIntRg As Range Dim xSelectTxt As String Dim k As Integer Dim p As Double On Error Resume Next 'Select range select adddress xSelectTxt = ActiveWindow.RangeSelection.Address 'Create a Input box for the range selection Set xIntRg = Application.InputBox("Please Input Excel data range :","ExcelWIKI", xSelectTxt, , , , , 8) 'Appliquer la condition If pour spécifier les numéros de colonne pour l'opération If xIntRg Is Nothing Then Exit Sub If xIntRg.Columns.Count 3 Then 'Afficher le résultat dans une boîte de message si la condition n'est pas remplie MsgBox "Error with Region Selection, please confirm", , "ExcelWIKI" Exit Sub End If 'Appliquer la boucle For pour exécuter l'opération dans chaque ligne individuellement For k = 1 To xIntRg.Rows.Count' Recueillir l'adresse e-mail et la mettre dans la variable xMailAdd = xIntRg.Cells(k, 2) ' Donner un sujet pour l'e-mail xRegCode = "ExcelWIKI Registration No." ' Taper le corps de l'e-mail xBody = "" ' Insérer les noms avec la variable xIntRg xBody = xBody & ; "Greetings " & ; xIntRg.Cells(k, 1) & ; "," & ; vbCrLf & ; vbCrLf xBody = xBody & ; " Voici votre ExcelWIKI Registration No. " ' InsérerNuméro d'enregistrement avec la variable xIntRg xBody = xBody & ; xIntRg.Cells(k, 3).Text & ; "." & ; vbCrLf & ; vbCrLf xBody = xBody & ; "Nous sommes vraiment heureux de votre visite sur notre site, continuez à nous soutenir." & ; vbCrLf xBody = xBody & ; "ExcelWIKI Team" ' Définir les espaces avec (hex) xRegCode = Application.WorksheetFunction.Substitute(xRegCode, " ", "%20") xBody =Application.WorksheetFunction.Substitute(xBody, " ", "%20") ' Spécifier le remplacement des retours chariot par (hex) xBody = Application.WorksheetFunction.Substitute(xBody, vbCrLf, "%0D%0A") ' Générer le lien URL xURLink = "mailto :" & ; xMailAdd & ; "?subject=" & ; xRegCode & ; "&body=" & ; xBody ' Utiliser le lien pour commencer l'envoi de l'e-mail ShellExecute 0& ;, vbNullString, xURLink, vbNullString,vbNullString, vbNormalFocus ' intervalle de trois secondes pour l'envoi des frappes Application.Wait (Now + TimeValue("0:00:03")) Application.SendKeys "%s" Next End Sub 

⇒ Étape 3 : Exécuter le programme

• Appuyez sur F5 pour exécuter le programme.
• Sélectionnez la plage dans le champ de saisie.
• Cliquez sur OK pour envoyer les e-mails.

• En conséquence, des aperçus d'envoi d'e-mails apparaîtront, comme le montre l'image ci-dessous.

• Enfin, vous pouvez vérifier les courriels envoyés pour confirmation.

Lire la suite : Comment envoyer un courriel si les conditions sont remplies dans Excel (3 méthodes faciles)

Conclusion

J'espère que cet article vous a donné un tutoriel sur la façon d'envoyer des courriels de masse à partir d'un site Web. Excel Toutes ces procédures doivent être apprises et appliquées à votre ensemble de données. Jetez un coup d'œil au cahier d'exercices et mettez ces compétences à l'épreuve. Nous sommes motivés pour continuer à créer des tutoriels comme celui-ci grâce à votre précieux soutien.

N'hésitez pas à nous contacter si vous avez des questions ou à laisser vos commentaires dans la section ci-dessous.

Nous, les Exceldemy sont toujours à l'écoute de vos demandes.

Restez avec nous et continuez à apprendre.