Blog

23

By using the built-in rules in Outlook you can automatically CC an email address on outgoing messages (and even specify additional criteria like key words in subject lines, etc.), but there is no option to use BCC. This article will show how to modify Outlook to automatically BCC an email address on all outgoing messages.

There are probably several reasons in which you would want to automatically BCC and email address on all outgoing messages (archival purposes being one of them). In this instance, I needed a solution to perform an automatic BCC to a system email address for a pilot of the Trampoline Systems SONAR product. SONAR can consume your daily email traffic and use it to create connections to people and topics (sort of like an automatic FaceBook application. After some hunting around the internets, I happened upon this solution, which I'll explain further here.

Note: This method was tested on Outlook 2007, but should work on Outlook 2003 or later.

  • In Outlook, go to the Tools menu, Macro option, and select Visual Basic Editor.
  • In the Project listing (upper left box on the screen), expand Project1 (VbaProject.OTM) and within that expand Microsoft Office Outlook Objects.
  • Double-click the ThisOutlookSession project to open it. In most cases this is empty, unless you've already been modifying your copy of Outlook with macros and such.
  • In the code window that opens up, choose Application from the left most drop-down list box, and ItemSend from the other (it might automatically be selected for you).
  • You should be presented with something like this:
  • Copy and paste the following code after the Private Sub line and before the End Sub line:
    Visual Basic
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    
        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
    
    Note: Be sure to replace SomeEmailAddress@domain.com with your intended email address. To test your changes you may wish to temporarily it to a secondary email address (like a Gmail account), to make sure all is working correctly.
  • When you are done, it should look like this:

    You'll note that I have the intended email address set to the system account necessary for the SONAR product.
  • Save the VbaProject.OTM file, close the Visual Basic editor, return to Outlook, and start sending messages.

This should work for new messages as well as replies and forwarded messages. If you have any questions or comments, please comment on them here.

Posted in: Windows

Post Rating

Comments

Alex
# Alex
Thursday, May 07, 2009 4:13 AM
Don't work with Outlook 2003 :'(
Dáire
# Dáire
Wednesday, May 13, 2009 6:49 PM
Some good advice there, was wondering if there is a way to specify it to a particular email account if multiple accounts exist in Outlook?

Thanks,

Dáire
Ben
# Ben
Thursday, June 11, 2009 10:07 AM
Hi Michael,

This is exactly what I'm looking for, thanks!

However, I can't seem to get it to work...
I have followed your instructions exactly, here is a screenshot of the code:
http://www.georgesmusic.com/images/auto-bcc.jpg

Any ideas?

Also, what if I have Outlook receiving/sending from multiple accounts and I just want this function to BCC for one of them?

Thanks so much!

Ben
Shawn
# Shawn
Wednesday, July 01, 2009 12:34 PM
Any way to modify this so that a BCC is sent only when a message is sent to a specific recipient?
aaron
# aaron
Monday, August 03, 2009 4:22 PM
I have multiple e-mail accounts set up. Is there a way to make this run through the "Outlook Rules Wizard" so that this is only active when sending messages out on certian accounts?
Nick
# Nick
Wednesday, August 05, 2009 10:33 AM
Hi Thanks for the info. It worked out for the first time then doesnt work anymore for the next ones. Also it makes my .pst unaccessible. It is a clean install of office 2003 and win xp. Please hlep
Bruce
# Bruce
Monday, November 23, 2009 1:57 PM
I have set this up, but I still do not receive the bcc. Is there anything I have to turn on in my Outlook?

thanks
Bruce
# Bruce
Monday, November 23, 2009 3:38 PM
It doesn't seem to work for me. I made sure VBA was installed in the Microsoft options. Any thoughts?
Mina
# Mina
Friday, December 04, 2009 12:15 PM
This is great! Many thanks!

How can we have messages BCCed only if the "Subject" includes a specific string?

Thanks in advance!
Shula Cohen
# Shula Cohen
Tuesday, January 05, 2010 10:51 AM
Seems like it didn't survive a reboot of the PC. The file is still there, but the Bcc is not done.
Mark Byrum
Tuesday, January 05, 2010 12:12 PM
Excellent! Did it myself and did not have to purchase and download a program to do this for me for $29.95. It is a simple fix which Microsoft SHOULD HAVE INCLUDED in the Outlook options in the first place. Good Job!
Mark
Prince
# Prince
Thursday, January 14, 2010 1:29 PM
Thanks for the help. I was wondering how to change the coding so that it only applies to a specific account (email address). I am using outlook 2003.
ulf
# ulf
Tuesday, January 19, 2010 3:43 PM
hi Michael,

I tried your code but I dont seem to be able to get this to work i.e. the BCC field is never populated :( Any ideas?

reg//ulf
Grant Millar
# Grant Millar
Wednesday, January 20, 2010 3:28 AM
Excellent very easy, works a treat, thank you
Yu
# Yu
Wednesday, February 03, 2010 9:05 AM
I followed the steps and sent email, but the bcc doesn't work. Please help.
Vlady
# Vlady
Friday, February 12, 2010 3:13 PM
It did not work in my Windows 7 Outlook
Charmaine
# Charmaine
Tuesday, March 16, 2010 3:29 PM
Hey there,

This is great informtion - thank you! Do you have any idea how to still send all received and sent messages to an additional participant, but the email address should not display in the bcc field of the sent item?

Thanks!
Charmaine
Gary Sipos
# Gary Sipos
Wednesday, March 24, 2010 4:02 PM
If a person has more than one email account within Outlook, and if we want all the email messages to be BCC'ed from one email account and no email messages BCC'ed from the second email account, does the above code accommodate for this?

If not, do you have code that could accommodate for this?

Thanks for your kind consideration

Gary
joy
# joy
Saturday, April 10, 2010 8:29 PM
Hey, thanks for the instructions. I set this up and it worked once, but then when I closed and re-opened outlook, it stopped working. Any suggestions?
Okky
# Okky
Saturday, April 10, 2010 11:11 PM
Hi Mike,

Nice tips. It actually worked for my Outlook 2007 yesterday.
But after I shutdown my laptop and turn it on again, it stops working.
Do you have any idea what's going on?
I tried to put false email recipient on the strBcc, but the MsgBox won't show up.

Thanks in advance.
slakos
# slakos
Friday, April 16, 2010 9:29 AM
Thank you.
GG
# GG
Wednesday, April 28, 2010 6:25 AM
Hello,

Thus worked for me only once, since then my outgoing msgs arent going to the bcc address. Please help
ab
# ab
Wednesday, May 12, 2010 8:48 AM
It works perfectly. Thanks a lot.
Jeffrey Rodman
Monday, May 24, 2010 9:41 PM
Worked perfectly!

Awesome... thank you so much.

The only thing I was finding was add on software for a fee until I found your blog.
H
# H
Tuesday, June 08, 2010 7:05 AM
Hi, Not sure if your site is still updated but thought I would try a comment! :¬)

Thanks for your tutorial.

I've just tried your Outlook/BCC hack and all works fine until I restart Outlook. The code is still there but it no longer takes affect?!

Any ideas?
Thanks again...
furman
Friday, July 02, 2010 5:46 AM
Brilliant, done in minutes thanks a lot.
Majed
Monday, July 05, 2010 4:13 AM
It doesn't seem to work !
Rudy
# Rudy
Wednesday, July 21, 2010 9:41 AM
Adding an Automatic BCC to Outlook stopped working for me Jan 2010. Did an Outlook update stop this function?
Michael Kizer
Wednesday, July 21, 2010 3:24 PM
Note:
It has been brought to my attention that this may no longer work for unknown reasons (possibly a Microsoft security patch). I've confirmed that it no longer functions on my computer (WinXP with Outlook 2007).

Let me know via these comments if you have success or failure with this code.
Thanks.
MJ
# MJ
Wednesday, July 28, 2010 9:27 PM
This was working for me until yesterday, but I found this very similar code on a German website and it seems to be working.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim R As Outlook.Recipient
Dim Address$

Address = "abc@domain.com"

Set R = Item.Recipients.Add(Address)
R.Type = olBCC
R.Resolve
End Sub


http://www.vboffice.net/sample.html?mnu=2%E2%8C%A9=en&smp=77&cmd=showitem

Anyone who knows more about VBA see any reason not to use this?
Zoe
# Zoe
Wednesday, August 04, 2010 11:17 PM
Totally Wicked, well done. Thanks Heaps!

Took 3 min to install and another 3 to test, works like a dream. Exactly what i needed.

5 stars


Zoe
Jordan
# Jordan
Friday, August 06, 2010 2:26 PM
I can't seem to get this to work at all. Does anyone have a method that works with Windows 7 and Outlook 2007? I really need this for CRM tracking.

Thanks
Chris
# Chris
Tuesday, August 10, 2010 11:18 AM
For those having problems getting this to work:

Check Tools/Trust Center to see whether security is set not to execute macros.
jon silve
# jon silve
Thursday, August 12, 2010 11:35 AM
works fine, but i want it to apply to only 1 of 2 accounts in my outlook 2007.

can the code be adjusted to look for an account name or similar before jumping in to action?

thanks
Bob
# Bob
Tuesday, August 24, 2010 9:47 AM
Like a lot of other comments it worked yesterday but no longer works after rebooting ... although the code is still there in outlook.

Did anyone figure out how to fix?

thanks
mkizer
# mkizer
Tuesday, August 24, 2010 1:19 PM
I've been unable to get either my original code or the alternate code posted in the comments to work in Outlook 2007. My guess is that MS has blocked some of this functionality via a security patch to prevent malicious use.

If anyone dives into this issue and discovers more, post it here. Thanks!
Bruno
# Bruno
Monday, September 06, 2010 8:49 AM
It worked perfectly on Outlook 2010.
I use it for achive purpose!

Thanks a lot!
Jon
# Jon
Tuesday, September 07, 2010 8:18 PM
You have to sign the macro digitally to make it work.

Refer: http://www.hamz.me/how-to-auto-bcc-in-outlook-2007
Jann
# Jann
Thursday, September 09, 2010 10:12 AM
Keep up the good work.
carlos
# carlos
Monday, September 20, 2010 7:39 AM
Thank you Jon,
I had the same problem. It worked only one day!
But signing the macro digitally solved my problem:
( http://www.hamz.me/how-to-auto-bcc-in-outlook-2007 )
Ryan
Saturday, October 02, 2010 12:01 AM

Just the kind of sneaky hack I love. Good idea for keeping a private record of work emails. I sure hope nobody gets it in their mind to add this to their boss’ PC, oh no, that would be wrong!
Fred
Monday, October 11, 2010 7:10 AM
Thank you for the step by step process.. :)
Owain Maedel
Wednesday, October 20, 2010 3:31 AM
Hi All,
so i am trying to apply an Auto Bcc to my Outlook but i wanted to be asked after i send the msg if i really want to BCC the msg.
Im nearly there this is how far i got:

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

strMsg = "Do you want to BCC this message?"
res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, "BCC Message")
If res = vbNo Then
Cancel = True
End If
' #### USER OPTIONS ####
' address for Bcc -- must be SMTP address or resolvable
' to a name in the address book
strBcc = "your@mail.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

AutoBCC without being asked
not working at all with you?
Try this Link:
http://www.eggheadcafe.com/software/aspnet/35532484/applicationitemsend-not-firing-even-with-low-security.aspx

And this is where Im collecting some infos:
http://www.msxfaq.de/code/olkvba.htm

When the code is finished i will post here.

Best Owain
Owain Maedel
Wednesday, October 20, 2010 10:46 AM
Hi All,
so i am trying to apply an Auto Bcc to my Outlook but i wanted to be asked after i send the msg if i really want to BCC the msg.
Im nearly there this is how far i got:

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

strMsg = "Do you want to BCC this message?"
res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, "BCC Message")
If res = vbNo Then
Cancel = True
End If
' #### USER OPTIONS ####
' address for Bcc -- must be SMTP address or resolvable
' to a name in the address book
strBcc = "your@mail.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

AutoBCC without being asked
not working at all with you?
Try this Link:
http://www.eggheadcafe.com/software/aspnet/35532484/applicationitemsend-not-firing-even-with-low-security.aspx

And this is where Im collecting some infos:
http://www.msxfaq.de/code/olkvba.htm

When the code is finished i will post here.

Best Owain
Owain Maedel
Wednesday, October 27, 2010 7:40 AM
Here it is!
Enjoy!

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

strBcc = "your@mail.com"

res = MsgBox("BCC this message?", vbYesNo + vbDefaultButton1, _
"BCC Message")
If res = vbNo Then
Cancel = False
Else
Set objRecip = Item.Recipients.Add(strBcc)
objRecip.Type = olBCC

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

Set objRecip = Nothing
End Sub

Dont forget to Enter valid Mial adress.

Best Owain
Mike C.
# Mike C.
Tuesday, November 02, 2010 7:03 PM
This is really awesome!

You saved me from having to purchase those 3rd party applications.

Great Job!!

Colin
# Colin
Friday, November 26, 2010 6:31 AM
Great code guys works really well :)

Is there a line of code that could be added to this to add some text to the subject line of the BCC ? would make it easier for filtering at the other end :)

Thanks
yup
# yup
Thursday, December 02, 2010 2:49 PM
posted by:
# Jon
Tuesday, September 07, 2010 5:18 PM
You have to sign the macro digitally to make it work.

Refer: http://www.hamz.me/how-to-auto-bcc-in-outlook-2007

^this works
joel hirsh
# joel hirsh
Saturday, December 11, 2010 12:55 PM
Maybe someone on this thread can help. I just installel Outlook 2010 and I'm using it with my gmail account. It appears to be doing an automatic blind copy (BCC) back to me when I send messages, How do I turn this off? It seems to be the opposite proble from what has been discussed before. Thank you in advance.
mkizer
# mkizer
Wednesday, December 15, 2010 1:03 PM
In a related note, watch out if you use these methods to spy on your boss - http://www.engadget.com/2010/12/15/irs-employee-uses-outlook-rules-to-intercept-bosss-e-mails-con/
maver
# maver
Friday, December 31, 2010 8:12 AM
For those who are interested, you can make the rule to apply this BCC feature only to one specified sending email account by using "Item.SendUsingAccount.SmtpAddress" to get the current sending email account.
IT Support London
Tuesday, January 11, 2011 6:33 PM
Just what I was looking for.
Will it work with outlook 2010

Also - Can we use it on our blog at http://www.sysfix.co.uk
mkizer
# mkizer
Tuesday, January 11, 2011 7:04 PM
Feel free to use this code anywhere...
As for Outlook 2010, you may have to follow some of the suggestions in the comments here to get it to work. I haven't had time lately to experiment with it much (I certainly do need to update this article, since it seems fairly popular).
Rajendra
# Rajendra
Thursday, January 13, 2011 5:29 AM
Brilliant, done in minutes thanks a lot.
Tanguy
# Tanguy
Thursday, January 13, 2011 9:29 PM
Owain Maedel ! This is awesome dude, you save me some time on this or on crack site lol !

Thanks again^^
Ken Ng
# Ken Ng
Tuesday, January 18, 2011 12:51 AM
In outlook clicked on Tools/Macros/Security changed the level to Warning for all macros, ok

Again pressed Alt F11, clicked on Tools/Digital Signature click on Choose ... u will see the Digital Signature u saved and select and press ok.

Restarted Oulook

upon restart it will ask to trust all the macros from press yes. And its done.

bonnier
Thursday, January 20, 2011 12:41 AM
Can't make this work with Outlookk 2003, does it work with this version. SP3.
Digital Signature shows no certificate, create a new e-mail bcc is blank, is it this version of Outlook
kurtblaze
# kurtblaze
Friday, February 04, 2011 11:37 AM
This works perfectly, but I need the bcc'd email to show up as a bcc not to. Is there a way for the BCC copy to be actually sent as a BCC not normal To copy?

Thanks in advance.
SRM
# SRM
Friday, February 18, 2011 9:35 AM
Worked great! Thanks.
Noresh
Saturday, February 19, 2011 12:49 PM
Guys, I had the same issue and it has been resolved now.

For Outlook 2007, signing the macro digitally would solve the problem

Reference:- http://www.hamz.me/how-to-auto-bcc-in-outlook-2007
Manni
# Manni
Monday, February 21, 2011 5:53 PM
Great hack. Works like a charm !
Hank
# Hank
Thursday, March 10, 2011 1:43 PM
Trying to run this in Outlook 2003. Worked just fine yesterday. Not working at all today. Any ideas?
Joel
# Joel
Saturday, March 26, 2011 7:13 PM
Perfect! Thank you!
JP
# JP
Wednesday, March 30, 2011 2:20 PM
Thanks for this. It works fine in Outlook 2010.
krystyna
# krystyna
Monday, April 04, 2011 11:31 AM
This worked fine in Outlook until I restarted my computer on today. Everything was working fine last week and I double checked everything but Outlook won't send a blind carbon copy to myself.
Mark
Tuesday, April 12, 2011 5:25 PM
Digitally signing worked for me in Outlook 2003, as suggested by

# yup
Thursday, December 02, 2010 11:49 AM
posted by:
# Jon
Tuesday, September 07, 2010 5:18 PM
You have to sign the macro digitally to make it work.

Refer: http://www.hamz.me/how-to-auto-bcc-in-outlook-2007

^this works
Theresa
# Theresa
Sunday, April 24, 2011 8:39 PM
Works perfectly for Outlook 2007. Just inserted the code today, followed Ken's instructions above (# Ken Ng January 17, 2011 9:51 PM) to take care of the macro and digital signature, I restarted my computer, and it works great! Thank you all for your input.
Venu T
# Venu T
Monday, April 25, 2011 9:12 AM
Wokrs like a charm. Love it!
kami
# kami
Friday, April 29, 2011 1:02 PM
I set this up yesterday & it worked perfectly; hwoever, today it's not working. Do I need to set it up daily?
Ray
# Ray
Wednesday, May 04, 2011 4:11 PM
Worked for me perfect, on the first try! Thanks! (Outlook 2003 SP 3)
DW
# DW
Friday, May 06, 2011 1:49 PM
This is great!
How would i change the "SentOnBehalfOf"
Guillermo
# Guillermo
Wednesday, May 11, 2011 1:39 PM
Hi, this works great! but I have an issue, if I select a file then give right click and choose to send it by e-mail the code does not works, somebody knows how to fix it, or if this is possible.

Thanks
aliceayres
# aliceayres
Friday, May 20, 2011 4:05 AM
I had the same problem where the Auto Bcc macro would fail to work after I exited Outlook 2010.

This solved the problem: http://www.hamz.me/how-to-auto-bcc-in-outlook-2007

Paul Middleton
# Paul Middleton
Wednesday, June 15, 2011 6:10 AM
Worked 1st time perfect!! Many Thanks
Mike
# Mike
Sunday, July 03, 2011 12:57 PM
It works for me in Outlook 2007 after I digitally sign it, but the bcc'd email address shows up in the cc: field at the receiver's end everytime. So basically, it seems to be automatically cc'ing instead. I don't want the people receiving emails to see the bcc'd email address. Anyone else experience this or have a solution?
Aman Bhalla
# Aman Bhalla
Monday, July 11, 2011 2:09 AM
It works.....thanks :-)
Don
# Don
Tuesday, July 12, 2011 10:20 AM
Worked great!

Thanks
DSH
# DSH
Friday, August 05, 2011 10:02 PM
This worked great in Outlook 2003 after digitally signing. Thanks to mkizer and all the other contributors that made suggestions and posted mods. that made it work.
Rajesh
# Rajesh
Tuesday, August 09, 2011 2:13 AM
I go through the above steps, and it's works properly.

But when i open that sent mail and show mail header detail i found the mail address in cc instead of bcc.

can someone help me in this.
VaL
# VaL
Monday, August 15, 2011 5:12 PM
code works perfectly.
it even works in outlook 2010 just make sure you enable all the macros in outlook 2010 options.
Good work mkizer!!!
Rajinder
# Rajinder
Friday, August 19, 2011 9:09 AM
I hope this helps….i am not a programmer in any form, but have been able to paste this together from several different sites. It works for me very well as I have several accounts setup in my Outlook 2010. Enjoy….good luck with using it.

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 objMsg As Outlook.MailItem
On Error Resume Next

' #### USER OPTIONS ####
'Select one of the below Options, remove the comment marks (') in front of the line

'Add text to the subject line when sending email
Set objMsg = Outlook.ActiveInspector.CurrentItem
'objMsg.Subject = "Test"
'objMsg.Subject = "Prepended text here - " & objMsg.Subject
'objMsg.Subject = objMsg.Subject & " - Appended text here"

' Address for Bcc -- must be SMTP address or resolvable
' Automatically selects the bcc address from the set "from" setting or
' to a select email address, your choose
strBcc = Item.SendUsingAccount
'strBcc = "SomeEmailAddress@domain.com"


' Option 1: Select if you wish to auto bcc from a select account in outlook automatically
'If Item.SendUsingAccount.SmtpAddress = " SomeEmailAddress@domain.com " Then

' Option 2: Select through notification meesage before sending the email if you wish to bcc the email
res = MsgBox("Would you like to receive a copy of this message (Bcc)?", vbYesNo + vbDefaultButton1, _
"BCC Message")
If res = vbNo Then
Cancel = False
Else

' Option 3: Select if you wish to sent on behalf:
' If Item.SentOnBehalfOfName = " SomeEmailAddress@domain.com " Then

Set objRecip = Item.Recipients.Add(strBcc)
' objRecip.Type = olBCC
objRecip.Type = Outlook.OlMailRecipientType.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

Set objRecip = Nothing

End Sub


Good Luck...Cheers
Rick
# Rick
Tuesday, August 30, 2011 3:29 PM
Hi There, the question was already raised but I did not find the answer.
Any way to modify this so that a BCC is sent only when a message is sent to a specific recipient?

hope someone can help

David M
Tuesday, September 13, 2011 11:45 AM
Works! Thank you so much. FYI, in Outlook 2010 there are a few extra steps, since the Macro button is hidden by default.

Click the File tab.
Click the Help button in the left panel.
Click the Options button in the right panel.
Click the Customize Ribbon button in the new window.
Click the Developer checkbox on the right.

Now you should be able to select the Developer tab and then the Visual Basic button.

Everything else works as described.

Thanks again for providing this example. It saved the the time, effort, and expense of purchasing a third party add-on for every desktop - and who knows what other code that add-on would be installing!

amber
# amber
Monday, September 19, 2011 3:30 AM
thanks it helped alotttttttttt
Greg S
# Greg S
Thursday, September 22, 2011 11:10 AM
This works perfectly. Thanks! However, do you know how to exclude bcc'ing messages if I type in a certian word in the subject?
Bet
# Bet
Thursday, October 06, 2011 9:29 AM
Basically BCC - You wouldnt know the difference....follow the below route

Tools > Rules and Alerts > New Rule > Check Messages After Sending > No Conditions > Select Yes > Move a Copy To The Specified Folder > Inbox > Any Exceptions? > Name the Rule > Finish
Giorgio
# Giorgio
Friday, October 07, 2011 6:28 PM
Hi
I try yr original code and it's working fine only with one e-mail address into Bcc
Good Work !
Do you know how I need to send in Bcc two e-mail addresses ?
Thanks in Advanced,
Giorgio
Randy
# Randy
Thursday, October 13, 2011 9:18 AM
copied it, pasted it, everything looked the same, tried it, it worked...the first time. hasn't worked since. what gives?
wolf
# wolf
Tuesday, October 25, 2011 6:41 PM
cool
anon
# anon
Wednesday, October 26, 2011 1:35 PM
It worked really easily, but when the message arrived, there was no BCC box, it just arrived! That's as good as BCC'd, but odd.
gbs
# gbs
Thursday, October 27, 2011 11:29 PM
To: Giorgio

I have added some lines to the code shared by Michael Kizer (Thanks a lot Michael. You're a heaven sent!) to make it work on more than 1 email address. In this code, you will be able to bcc 3 addresses.


Dim objRecip1 As Recipient
Dim objRecip2 As Recipient
Dim objRecip3 As Recipient

Dim strMsg As String
Dim res As Integer
Dim strBcc1 As String
Dim strBcc2 As String
Dim strBcc3 As String
On Error Resume Next

' #### USER OPTIONS ####
' address for Bcc -- must be SMTP address or resolvable
' to a name in the address book
strBcc1 = "somebody1@mail.com"

Set objRecip1 = Item.Recipients.Add(strBcc1)
objRecip1.Type = olBCC
strBcc2 = "somebody2@mail.com"

Set objRecip2 = Item.Recipients.Add(strBcc2)
objRecip2.Type = olBCC
strBcc3 = "somebody3@mail.com.ph"

Set objRecip3 = Item.Recipients.Add(strBcc3)
objRecip3.Type = olBCC

If Not objRecip1.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
If Not objRecip2.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
If Not objRecip3.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 objRecip1 = Nothing
Set objRecip2 = Nothing
Set objRecip3 = Nothing

End Sub


Hope it helps.
Nicolay Astashov
# Nicolay Astashov
Thursday, November 10, 2011 4:27 AM
THANK YOU VERY MUCH!!!!! SO SIMPLE AND EXACTLY WHAT WE NEEDED!!! THANKS AGAIN
rvadgama
Wednesday, November 16, 2011 7:56 AM
Code is works Perfectly... !!!
Thanks a lot.

can any one explain me after sending email in sent item i can see the BCC user email.
i want to remove that BCC user from sent item email.

please Email me : eluminous_sse6 at eluminoustechnologies.com
Brandon
# Brandon
Wednesday, November 16, 2011 10:07 PM
It worked for me on Outlook 2010 for the first time, then an error came up and then was not working anymore. I read the comments here and allow all macros in Outlook options and then it is working now. Great work & big thanks to mkizer and VaL.
brandon
Tuesday, December 20, 2011 11:45 AM
THIS WORKED PERFECT... first time trying it. AWESOME!!!! thanks so much!
Yianis Valasopoulos
Tuesday, December 27, 2011 6:01 AM
Hi There
Please a little bit help about outlook BCC. It works great but i have a minnor problem. When i compose an email and then i click on send, i can not see the BCC window so i can choose BCC or not. I have to click on outlook main window so there i can see the BCC window and choose BCC or not. In other words the BCC windows is visible only in main outlook window and not in the compose mail window. Thanks a lot.
Giorgio
# Giorgio
Wednesday, December 28, 2011 4:30 PM
Thanks @GBS
It works perfect
Bye
Giorgio
Bill Doble
# Bill Doble
Sunday, January 01, 2012 9:43 AM
For Outlook 2003. I used the Visual Basic Editor method as previously described and experienced the same one-time successes as others. You must create a digital signature and activate it to make it work. But it is a slightly different process than described for Outlook 2007.

So, here is the process I used:

1) From Windows XP, press Start; then All Programs; then Microsoft Office; then Microsoft Office Tools; then Digital Certificate for VBA Projects; the create Digital Certificate, (name it something you will easily recognize like "Oulook BCC").

2) From Outlook 2003, follow instructions as detailed by Michael Kizer at top of this page (http://michaelkizer.com/Blog/tabid/117/articleType/ArticleView/articleId/36/Adding-an-Automatic-BCC-to-Outlook.aspx).

BUT you Must take an additional step!

3) Before closing your VbaProject.OTM, go to Tools; then Digital Signature; then choose the Certificate Name you created earlier; click Okay; then Save and close Project.

4) Exit and restart Outlook 2003.

You may get a prompt about trusting your macro, if so click okay.

It now works well for me.

Ian
# Ian
Sunday, January 01, 2012 7:38 PM
This is fantastic! It works! Thankyouverymuch.
William
# William
Thursday, January 05, 2012 7:17 AM
Thanks, it works perfectly!!
Mick
Saturday, January 07, 2012 11:59 PM
Yianis, I am assuming this is what you want.
Click NEW EMAIL. Click OPTIONS on message Menu Bar. Click BCC SHOW FIELD and it will appear in future messages. This is for Outlook 2010. Earlier versions have the same or similar process to switch on BCC.

This code looks like a great solution to a problem that needed solving. Looking forward to implementing it. Well done!
Bill Doble
# Bill Doble
Sunday, January 15, 2012 8:38 PM
UPDATE

I have been using the auto bcc as done above (http://michaelkizer.com/Blog/tabid/117/articleType/ArticleView/articleId/36/Adding-an-Automatic-BCC-to-Outlook.aspx#Comment964) with Outlook 2003 for a couple of weeks now and am pleased to report that all is working flawlessly.

Enjoy!
Matt
# Matt
Thursday, March 01, 2012 10:20 AM
Would anyone know of any reason this moght not work on emails sent from Blackberry? Would this have to be set up on the blackberry too?
GSK
# GSK
Saturday, March 03, 2012 9:52 AM
Great Job.
Parvez
# Parvez
Wednesday, March 07, 2012 4:38 AM
Thanks yaar!!! It was really of great help.
Darren
# Darren
Thursday, March 08, 2012 2:22 PM
Worked just FINE IN Outlook 2003!! One MUST Realize that it WON'T Show the BCC Box in the section where you set recipients, but after you click "send", a copy is sent to you as a BCC Recipient. Isn't the Point to get the email --- not have the box show.

By the way... My Macro Security is STILL Set to HIGH! -- Works Fine :-)
Debra
# Debra
Tuesday, March 13, 2012 11:55 PM
This is exactly what I was looking for. I am not computer savvy and don't really want to learn programming, so this was the absolutely perfect answer for Outlook 2010. Thank you SO much!
Lori
# Lori
Friday, March 30, 2012 4:42 PM
Perfect!!! Thank you!
Albert Michaels
Saturday, March 31, 2012 1:35 PM
Enable all macros and uncheck DEP settings. Finally works!
Giorgia
# Giorgia
Tuesday, April 03, 2012 1:57 PM
Amazing - works perfectly - thank you!
Ahsanul Hoque
# Ahsanul Hoque
Thursday, April 05, 2012 3:21 AM
It works perfectly with Microsoft Office Outlook 2007.

Thanks a lot...
Cobs
# Cobs
Monday, May 07, 2012 9:27 AM
Works great....thanks a ton
Karl
# Karl
Friday, May 18, 2012 12:01 AM
For those who found the macro to lose its effect after an Outlook restart, refer to http://stackoverflow.com/questions/5660028/how-to-enable-thisoutlooksession-in-outlook-2007 on the security settings.
sohan salunke
# sohan salunke
Saturday, May 19, 2012 1:57 AM
Hi,

works grate.... but mails received by Bcc mail id goes to Junk Mail
Mudassar
# Mudassar
Monday, June 18, 2012 11:20 PM
It Worked, but when i check in the email in the sent item. The email is showing the Bcc address as well. I want it to hide from the user, so that user does not know that emails are being copy. Any solution?
Thanks,
TimF
# TimF
Thursday, June 28, 2012 2:29 PM
Works for me in Outlook 2010 and Windows 7 x64 - sending to a Gmail account. Thanks.
itsme
# itsme
Tuesday, August 07, 2012 1:46 AM
Hi Guys,
Amazing solution .. but one small problem, the bcc works partially.

like if my mail id is abc@xyz.com .. and i'm sending mails from this id. Now bcc macro works only for mails sent to this abc@xyz.com id. :(

This macro does not work when i'm mailing it to some other mail id's ... what could be wrong .. pls give me a solution.

looking forward to a solution ... pls help.

itsme...
mahesh
Tuesday, August 07, 2012 3:57 PM
works like a charm !!!!!!
Karl
# Karl
Tuesday, August 07, 2012 8:26 PM
@Mudassar - Sender sees the BCC addresses. Recipients would not.
Sathish Chennai
# Sathish Chennai
Friday, August 10, 2012 6:28 AM
Thank you so much.. Its working perfectly
Betty
# Betty
Wednesday, August 29, 2012 4:21 PM
Thanks, works a treat and so simple, clear instructions
Betty
chris
# chris
Thursday, September 06, 2012 11:48 PM
thank you for the important way on how to auto bcc this will help be generate my sales!
Luis
# Luis
Tuesday, September 11, 2012 5:35 PM
Wow, this worked just as advertised. Had the problem where it stopped working after restarting, but adding the digital certificate got it working again.

THANK YOU!
Mushfiqur Rahman
# Mushfiqur Rahman
Tuesday, October 02, 2012 5:35 AM
It worked perfectly. Thanks a million.
Cyndy
# Cyndy
Tuesday, October 02, 2012 12:58 PM
This is awesome. Thank you so much for providing this!
sam
# sam
Monday, December 03, 2012 3:03 AM
it works like a gem. :)
Surya
# Surya
Wednesday, January 09, 2013 1:23 AM
Wow!!! this is amazing :) thanks
Mohammad Abdullah
# Mohammad Abdullah
Wednesday, January 09, 2013 7:25 AM
hi,
i tried the above solution & it works for one week & stopped working!?
Tanzim Hasan
Thursday, April 04, 2013 1:29 AM
It worked like magic.

Thank you!
www.tanzimhasan.com
Ankit
# Ankit
Tuesday, April 16, 2013 6:57 AM
Works well.... thanks :)

Now for every mail i send i do not need to remember adding my boss in bcc.
Lisa
# Lisa
Friday, May 24, 2013 1:35 PM
Worked like a charm for Outlook 2003. No muss, no fuss, easy to read and follow instructions.

Awesome!
katya chong
# katya chong
Tuesday, May 28, 2013 9:50 AM
hi guys i need to create a custom action to insert a link/shortcut to a local document when sending internally to certain people. i can setup the rule fine but of course the inserting of the shortcut needs to be via a custom action.
is there a way to create that in vb so that i can insert it with the rule? or is that strictly a C++ job.
thanks in advance
regards
Anonymous
# Anonymous
Sunday, August 18, 2013 11:52 AM
http://cookiebear.info/archives/906
Tan
# Tan
Monday, October 21, 2013 10:16 PM
Thanks a lot, this work fine for my Outlook 2003.
Chas Taylor
# Chas Taylor
Friday, November 08, 2013 2:51 PM
I found this and It Now Works!

Digitally Sign a Macro Project

Click the Start button, point to All Programs, point to Microsoft Office, point to Microsoft Office Tools, and then click Digital Certificate for VBA Projects. In the Your certificate’s name box, type a descriptive name for the certificate.

In outlook click on Tools/Macros/Security change the level to Warning for all macros, ok

Again press Alt F11, click on Tools/Digital Signature click on Choose … u will see the Digital Signature u saved and select and press ok.

Restart Outlook

Upon restart it will ask to trust all the macros from press yes. And its done.

SOURCE (Also Vista steps)
http://office.microsoft.com/en-us/help/HA012317811033.aspx
Anonymous
# Anonymous
Sunday, February 09, 2014 4:29 PM
http://iampariah.com/blog/bookmarks-24-may-2011-07-june-2011.php
Anonymous
# Anonymous
Monday, February 17, 2014 6:23 AM
It is working like Chas Taylor says >> it must be digitally signed and macro security setting on "No security check for macros" in tools - macro - security.

Post Comment

Name (required)

Email (required)

Website

CAPTCHA image
Enter the code shown above: