Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment envoyer des emails de masse personnalisés à une liste d'Excel via Outlook?

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

doc envoyer des emails personnalisés 1

Envoyer des e-mails de masse personnalisés à une liste à partir d'Excel avec la fonction de fusion et publipostage

Envoyer des courriels de masse personnalisés à une liste d'Excel avec le code VBA

Envoyer des emails de masse personnalisés à une liste avec différentes pièces jointes en utilisant Kutools for Excel


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

Avec Kutools for Excel's Envoyer des emails fonction, vous pouvez envoyer rapidement des courriers électroniques personnalisés à plusieurs destinataires avec différentes pièces jointes à partir d’Excel via Outlook selon vos besoins. Dans le même temps, vous pouvez également CC ou Cci les messages adressés à une personne spécifique. Télécharger et tester gratuitement Kutools for Excel maintenant!

doc envoyer des emails personnalisés 18 1


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


Avec les mots Publipostage fonction, vous pouvez terminer ce travail rapidement et facilement, s'il vous plaît faire avec les étapes suivantes:

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

doc envoyer des emails personnalisés 2

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

doc envoyer des emails personnalisés 3

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

doc envoyer des emails personnalisés 4

4. Et le document principal de 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ù l'information unique apparaîtra 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é «».

doc envoyer des emails personnalisés 5

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

doc envoyer des emails personnalisés 6

5. Après avoir composé le message, vous pouvez cliquer Résultats de l'aperçu sous le Mailing onglet pour prévisualiser les 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 destinataires séparés, cliquez sur Mailings > Terminer et fusionner > Envoyer un message électronique, voir capture d'écran:

doc envoyer des emails personnalisés 7

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

(1.) De la À liste déroulante, s'il vous plaît choisir Adresse e-mail colonne;

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

(3.) De la Envoyer des enregistrements section, sélectionnez Tous.

doc envoyer des emails personnalisés 8

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


flèche bleue droite bulle Envoyer des courriels de masse personnalisés à une liste d'Excel avec le code VBA

Excepté la fonction Fusion et publipostage, le code VBA suivant peut également vous faire une faveur, s'il vous plaît faites comme ceci:

1. Maintenez le ALT + F11 clés, et il ouvre la 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 emails 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 emails personnalisés 9

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

Note: Dans le code ci-dessus, vous pouvez modifier le sujet ou le corps du message à votre besoin.


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

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

Kutools for Excel : avec plus de 300 compléments Excel pratiques, libre d'essayer sans limitation dans 60 jours.

Après l'installation de Kutools for Excel, faites comme ceci:

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

doc envoyer des emails personnalisés 9

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

doc envoyer des emails personnalisés 9

3. Dans la zone d'édition, insérez les noms des messages d'accueil individuels, choisissez 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 emails personnalisés 9

4. Puis tapez votre corps de message dans la boîte comme vous avez besoin, voir capture d'écran:

doc envoyer des emails personnalisés 9

5. Après avoir terminé le corps de l'e-mail, s'il vous plaît choisir le mode d'envoi que vous voulez, vous pouvez envoyer en utilisant Outlook ou votre serveur spécifié, voir screesnhot:

doc envoyer des emails personnalisés 9

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

doc envoyer des emails personnalisés 9

6. Enfin, cliquez Envoyer 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 emails personnalisés 9

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


Demo: Envoyer des emails de masse personnalisés à une liste d'Excel via Outlook

Kutools for Excel: avec plus que 200 compléments Excel pratiques, libre d'essayer sans limitation dans les jours 60. Téléchargez et essai gratuit maintenant!


Article connexe:

Comment envoyer un email à plusieurs destinataires dans une liste d'Excel via Outlook?


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 emails ...
  • Super Formula Bar (éditez facilement plusieurs lignes de texte et de formule); Disposition de lecture (facilement lire et éditer un grand nombre de cellules); Coller à la gamme filtrée...
  • Fusionner les cellules / rangées / colonnes sans perdre de données; Contenu des cellules divisées; Combiner les lignes / colonnes en double... Prévenir les cellules en double; Comparer les plages...
  • Sélectionnez Dupliquer ou Unique Des rangées; Sélectionnez les lignes vierges (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux cahiers d'exercices; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de la formule; Créer automatiquement des références à plusieurs feuilles; Insérer des balles, Cases à cocher et plus ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre contenu de cellules et commentaires...
  • 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 en gras, en italique ...
  • Combinaison de classeurs et de feuilles de calcul; Fusionner les tables en fonction des colonnes clés; Fractionner les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF...
  • Plus que de puissantes fonctionnalités 300. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Fonctionnalités complètes Essai gratuit du jour 30.
kte tab 201905

Office Tab apporte une interface à onglets à Office et simplifie grandement votre travail

  • Activer l'édition par onglets et la lecture 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 le nombre de clics de souris pour vous chaque jour!
fond officetab
Say something here...
symbols left.
You are guest ( Sign Up? )
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.
    Raunak · 17 days 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.
    Joshua Nichols · 2 months 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 · 3 months 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 · 4 months 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 · 5 months 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 · 1 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 · 1 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 · 1 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 · 1 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 · 1 years ago
      I want to know how to make it. Can you tell me?
    • To post as a guest, your comment is unpublished.
      Pulkit · 1 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.
    surajit sen · 1 years ago
    how to cc people in this?
  • To post as a guest, your comment is unpublished.
    Arvind Jadhav · 1 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 · 1 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.
        Arvind Jadhav · 1 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.
          Arvind Jadhav · 1 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 · 1 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 · 1 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.
    jimmi_10 · 1 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 · 2 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 · 2 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 · 2 years ago
    how to add cc in the above code
  • To post as a guest, your comment is unpublished.
    Rick · 2 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.
    Wahid Prince · 2 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 · 2 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