Note: The other languages of the website are Google-translated. Back to English
Se connecter  \/ 
x
or
x
INSCRIPTION  \/ 
x

or

Comment envoyer des e-mails de masse personnalisés à une liste depuis Excel via Outlook?

Par exemple, j'ai la plage de données suivante dans une feuille de calcul qui contient les colonnes Nom, Adresse e-mail, Code d'enregistrement, et maintenant, je souhaite envoyer un message avec un message d'accueil personnalisé et leur propre code d'enregistrement aux adresses e-mail séparées dans la colonne A. Pour résoudre ce problème, les méthodes suivantes peuvent vous aider.

doc envoyer des e-mails personnalisés 1

Envoyez des e-mails de masse personnalisés à une liste d'Excel avec la fonction de publipostage

Envoyez des e-mails de masse personnalisés à une liste d'Excel avec le code VBA

Envoyez des e-mails de masse personnalisés à une liste avec différentes pièces jointes en utilisant Kutools for Excel


flèche bleue bulle droite Envoyez des e-mails de masse personnalisés à une liste d'Excel avec la fonction de publipostage

Avec les mots Publipostage fonction, vous pouvez terminer ce travail rapidement et facilement, veuillez suivre étape par étape:

1. Lancez un nouveau document Word vierge, puis cliquez sur Mailings > Sélectionner les destinataires > Utiliser une liste existante, voir capture d'écran:

doc envoyer des e-mails personnalisés 2

2. Dans le Sélectionnez la source de données fenêtre, choisissez le classeur qui comprend la plage de données que vous souhaitez utiliser, puis cliquez sur Ouvert bouton, voir capture d'écran:

doc envoyer des e-mails personnalisés 3

3. À venir Sélectionner une table boîte de dialogue, veuillez choisir la feuille de calcul avec la plage de données dont vous avez besoin, puis cliquez sur OK bouton, voir capture d'écran:

doc envoyer des e-mails personnalisés 4

4. Et le document principal du message électronique et votre liste d'adresses ont été connectés ensemble, maintenant, vous pouvez modifier le message texte et ajouter des espaces réservés qui indiquent où les informations uniques apparaîtront dans chaque message.

(1.) Pour insérer leur nom de message d'accueil individuel, cliquez sur Mailings > Insérer un champ de fusion > Nom, le nom personnalisé a été inséré dans le message et le nom du champ est entouré de «».

doc envoyer des e-mails personnalisés 5

(2.) Continuez à taper votre message et insérez le Code d'enregistrement à l'endroit où vous avez besoin, voir capture d'écran:

doc envoyer des e-mails personnalisés 6

5. Après avoir rédigé le message, vous pouvez cliquer sur Résultats de l'aperçu sous le Mailing onglet pour afficher un aperçu des messages électroniques et apporter des modifications avant de terminer la fusion.

6. Après vous être assuré qu'il n'y a pas de problème, vous pouvez envoyer les e-mails aux différents destinataires, veuillez cliquer sur Mailings > Terminer et fusionner > Envoyer un message électronique, voir capture d'écran:

doc envoyer des e-mails personnalisés 7

7. Puis dans le sauté Fusionner avec un e-mail boîte de dialogue, effectuez les opérations suivantes:

(1.) Du À liste déroulante, veuillez choisir Adresse e-mail colonne;

(2.) Vous pouvez saisir le sujet dans le Titre zone de texte de ligne;

(3.) Du Envoyer des enregistrements section, sélectionnez Voir Tout.

doc envoyer des e-mails personnalisés 8

8. Et puis cliquez OK, les e-mails sont envoyés à des destinataires séparés avec leur propre code d'enregistrement à la fois, après l'envoi des e-mails, vous pouvez accéder à votre Outlook pour vous assurer que les e-mails ont été envoyés avec succès.


Envoyez des e-mails personnalisés à plusieurs destinataires avec différentes pièces jointes:

Avec Kutools pour Excel's Envoyer des emails fonctionnalité, vous pouvez rapidement envoyer des e-mails personnalisés à plusieurs destinataires avec différentes pièces jointes d'Excel via Outlook selon vos besoins. Dans le même temps, vous pouvez également CC ou Cci les messages à une personne spécifique.       Téléchargez et essayez gratuitement Kutools for Excel Now!

doc envoyer des e-mails personnalisés 18 1


flèche bleue bulle droite Envoyez des e-mails de masse personnalisés à une liste d'Excel avec le code VBA

À l'exception de la fonction de publipostage, le code VBA suivant peut également vous rendre service, procédez comme suit:

1. Maintenez le ALT + F11 clés, et il ouvre le Microsoft Visual Basic pour applications fenêtre.

2. Cliquez insérer > Moduleet collez le code suivant dans le Module Fenêtre.

Code VBA: Envoyez des e-mails de masse personnalisés à une liste depuis Excel:

#If VBA7 And Win64 Then
    Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
                         ByVal hwnd As LongPtr, ByVal lpOperation As String, _
                         ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
                         ByVal nShowCmd As Long) As LongPtr
#Else
    Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
                         ByVal hwnd As Long, ByVal lpOperation As String, _
                         ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
                         ByVal nShowCmd As Long) As Long
#End If
Sub SendEMail()
'update by Extendoffice 20160506
    Dim xEmail As String
    Dim xSubj As String
    Dim xMsg As String
    Dim xURL As String
    Dim i As Integer
    Dim k As Double
    Dim xCell As Range
    Dim xRg As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Columns.Count <> 3 Then
        MsgBox " Regional format error, please check", , "Kutools for Excel"
        Exit Sub
    End If
    For i = 1 To xRg.Rows.Count
'       Get the email address
        xEmail = xRg.Cells(i, 2)
'       Message subject
        xSubj = "Your Registration Code"
'       Compose the message
        xMsg = ""
        xMsg = xMsg & "Dear " & xRg.Cells(i, 1) & "," & vbCrLf & vbCrLf
        xMsg = xMsg & " This is your Registration Code "
        xMsg = xMsg & xRg.Cells(i, 3).Text & "." & vbCrLf & vbCrLf
        xMsg = xMsg & " please try it, and glad to get your feedback! " & vbCrLf
        xMsg = xMsg & "Skyyang"
'       Replace spaces with %20 (hex)
        xSubj = Application.WorksheetFunction.Substitute(xSubj, " ", "%20")
        xMsg = Application.WorksheetFunction.Substitute(xMsg, " ", "%20")
'       Replace carriage returns with %0D%0A (hex)
        xMsg = Application.WorksheetFunction.Substitute(xMsg, vbCrLf, "%0D%0A")
'       Create the URL
        xURL = "mailto:" & xEmail & "?subject=" & xSubj & "&body=" & xMsg
'       Execute the URL (start the email client)
        ShellExecute 0&, vbNullString, xURL, vbNullString, vbNullString, vbNormalFocus
'       Wait two seconds before sending keystrokes
        Application.Wait (Now + TimeValue("0:00:02"))
        Application.SendKeys "%s"
    Next
End Sub

3. Puis appuyez F5 clé pour exécuter ce code, et une boîte de dialogue apparaîtra pour vous rappeler de sélectionner la plage de données que vous souhaitez utiliser, voir capture d'écran:

doc envoyer des e-mails personnalisés 9

4. Et puis cliquez OK bouton, les e-mails seront envoyés à des adresses séparées avec leur code d'enregistrement individuel un par un, après l'envoi des e-mails, vous pouvez accéder à votre Outlook pour vous assurer que les e-mails ont été envoyés avec succès.

Notes: Dans le code ci-dessus, vous pouvez modifier l'objet ou le corps du message selon vos besoins.


flèche bleue bulle droite Envoyez des e-mails de masse personnalisés à une liste avec différentes pièces jointes en utilisant Kutools for Excel

Si vous avez Kutools pour Excel, Avec son Envoyer des emails fonctionnalité, vous pouvez rapidement envoyer des e-mails personnalisés à plusieurs destinataires avec différentes pièces jointes selon vos besoins.

Kutools pour Excel : avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation en 30 jours. 

Après l'installation de Kutools pour Excel, veuillez faire comme ceci:

1. Cliquez Kutools Plus > Envoyer des emails, voir capture d'écran:

2. Dans le Envoyer des e-mails boîte de dialogue, veuillez sélectionner la plage de données que vous souhaitez utiliser, puis spécifiez les adresses des destinataires, les pièces jointes et le sujet selon vos besoins, voir capture d'écran:

doc envoyer des e-mails personnalisés 9

3. Dans la zone d'édition, insérez les noms de salutation individuels, veuillez choisir Nom dans la liste déroulante, puis cliquez sur Insérer un espace réservé pour insérer les noms dans le message, voir capture d'écran:

doc envoyer des e-mails personnalisés 9

4. Tapez ensuite le corps de votre message dans la zone selon vos besoins, voir capture d'écran:

doc envoyer des e-mails personnalisés 9

5. Après avoir terminé le corps de l'e-mail, veuillez choisir le mode d'envoi comme vous le souhaitez, vous pouvez envoyer en utilisant Outlook ou votre serveur spécifié, voir screesnhot:

doc envoyer des e-mails personnalisés 9

Notes: Si vous souhaitez utiliser un autre serveur, cliquez sur Paramètres du serveur sortant pour définir le mode d'envoi sur le vôtre, voir screesnhot:

doc envoyer des e-mails personnalisés 9

6. Enfin, cliquez Envoyez bouton pour envoyer les e-mails, après avoir terminé, une boîte de dialogue apparaîtra pour vous rappeler l'état d'envoi. voir screesnhot:

doc envoyer des e-mails personnalisés 9

Cliquez sur Télécharger et essayer gratuitement Kutools for Excel Now!


Démo: envoyer des e-mails de masse personnalisés à une liste à partir d'Excel via Outlook

Kutools pour Excel: avec plus de 300 compléments Excel pratiques, essai gratuit sans limitation dans 30 jours. Téléchargez et essayez gratuitement maintenant!

Article connexe:

Comment envoyer un e-mail à plusieurs destinataires dans une liste depuis Excel via Outlook?


Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

  • Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtrée...
  • Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammes...
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellules...
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF...
  • Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.
onglet kte 201905

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

  • Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
bas de cabine
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Pilar · 2 months ago
    Thanks for the "How To Send Personalized Mass Emails To A List From Excel Via Outlook?", it is very useful.
    Question: I have 2 email addresses on my outlook. I want to use the 2nd one to send the personalized mass emails. How should I do that? I cannot find the way of changing the "From" when I finish&Merge. Can you help?

    • To post as a guest, your comment is unpublished.
      skyyang · 2 months ago
      Hello, Pilar,
      The normal Mail Merge function only can help to send the emials from the default account, if you want to send eamils from other account you defined, you can use our Send Emails feature of Kutools for Excel. You can download and installed the Kutools for Excel, free trial 30 days.
      Please try, hope it can help you!

  • To post as a guest, your comment is unpublished.
    Gopalakrishnan · 1 years ago

    Could you please help me to include table structure in below code ?

    Gopalakrishnan

  • To post as a guest, your comment is unpublished.
    marian · 1 years ago
    I used the kutools send mail option after sending mail theres no attachment
    • To post as a guest, your comment is unpublished.
      skyyang · 1 years ago
      Hi, marian,
      Do you type the full path of the attachments into the cells? Please check it. Thank you!

      • To post as a guest, your comment is unpublished.
        MARIAN · 1 years ago
        No I didn't type the path rather I used the insert link button to add the attachment
  • To post as a guest, your comment is unpublished.
    Ankit · 1 years ago
    Hi,
    I have to send to one email address(BOT) multiple request for *documents.

    * Subject line needs to be the document reference number as demonstrated in below table.

    Email ID Subject
    mymail@gmail.com # policy 111
    mymail@gmail.com # policy 222
    mymail@gmail.com # policy 333
    mymail@gmail.com # policy 444
    mymail@gmail.com # policy 555
    mymail@gmail.com # policy 666
    mymail@gmail.com # policy 777
    mymail@gmail.com # policy 888
    mymail@gmail.com # policy 999
    mymail@gmail.com # policy 1110

    please help me simplyfy my task. I use MS outlook 2013 and 2016
  • To post as a guest, your comment is unpublished.
    Ankit K · 1 years ago
    Email ID Subject
    mymail@gmail.com # policy 111
    mymail@gmail.com # policy 222
    mymail@gmail.com # policy 333
    mymail@gmail.com # policy 444
    mymail@gmail.com # policy 555
    mymail@gmail.com # policy 666
    mymail@gmail.com # policy 777
    mymail@gmail.com # policy 888
    mymail@gmail.com # policy 999
    mymail@gmail.com # policy 1110
  • To post as a guest, your comment is unpublished.
    Yashwanth Asandur · 1 years ago
    Sub SendEm()
    Dim i As Integer, Mail_Object, Email_Subject, o As Variant, lr As Long
    lr = Cells(Rows.Count, "A").End(xlUp).Row
    Set Mail_Object = CreateObject("Outlook.Application")
    For i = 2 To lr
    With Mail_Object.CreateItem(o)
    .Subject = Range("B" & i).Value
    .To = Range("A" & i).Value

    .Body = Range("C" & i).Value
    .attachments.Add (Sheets("Sheet1").Range("H" & i).Text)
    .attachments.Add (Sheets("Sheet1").Range("I" & i).Text)
    .attachments.Add (Sheets("Sheet1").Range("J" & i).Text)
    .attachments.Add (Sheets("Sheet1").Range("K" & i).Text)
    .Send

    '.display 'disable display and enable send to send automatically
    End With
    Next i
    MsgBox "E-mail successfully sent", 64
    Application.DisplayAlerts = False
    Set Mail_Object = Nothing
    End Sub
  • To post as a guest, your comment is unpublished.
    Yashwanth · 1 years ago
    Hi, I used below code. Its working fine but am not able to add my signature..! Can u guys help me on this..?

  • To post as a guest, your comment is unpublished.
    sam · 1 years ago
    Hi Skyyang,

    Thanks for the code - works a dream! Just wondering if you could advise how to format parts of the body (xMsg) as bold/highlighted.

    Thanks,

    Samuel
  • To post as a guest, your comment is unpublished.
    mr.shetalshah@gmail.com · 1 years ago
    Hi All!

    I have a list of emails in one sheet & the email draft in another.
    I need a code to automatically send the email draft from sheet 2 to every 5 members in the list provided in sheet 1.
    Once the first 5 are sent, the code should tag them as "Sent" in a new dedicated column & then wait for 60 seconds before sending out the next set of 5 emails.
    The code should run until the end of the entire list.

    The code can use outlook to send out the mails from the default profile in outlook.

    Please help.

    Let me know in case if you need any more clarifications
  • To post as a guest, your comment is unpublished.
    Raunak · 2 years ago
    I want to send the emails with unique subject line, how can I do that with this VBA?
  • To post as a guest, your comment is unpublished.
    joshuanichols909@gmail.com · 2 years ago
    I have use the aforementioned VBA code under "Send Personalized Mass Emails To A List From Excel with VBA Code". I wanted to know if I could send an email to certain individuals who need notifying based upon excel telling me to send reminders to those who have upcoming expiring contracts? I cannot get excel to send out the emails and I know its because of the code itself. Can someone please help me resolve this issue?
  • To post as a guest, your comment is unpublished.
    Jeanyves · 2 years ago
    VBA code works well, thanks, but how to add Cc? I tried and failed...
  • To post as a guest, your comment is unpublished.
    chris · 2 years ago
    For some reason this code has it where it sends every other email in the list. Is there a reason why it won't send each one? I directly copied the code that was above and didn't change anything
  • To post as a guest, your comment is unpublished.
    Ilham · 2 years ago
    HIi admin


    apakah metode ini bisa di lakukan pada word 2007 soalnya saya coba lakukan di file pdf nya tdk terkirim .. terimakasih
  • To post as a guest, your comment is unpublished.
    hiba · 3 years ago
    I have a list of email addresses in excel that i need to send emails to The subject and body are in cells besides the email address and i have the script below but i need to send 100 emails per 1 hour how i can please your support

    Sub SendEm()
    Dim i As Integer, Mail_Object, Email_Subject, o As Variant, lr As Long
    lr = Cells(Rows.Count, "A").End(xlUp).Row
    Set Mail_Object = CreateObject("Outlook.Application")
    For i = 2 To lr
    With Mail_Object.CreateItem(o)
    .Subject = Range("B" & i).Value
    .To = Range("A" & i).Value

    .Body = Range("C" & i).Value
    .attachments.Add (Sheets("Sheet1").Range("H" & i).Text)
    .attachments.Add (Sheets("Sheet1").Range("I" & i).Text)
    .attachments.Add (Sheets("Sheet1").Range("J" & i).Text)
    .attachments.Add (Sheets("Sheet1").Range("K" & i).Text)
    .Send

    '.display 'disable display and enable send to send automatically
    End With
    Next i
    MsgBox "E-mail successfully sent", 64
    Application.DisplayAlerts = False
    Set Mail_Object = Nothing
    End Sub
    • To post as a guest, your comment is unpublished.
      skyyang · 3 years ago
      Hello, hiba,
      Our Kutools for Excel's Send Emails can help you to solve your problem. Please set the conditions as following screenshot shown:
      With this feature, you can also apply the CC, BCC feature, and you can insert multiple attachments as well.
  • To post as a guest, your comment is unpublished.
    Terrence · 3 years ago
    Thanks!!

    But I have trying to do the test and is nothing sending out to the emai. Also no error message.. May I know what happened?
  • To post as a guest, your comment is unpublished.
    steven · 3 years ago
    what if I have data for alot of customers and some customers have more then 1 data... and I dont want to send seperate mails to the customers, but maybe send it in a tabular format in the email. How can I send just 1 email to a customer.
    • To post as a guest, your comment is unpublished.
      Sally · 2 years ago
      I want to know how to make it. Can you tell me?
    • To post as a guest, your comment is unpublished.
      Pulkit · 3 years ago
      Hi Steven, did you find a way to get this done. We can help you with a simple online web portal
      • To post as a guest, your comment is unpublished.
        mungunbayar · 2 years ago
        Hi, Did you solve it?
  • To post as a guest, your comment is unpublished.
    ssen19002@gmail.com · 3 years ago
    how to cc people in this?
  • To post as a guest, your comment is unpublished.
    arnjadhav10@gmail.com · 3 years ago
    hi Skyyang,
    i need to attach different pdf file for each mail. can you help please??
    • To post as a guest, your comment is unpublished.
      skyyang · 3 years ago
      Hello, Arvind,
      The Kutools can help you to add multiple different attachments when sending emails.
      First you should insert the path of the attachments into the cells, and then apply the Kutools, please view the following screenshot:
      Hope it can help you, thank you!
      • To post as a guest, your comment is unpublished.
        arnjadhav10@gmail.com · 3 years ago
        hi Skyyang,
        i used your below code to send mail and is working perfect, is there anything you can help me to modify in code for sending pdf attachments along.
        i need to send more than 100 mails so is quit difficult to attach file each time. is Kutools work as per given path and send mail automatically?
        • To post as a guest, your comment is unpublished.
          arnjadhav10@gmail.com · 3 years ago
          hey,
          can you help me with attachment.add function? with your above VBA code i need to sent attachment.
          i cant use Kutools :(
  • To post as a guest, your comment is unpublished.
    Arvind · 3 years ago
    hi Friend,
    this is fantastic, need one help I need to attach different pdf file to different email each time.
    can anyone help me please?
  • To post as a guest, your comment is unpublished.
    Nagu · 3 years ago
    Madness post this is,this one is fake and don't believe this content
  • To post as a guest, your comment is unpublished.
    jamielovett10@gmail.com · 3 years ago
    Hi Skyyang,

    I've been trying and trying to get my email signature to come up but just can't seem to get it right! Do you have a bit of code I can add to make this happen?
  • To post as a guest, your comment is unpublished.
    Aziz · 3 years ago
    Great way

    I just need to ask you about the possibilityof changing the subject each time based on email??
    • To post as a guest, your comment is unpublished.
      skyyang · 3 years ago
      Hello, Aziz,
      When you apply the Kutools for Excel, it can help you to insert the subjects based on the cell values, you just need to select the subject column header in the dialog box as following screenshot shown:

      Please try it, hope it can help you!
  • To post as a guest, your comment is unpublished.
    Marlyon Claudius · 4 years ago
    how to add cc in the above code
  • To post as a guest, your comment is unpublished.
    Rick · 4 years ago
    is it possible to add code so that it also pulls in my normal email signature?

    also, when selecting my range to email, I have my excel spreadsheet filtered, but when I run the macro, it still pulls in the hidden rows as well.
    • To post as a guest, your comment is unpublished.
      Jamie · 3 years ago
      I'd like to know about this too!
  • To post as a guest, your comment is unpublished.
    Wahid Prince · 4 years ago
    Can you modify the code to attach multiple files in email? It would be a great help. Thanks in advance.
  • To post as a guest, your comment is unpublished.
    Luucas · 4 years ago
    This code worked very well, much thanks of that. But I just have a small problems, I am trying to change the code to pre-determine the cells I want to take the emails and send it because the way I created my excel file. I would like to switch the selection box for a determined array of cells. Example: fix all my data will be between A2:C6 so when I run the macro I do not need to select it again. Very Much Thank You for everything you explained above