{"id":473,"date":"2016-09-28T06:16:50","date_gmt":"2016-09-28T06:16:50","guid":{"rendered":"http:\/\/www.tinone71.com\/wordpress\/?p=473"},"modified":"2018-11-30T18:54:31","modified_gmt":"2018-11-30T18:54:31","slug":"outlook-aggiungere-se-stessi-in-bbc-in-ogni-messaggio-von-vba","status":"publish","type":"post","link":"https:\/\/www.tinone71.com\/wp\/?p=473","title":{"rendered":"Outlook – Aggiungere se stessi in BBC in ogni messaggio von VBA"},"content":{"rendered":"
<\/div>

Per Aprire VBA ALT + F11 da outlook aperto<\/p>\n

[code language=”vb”]
\nPrivate Sub Application_ItemSend(ByVal Item As Object, _
\nCancel As Boolean)
\nDim objRecip As Recipient
\nDim strMsg As String
\nDim res As Integer
\nDim strBcc As String
\nOn Error Resume Next<\/p>\n

‘ #### USER OPTIONS ####
\n‘ address for Bcc — must be SMTP address
\n‘ or resolvable to a name in the address book
\nstrBcc = "address@domain.com"<\/p>\n

Set objRecip = Item.Recipients.Add(strBcc)
\nobjRecip.Type = olBCC
\nIf Not objRecip.Resolve Then
\nstrMsg = "Could not resolve the Bcc recipient. " &amp; _
\n"Do you want to send the message?"
\nres = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _
\n"Could Not Resolve Bcc")
\nIf res = vbNo Then
\nCancel = True
\nEnd If
\nEnd If<\/p>\n

Set objRecip = Nothing
\nEnd Sub
\n[\/code]<\/p>\n

 <\/p>\n

BCC Messages sent From a Specific Account<\/h3>\n

If you have multiple accounts in your profile and only want to BCC messages sent through a specific account, use an IF statement to check the SendUsingAccount value. Be sure to use the account name as it appears in the From field or Account Settings dialog.<\/p>\n

To BCC from all but one account, replace the = sign in the If statement with <>.<\/p>\n

[code language=”vb”]
\nPrivate Sub <\/p>\n

allez lien<\/a><\/div>\n

Application_ItemSend(ByVal Item As Object, _
\nCancel As Boolean)
\nDim objRecip As Recipient
\nDim strMsg As String
\nDim res As Integer
\nDim strBcc As String
\nOn Error Resume Next<\/p>\n

strBcc = "alias@domain.com"<\/p>\n

‘ Use the account name as it appears in Account Settings
\nIf Item.SendUsingAccount = "account@domain.com" Then<\/p>\n

Set objRecip = Item.Recipients.Add(strBcc)
\nobjRecip.Type = olBCC
\nIf Not objRecip.Resolve Then
\nstrMsg = "Could not resolve the Bcc recipient. " &amp; _
\n"Do you want to send the message?"
\nres = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _
\n"Could Not Resolve Bcc")
\nIf res = vbNo Then
\nCancel = True
\nEnd If
\nEnd If<\/p>\n

End If<\/p>\n

Set objRecip = Nothing
\nEnd Sub<\/p>\n

[\/code]<\/p>\n","protected":false},"excerpt":{"rendered":"

Per Aprire VBA ALT + F11 da outlook aperto [code language=”vb”] Private Sub Application_ItemSend(ByVal Item As Object, _<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":""},"categories":[1],"tags":[],"_links":{"self":[{"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=\/wp\/v2\/posts\/473"}],"collection":[{"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=473"}],"version-history":[{"count":11,"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=\/wp\/v2\/posts\/473\/revisions"}],"predecessor-version":[{"id":513,"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=\/wp\/v2\/posts\/473\/revisions\/513"}],"wp:attachment":[{"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=473"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=473"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.tinone71.com\/wp\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=473"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}