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 cci automatiquement tous les emails que vous envoyez dans Outlook?

Lorsque vous envoyez un e-mail et que vous disposez d'un destinataire secret permanent, mais que vous ne souhaitez pas que les autres destinataires voient son adresse, vous devez utiliser la fonction bcc. Mais quand nous avons besoin de Cci, nous devons montrer manuellement le champ Cci et sélectionner un contact pour cela. Pour éviter ces opérations manuelles, l'article suivant vous montrera comment modifier outlook pour automatiquement cci une adresse e-mail sur tous les e-mails que vous envoyez.

Bcc automatique par défaut dans Outlook en utilisant VBA

Auto bcc dans Outlook en utilisant Kutools pour Outlook

Auto Cc ou Bcc tous les e-mails sortants à des destinataires spécifiés (moi-même) dans Outlook

Fourni par Kutools pour Outlook, fonction Auto CC / BCC. Cliquez pour un essai gratuit de 60 jours sans limitation!
auto cc à moi-même

Onglet Office - Activer l'édition et la navigation par onglets dans Office, et simplifier considérablement le travail ...
Kutools for Outlook - apporte de puissantes fonctionnalités avancées 100 à Microsoft Outlook
  • CC automatique / BCC par les règles lors de l'envoi d'email; Transfert automatique Emails multiples par règles; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse de messagerie est dans la liste BCC; Rappeler lorsque des pièces jointes sont manquantes, et plus encore, rappelle les fonctionnalités ...
  • Répondre (tous) avec toutes les pièces jointes dans la conversation par courrier; Répondez plusieurs courriels à la fois; Ajout automatique de message d'accueil quand répondez; Ajout automatique Date et heure dans le sujet ...
  • Outils de fixation: Détacher automatiquement, tout compresser, tout renommer, tout enregistrer automatiquement ... Rapport rapide, Compter les messages sélectionnés, Supprimer les e-mails et les contacts en double ...
  • Plus que les fonctionnalités avancées de 100 résoudre la plupart de vos problèmes dans Outlook 2010-2019 et 365. Fonctionnalités complètes Essai gratuit du jour 60.

flèche bleue droite bulle Bcc automatique par défaut dans Outlook en utilisant VBA

Vous pouvez appliquer le code VBA ci-dessous pour configurer la règle Bcc automatique dans Outlook. S'il vous plaît faites comme suit:

1. appuie sur le autre + F11 clés simultanément pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

2. Double-cliquez sur le ThisOutlookSessiondans le volet Projet, puis collez sous le code VBA dans la fenêtre d'ouverture. Voir la capture d'écran ci-dessous

Code VBA: Auto bcc lors de l'envoi de tous les emails

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objRecip As Recipient
    Dim strMsg As String
    Dim res As Integer
    Dim strBcc As String
    On Error Resume Next
    
    ' #### USER OPTIONS ####
    ' address for Bcc -- must be SMTP address or resolvable
    ' to a name in the address book
    strBcc = "SomeEmailAddress@domain.com"
    
    Set objRecip = Item.Recipients.Add(strBcc)
    objRecip.Type = olBCC
    If Not objRecip.Resolve Then
        strMsg = "Could not resolve the Bcc recipient. " & _
                 "Do you want still to send the message?"
        res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _
                 "Could Not Resolve Bcc Recipient")
        If res = vbNo Then
            Cancel = True
        End If
    End If
    
    Set objRecip = Nothing
End Sub

Veuillez noter que : S'il vous plaît remplacer le "SomeEmailAddress@domain.com" dans le code ci-dessus avec l'adresse e-mail que vous allez recevoir.

3. Enregistrez le code VBA et fermez la fenêtre Microsoft Visual Basic pour Applications.

A partir de maintenant, vous n'avez pas besoin de remplir l'adresse dans le champ Cci. Lorsque vous envoyez un e-mail à partir de votre outlook, celui-ci est automatiquement envoyé à votre destinataire comme le code VBA est en cours d'exécution.


flèche bleue droite bulle Auto bcc dans Outlook en utilisant Kutools pour Outlook

Le code VBA ci-dessus est un peu difficile et gênant pour les débutants, voici un outil facile et rapideKutools for Outlook pour vous aider automatiquement bcc tous les e-mails ou les e-mails spécifiés que vous envoyez dans Outlook.

Après avoir installé Kutools pour Outlook, procédez comme suit:

1. Cliquez Kutools > CC automatique / BCC > Activer Auto CC / BCC (ou Gestionnaire automatique CC / BCC), voir capture d'écran:
doc auto bcc kto 1

2. Dans le Gestionnaire automatique CC / BCC boîte de dialogue, cliquez sur Nouveau bouton. Voir la capture d'écran ci-dessous

3. Dans la boîte de dialogue Auto CC / BCC d'ouverture, saisissez un nom pour cette nouvelle règle Bcc dans le Nom de la règle boîte, vérifiez la Tous les e-mails de sortie option dans la Filtre section, et cliquez sur Destinataires bouton. Voir capture d'écran ci-dessus:

4. Ensuite, vous pouvez entrer votre adresse e-mail que vous souhaitez ccc dans le Bcc -> zone de texte, ou vous pouvez sélectionner l'adresse que vous souhaitez bcc dans la liste et cliquez sur Bcc -> pour mettre l'adresse dans le champ correspondant, et cliquez sur OK bouton. Voir la capture d'écran ci-dessous

5. Et maintenant, il revient à la CC automatique / BCC boîte de dialogue, l'adresse spécifiée que vous souhaitez bcc a été insérée dans le Nom du destinataire CC / BCC boîte, s'il vous plaît cliquez sur le OK bouton pour enregistrer la configuration. Et puis cliquez sur le OK dans la boîte de dialogue Gestionnaire CC / Cci automatique. Voir la capture d'écran ci-dessous

Jusqu'à présent, la règle Cci a été créée, lorsque vous envoyez un e-mail, le même message sera envoyé au destinataire Cci en même temps, et cette règle est appliquée à tous les comptes de votre Outlook.

Remarques:
(1) Avec cette fonction, vous pouvez définir le toujours CC règles aussi bien.
(2) Vous pouvez créer plusieurs règles selon vos besoins en utilisant cet outil.
(3) Si vous voulez fermer les règles, vous pouvez cliquer sur Activer Auto CC / BCCet toutes les règles ne fonctionneront pas. Vous pouvez également décocher le nom des règles dans le Gestionnaire automatique CC / BCC boîte de dialogue pour désactiver certaines règles spécifiées.


flèche bleue droite bulleDémo: Auto BCC dans Outlook avec Kutools pour Outlook

Pointe: Dans cette vidéo, Kutools onglet est ajouté par Kutools for Outlook. Si vous en avez besoin, veuillez cliquer ici d'avoir un essai gratuit de 60 jours sans limitation!


flèche bleue droite bulleArticle connexe:

Comment automatiquement cc moi toujours dans Outlook?


Kutools for Outlook - Apporte les fonctionnalités avancées de 100 à Outlook et simplifie grandement le travail!

  • CC automatique / BCC par les règles lors de l'envoi d'email; Transfert automatique Emails multiples par coutume; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse mail est dans la liste BCC; Rappeler lorsque des pièces jointes sont manquantes, et plus encore, rappelle les fonctionnalités ...
  • Répondre (tous) avec toutes les pièces jointes dans la conversation par courrier; Répondre à beaucoup d'emails en secondes; Ajout automatique de message d'accueil quand répondez; Ajouter la date au sujet ...
  • Outils de pièce jointe: Gérer toutes les pièces jointes dans tous les courriers, Auto Detach, Compresser tout, Renommer tout, Sauvegarder tout ... Rapport rapide, Compter les mails sélectionnés...
  • Puissants courriers indésirables par la coutume; Supprimer les e-mails et les contacts en double... Vous permet de faire plus intelligemment, plus rapidement et mieux dans Outlook.
tir kutools perspectives onglet kutools 1180x121
tir kutools perspectives kutools plus onglet 1180x121
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.
    IT works but.. · 1 years ago
    How to set it up auto bcc to multiple email addresses?
    in outlook 2013 only had to add an additional line shown as below
    strBcc = "SomeEmailAddress1@domain.com"
    strBcc = "SomeEmailAddress2@domain.com"
    But outlook 2016 only took 2nd line to add onto bcc.
    • To post as a guest, your comment is unpublished.
      kellytte · 10 months ago
      Try Kutools for Outlook's Auto Bcc feature!
    • To post as a guest, your comment is unpublished.
      steve · 1 years ago
      same problem here, do u have a solution so far?
  • To post as a guest, your comment is unpublished.
    Ty · 1 years ago
    The VBA code works great. Thanks, but what if I want to bcc still, but only when sending to one specific email recipient?
  • To post as a guest, your comment is unpublished.
    Chris · 2 years ago
    Great job guyz.

    Thank you . Worked for Outlook 2016 .

    Wonder how can i check the From to Field in order to autobcc only from one account.

    BR
    Chris
  • To post as a guest, your comment is unpublished.
    Michael Z · 2 years ago
    Works great all day in Outlook 2010. Next day, it stopped working. I followed the instructions that SILUVIA ZHOU gave about macro security (without having to re-do the script) and it appears to work again.
  • To post as a guest, your comment is unpublished.
    Clement · 2 years ago
    Hi. Works great for my laptop and office PC but after using it for about 1 day, or sending about 20+ emails, this feature just doesn't work anymore on both my desktop and laptop.

    Anyone can help me out? I'm using outlook 2010 and 2013.

    Thanks!
  • To post as a guest, your comment is unpublished.
    Adhie Sastro Sadewo · 3 years ago
    Nice, very useful for me, Thanks
  • To post as a guest, your comment is unpublished.
    Andy · 3 years ago
    Hi guys,

    I have tried this code and whilst it does work, it only CC's and not BCC's. I only want emails that contain Ref, REF or ref in the subject line to be BCC'd.

    Is anyone able to check that I have it constructed correctly please?

    *******

    Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

    Dim Msg As Outlook.MailItem
    Dim onsMapi As Outlook.NameSpace
    Dim objRecip As Recipient
    Dim strMsg As String
    Dim res As Integer
    Dim strBcc As String

    If Item.Subject = "Ref" Then
    strBcc = "email@email.com"
    ElseIf Item.Subject = "ref" Then
    strBcc = "email@email.com"
    ElseIf Item.Subject = "REF" Then
    strBcc = "email@email.com"
    End If

    Set objRecip = Item.Recipients.Add(strBcc)

    objRecip.Type = olBCC

    If Not objRecip.Resolve Then
    strMsg = "Could not resolve the Bcc recipient. " & "Do you want still to send the message?"
    res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, "Could Not Resolve Bcc Recipient")
    If res = vbNo Then
    Cancel = True
    End If
    End If

    Set objRecip = Nothing

    End Sub
    • To post as a guest, your comment is unpublished.
      Joe · 2 years ago
      If the "ref" is the only thing in your subject, then it should work fine. Although I would make a few small changes. If you put "Option Compare Text" above your first line (outside the sub) then when you're doing the comparison for your "If" statement, upper and lower case letters will be considered the same. So ref=REF=Ref=rEf=REf, etc. Then you can simplify your conditional to:
      [quote]If Item.Subject = "ref" then strBcc = "email@email.com"[/quote]

      Personally, I would also add an [else strBcc = ""] just to cover your bases.

      Now, if you want to BCC emails that contain "ref" anywhere in the subject, you can try:
      [quote]If instr(Item.Subject,"ref",1) 0[/quote]

      The instr method searches the subject for "ref" and returns a number representing the character in the subject where "ref" starts. If it doesn't find "ref", it returns a 0. A disadvantage of using this method is that you may get some false positives (e.g. the subject contains the word "prefer").

      If you want all emails with subjects that start with "ref" with anything following it, then you can use the following:
      [quote]If instr(Item.Subject,"ref",1) = 1[/quote]

      This is the same as the last one, except instead of getting all emails whose subjects contain "ref" anywhere, you'll only get emails whose subjects contain "ref" that starts with the first character.
  • To post as a guest, your comment is unpublished.
    Keshav · 3 years ago
    Can we make this work with sent items that have attachments.
  • To post as a guest, your comment is unpublished.
    SONU RAJ · 3 years ago
    Bravo!!!! Working great
  • To post as a guest, your comment is unpublished.
    JMax · 3 years ago
    Works great but after the message sends I get an extra blank message that sits in my Outbox (sometimes it has the recipient's email address). So if I send 12 msgs, I see 12 msgs in my Sent box, but is there a way to eliminate the "ghost" message just sitting in the Outbox?
  • To post as a guest, your comment is unpublished.
    OD · 4 years ago
    Thank you mate. :lol:
  • To post as a guest, your comment is unpublished.
    Prabhat · 4 years ago
    hello,

    It works fine when i put code inside the outlook. after restarting MS2007
    it is not working. Please help me
  • To post as a guest, your comment is unpublished.
    pj · 4 years ago
    It works on my win7 and outlook2010, thank you.
  • To post as a guest, your comment is unpublished.
    zeyd88 · 4 years ago
    Thank you very much.It is very good)))
  • To post as a guest, your comment is unpublished.
    Mehdidd · 4 years ago
    if someone could write it in the ItemLoad event, that would be great !
    to actually see the BCC field filled
  • To post as a guest, your comment is unpublished.
    savy · 4 years ago
    how can i use it for single account or profile?
  • To post as a guest, your comment is unpublished.
    Neil · 4 years ago
    Option 1 of using macro editor in outlook works perfect for me, just follow the instruction. I am using outlook 2013
  • To post as a guest, your comment is unpublished.
    Marc · 4 years ago
    Does anyone know a way to apply the auto bcc function to a SHARED mailbox? If you select as a filter 'custom' instead of 'All outting email', it seems that you can only select non-shared mailboxes...
  • To post as a guest, your comment is unpublished.
    SYNDenver · 5 years ago
    This macro works great in 2013 till I reboot. If I do not do anything after a reboot, it does not work, It works if I do the following after every reboot:
    I click on the developer, Visual Basic, close it,
    Then click on Macro Security, close it.

    Once I do this it works for the session. It stops again on reboot.
  • To post as a guest, your comment is unpublished.
    SYNDenver · 5 years ago
    This code works, except I find that I need to open the developer after every reboot. After a reboot, the macro does not work unless I click on developer, open the macro, close it, open the security, close it.

    Any Ideas?
  • To post as a guest, your comment is unpublished.
    Shahriar · 5 years ago
    hi,
    thanx its work nicely
    but my question is how can i use this auto BCC for multiple email, here you showed for only one email bcc, can i use this for multiple mail ?? if i can than how ?
  • To post as a guest, your comment is unpublished.
    SupremeAC · 5 years ago
    Hi there and thank you for the code. Works perfectly for me in Outlook 2013. I was wondering if there is a way to have it also work when replying to other people's mails. It seems to only work when I send a 'new' mail to someone?
  • To post as a guest, your comment is unpublished.
    Tony_Warren · 5 years ago
    Thanks.

    The autobcc works like a treat.
  • To post as a guest, your comment is unpublished.
    Kevin_Black · 5 years ago
    Hi There, I cannot get the code to work in Office2013.
    From the tools>>references menu do I need to activate any specific libraries?

    Thanks
    Kevin
  • To post as a guest, your comment is unpublished.
    Shep · 5 years ago
    Great post - really helped, the only problem is the bcc doesn't run when the mail isn't created from within Outlook - eg you right-click on a file from the desktop, send to, mailrecipient, or you click on the email file icon from within a program, and it doesn't bcc - can anyone help ?

    I also slightly modified the code, so that Outlook gives you choice whether or not to bcc the recipient.

    Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objRecip As Recipient
    Dim strMsg As String
    Dim res As Integer
    Dim strBcc As String
    Dim intresponse As Integer
    On Error Resume Next

    intresponse = MsgBox("Click Yes to share this email with QA, click No to keep it private", _
    vbYesNo + vbQuestion, _
    "Email Privacy")
    If intresponse = vbYes Then


    strBcc = "recipient@email.com"
    Set objRecip = Item.Recipients.Add(strBcc)
    objRecip.Type = olBCC

    If Not objRecip.Resolve Then
    strMsg = "Could not resolve the Bcc recipient. " & _
    "Do you want still to send the message?"
    res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _
    "Could Not Resolve Bcc Recipient")
    If res = vbNo Then
    Cancel = True
    End If



    End If

    End If



    End Sub
  • To post as a guest, your comment is unpublished.
    Marc · 5 years ago
    This was a very usefull post for me! I use gmail as a sort of backup for all my mail and this made it possible without people commenting on an added CC line (the only option Outlook provides as a default).
  • To post as a guest, your comment is unpublished.
    chris · 5 years ago
    Thanks for the instructions! How do i adjust this so that I can be BCC'd on all emails except to some specific email addresses or group of "@domain.com". Thanks!
  • To post as a guest, your comment is unpublished.
    Manjur Alam Bhuiyan · 5 years ago
    I face another Problem In MS office Outlook
    microsoft office outlook has encountered a problem and needs to close we are sorry for inconvenience
  • To post as a guest, your comment is unpublished.
    Manjur Alam Bhuiyan · 5 years ago
    i take help from ur site
  • To post as a guest, your comment is unpublished.
    Norbert Lars · 5 years ago
    hey,

    this VBA works nice, one question if i may ask

    is there a way to activate only to an account? for example i have 3 accounts on my compouter @yahoo, @hotmail, @gmail and i want only those sent from the @gmail account to be auto BCC but the rest to go normal

    what should be add to the script ?
    • To post as a guest, your comment is unpublished.
      Chris Cara · 5 years ago
      I am interested in this also.

      Thanks!
      • To post as a guest, your comment is unpublished.
        Harry · 5 years ago
        If you need to BCC back to some account just use Item.SendUsingAccount instead of fixed E-mail, in other words, use
        in line 10 the following:
        strBcc = Item.SendUsingAccount
        this string will find the account E-mail address which used for send and use it.
        Enjoy!
        • To post as a guest, your comment is unpublished.
          John · 4 years ago
          This would only work when you want to BCC the same email address from which you are sending email.
          What if you want to BCC different email addresses in different accounts?
          Account 1 :: 123@Gamil.com : BCC 123@abc.com
          Account 1 :: 123@Hotmail.com : BCC 123@def.com
          Account 1 :: 123@Yahoo.com : BCC 123@xyz.com
          • To post as a guest, your comment is unpublished.
            Joe · 2 years ago
            You could use conditional statements combined with the bit Harry provided to determine who to BCC. In this instance, I would use the Select Case statement:

            [quote]Select Case Item.SendUsingAccount
            Case "123@Gmail.com"
            strBcc = "123@abc.com"
            Case "123@Hotmail.com"
            strBcc = "123@def.com"
            Case "123@Yahoo.com"
            strBcc = "123@xyz.com"
            End Select[/quote]
  • To post as a guest, your comment is unpublished.
    Goups · 5 years ago
    When send the email, how i can remove the BCC from the send items, I want the Bcc to be hide in the send items.
    • To post as a guest, your comment is unpublished.
      karla123 · 5 years ago
      Hi, wondering if you found a solution to hide bcc from Sent Folder? I've been trying to do so but to no avail. Any help will be appreciated. Thanks!
      • To post as a guest, your comment is unpublished.
        Faraz · 3 years ago
        Hi

        I am also looking for the same solution, plz help me too.

        I want to automatically BCC all my emails to my personal email address via VBA code which is working fine. But when I go to sent items BCC field is visible to me, I want to hide it from myself as well so that even it is not visible to me.
        Can anyone please help on this with VBA code. Thanks
        Currently I am using the following code:
        Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) Dim objRecip As Recipient Dim strMsg As String Dim res As Integer Dim strBcc As String On Error Resume Next
        ' #### USER OPTIONS ####
        ' address for Bcc -- must be SMTP address or resolvable
        ' to a name in the address book
        strBcc = "privateemail@gmail.com"

        Set objRecip = Item.Recipients.Add(strBcc)
        objRecip.Type = olBCC
        If Not objRecip.Resolve Then
        strMsg = "Could not resolve the Bcc recipient. " & _
        "Do you want still to send the message?"
        res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _
        "Could Not Resolve Bcc Recipient")
        If res = vbNo Then
        Cancel = True
        End If
        End If

        Set objRecip = Nothing
        End Sub
      • To post as a guest, your comment is unpublished.
        Faraz · 3 years ago
        Hi

        I am also looking for the same solution

        I want to automatically BCC all my emails to my personal email address via VBA code which is working fine. But when I go to sent items BCC field is visible to me, I want to hide it from myself as well so that even it is not visible to me.
        Can anyone please help on this with VBA code. Thanks
        Currently I am using the following code:
        Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) Dim objRecip As Recipient Dim strMsg As String Dim res As Integer Dim strBcc As String On Error Resume Next
        ' #### USER OPTIONS ####
        ' address for Bcc -- must be SMTP address or resolvable
        ' to a name in the address book
        strBcc = "privateemail@gmail.com"

        Set objRecip = Item.Recipients.Add(strBcc)
        objRecip.Type = olBCC
        If Not objRecip.Resolve Then
        strMsg = "Could not resolve the Bcc recipient. " & _
        "Do you want still to send the message?"
        res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _
        "Could Not Resolve Bcc Recipient")
        If res = vbNo Then
        Cancel = True
        End If
        End If

        Set objRecip = Nothing
        End Sub
  • To post as a guest, your comment is unpublished.
    Steviej · 5 years ago
    VBA worked as advertised. Thank you.
  • To post as a guest, your comment is unpublished.
    Karen · 5 years ago
    Worked fine with Outlook 2013 but came up with a compile error in 2007
  • To post as a guest, your comment is unpublished.
    Harry · 6 years ago
    The macros starts but do nothing in Outlook 2010: If I put Stop to line 13 it opens VBA window and lets me run macros step-by-step... but when macros finishes I see no any leters. Looks like it send letter before BCC added.
  • To post as a guest, your comment is unpublished.
    Leisha · 6 years ago
    hello,

    I did the instructions for outlook 2007 and it didn't work :/ any tips?
  • To post as a guest, your comment is unpublished.
    Chris · 6 years ago
    It works great but is there a way to do this with multiple bcc?
    • To post as a guest, your comment is unpublished.
      Rory · 4 years ago
      [quote name="Chris"]It works great but is there a way to do this with multiple bcc?[/quote]

      So, since it calls the method Item.Recipients.Add(strBcc) to add another recipient the program treats whatever string you provide as a single email address. The trick is simply to call the same method again in the same fashion for a second variable.

      E.g.
      strBcc = "email1@email.com"

      strBcc2 = "email2@email.com"

      Set objRecip = Item.Recipients.Add(strBcc)
      objRecip.Type = olBCC

      Set objRecip = Item.Recipients.Add(strBcc2)
      objRecip.Type = olBCC


      I'm no vba expert so not sure what the Set objRecip part does at all... but the above works for me.
      • To post as a guest, your comment is unpublished.
        Jeremy · 2 years ago
        I've tried your suggestion but it show error message "the operation failed. The messaging interfaces have returned an unknown error. If the problem persist, restart Outlook. Cannot resolve recipient.", any suggestion?
  • To post as a guest, your comment is unpublished.
    manjur · 6 years ago
    i take help from ur site
    thanks
  • To post as a guest, your comment is unpublished.
    Kitkat · 6 years ago
    Hi, this doesn't seem to work on Outlook 2013. Can you create another code for that version?

    Thanks!
    • To post as a guest, your comment is unpublished.
      siluvia zhou · 6 years ago
      Dear Kitkat,
      This code also works on Outlook 2013.
      After saving the code, please do as follows:
      1. Go to the [b]Developer[/b] tab, and click [b]Macro Security[/b].
      2. In the popping up [b]Trust Center[/b] dialog, select the [b]Enable all macros (not recommended; potentially dangerous code can run)[/b] option in the Macro Settings section. Then click [b]OK[/b].
      3. Now, close your Outlook 2013 application and then restart it, the code will work. :-)