|ReplyAll alerts you before unintentionally replying all, or if you are a confidential BCC recipient of the e-mail.|
This example sends a copy of each outgoing email to a certain address. The address is added as BCC, so the recipient doesn't see that.
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) Dim R As Outlook.Recipient Dim Address$ Address = "email@example.com" Set R = Item.Recipients.Add(Address) R.Type = olBCC R.Resolve End Sub
|VBOffice Reporter is an easy to use tool for data analysis and reporting in Outlook. A single click, for instance, allows you to see the number of hours planned for meetings the next month.|