Outlook 2003-2010 automatic BCC guide

This guide will show you how to automatically BCC (blind carbon copy) to an email address all the email that you send. This means that every email that you send using Outlook will also get copied to an email address of your choosing without the persons in the To or CC boxes ever noticing this. Whether you need to archive emails or you want to track an email address this method is guaranteed to work. I have personally tried this with Outlook 2003, Outlook 2007 and Outlook 2010 and it worked without problems. In order to achieve this you should perform the following steps:

  1. Locate the Digital Certificates for VBA Projects wizzard. You can reach it by going to the Start menu – Programs – Microsoft Office  – Microsoft Office Tools. Create a digital certificate for Outlook Macros
  2.  Type a name for your certificate and hit Save.  Close the window.
  3. Open Microsoft Outlook.
  4. Press Alt-F11 to open the Visual Basic editor. You can alternately go to the Tools menu, then press MacroCreate an auto BCC macro for Outlook 2010
  5. In the window that has just opened navigate to ThisOutlookSession and on the right pane select Application and ItemSend respectively.
  6. Copy the following script while being careful not to duplicate the first and last line:

 

 

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 = “sample-email@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

 

 

7      Replace the sample email address with the address of choice.

8      Go to Tools - Digital Signature in order to apply the digital signature (certificate) that you’ve just created. Click on Choose, select your Certificate and hit OK twice. Digitally sign an auto BCC macro for Outlook 2007

9      Click the Save and close the window. Choose Digital Certificate - Automatically BCC Outlook

10   Restart Outlook, agree to saving and everything should be OK.

Bookmark and Share

Tags: , , , ,

Leave a Reply