Auto BCC from Outlook - easy code to create macro for free

Jun 05, 2013 - by Ian Hasell

I came across an easy method to auto BCC from Outlook today. Should work with all versions of Outlook from 2003 to 2010 but below instructions relate to Outlook 2007. Menu options may vary slightly for other versions.

Use the following code:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)    Dim objMe As Recipient
    Set objMe = Item.Recipients.Add("youremailaddress@whatever.com")
    objMe.Type = olBCC
    objMe.Resolve
    Set objMe = Nothing
End Sub

Open Outlook and hit Alt+F11. Copy and paste the code and of course change the email address as approproate. Save and close the macro window.

Now it is necessary to 'Digitally Sign a Macro Project'.

In Windows go through the Start Menu and within the Microsoft Office folders open up 'Microsoft Office Tools'. Choose 'Digital Certificate for VBA Projects'. Type in an appropriate, descriptive name for your certificate in the 'Your certificate's name' field, and close.

In Outlook go to the Tools menu > Macros > Security and change the level to 'Warning for all macros' and press 'OK'.

Hit Alt+F11 again then navigate to Tools > Digital Signature. Click on 'choose' and select the digital signature that you created.

Restart Oulook.

Upon opening Outlook it will prompt you about the new Macro, so say Yes. And its done.