Note: The other languages of the website are Google-translated. Back to English

Come eseguire automaticamente il bcc di tutte le email che invii in Outlook?

Quando si invia un messaggio di posta elettronica e si dispone di un destinatario segreto permanente ma non si desidera che gli altri destinatari vedano il suo indirizzo, è necessario utilizzare la funzione bcc. Ma quando abbiamo bisogno di bcc, dobbiamo mostrare manualmente il campo bcc e selezionare un contatto per esso. Per evitare queste operazioni manuali, il seguente articolo ti mostrerà come modificare Outlook in bcc automaticamente un indirizzo email su tutte le email che invii.


Bcc automatico predefinito in Outlook utilizzando VBA

È possibile applicare sotto il codice VBA per configurare la regola Bcc automatica in Outlook. Si prega di fare quanto segue:

1. premi il altro + F11 tasti contemporaneamente per aprire la finestra di Microsoft Visual Basic, Applications Edition.

2. Fare doppio clic sul file Questa sessione di Outlooknel riquadro Progetto, quindi incolla sotto il codice VBA nella finestra di apertura. Vedi screenshot qui sotto:

Codice VBA: Bcc automatico durante l'invio di tutte le e-mail

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 = "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
End Sub

NOTA: Si prega di sostituire il file "AlcuniIndirizzoEmail@dominio.com" nel codice sopra con l'indirizzo e-mail a cui vuoi bcc.

3. Salvare il codice VBA e chiudere la finestra di Microsoft Visual Basic, Applications Edition.

D'ora in poi, non è necessario inserire l'indirizzo nel campo Ccn. Quando invii un'e-mail dal tuo Outlook, verrà automaticamente bcc al destinatario desiderato mentre il codice VBA viene eseguito.


Ccn automatico in Outlook utilizzando Kutools per Outlook

Il codice VBA sopra è un po 'difficile e fastidioso per noi principianti, ecco uno strumento facile e veloce: Kutools per Outlook per aiutarti a bcc automaticamente tutte le e-mail o le e-mail specificate inviate in Outlook.

Kutools per Outlook: Aggiungi più di

100
pratici strumenti per Outlook, da provare gratuitamente senza limiti in 60 giorni. Continua a leggere...      Prova gratuita ora

Dopo aver installato Kutools per Outlook, eseguire le seguenti operazioni:

1. Clic Kutools > CC/Ccn automatico > Gestore delle regole, vedi screenshot:

2. Nel Gestione CC/Ccn automatica finestra di dialogo, fare clic New pulsante.

3. Nella Creazione guidata regole, specifica le condizioni in base alle quali filtrerai le email. Nel mio caso, spunta il file con parole specifiche nel corpo opzione, quindi fare clic sul testo sottolineato di parole specifiche per modificarlo.

4. Nella finestra di dialogo Il testo contiene, fare clic su New pulsante per aggiungere nuove parole.

5. Nella finestra di dialogo Cerca testo, digita una parola nel file Nuovo testo di ricerca fare clic su Aggiungi pulsante, quindi fare clic su OK pulsante.
Tip: Per aggiungere più parole contemporaneamente, è necessario digitare una parola nel file Nuovo testo di ricerca casella e fare clic su Aggiungi , quindi ripetere questa operazione per aggiungere altre parole una per una e infine fare clic sul pulsante OK pulsante.

6. Ora torna alla finestra di dialogo Il testo contiene. Se necessario, puoi continuare a fare clic su New pulsante per aggiungere altre parole di cui hai bisogno, quindi fai clic sul pulsante OK per salvare queste parole.
Suggerimenti: se aggiungi più parole contemporaneamente nella stessa casella di testo di ricerca, la relazione tra queste parole è "E". Se aggiungi più parole facendo clic su New successivamente, la relazione tra queste parole è "OR".

7. Quindi torna alla Creazione guidata regole, specifica le altre condizioni di cui hai bisogno e fai clic su Successiva pulsante.

8. Nella seconda Creazione guidata regole, specifica le eccezioni o non controllare le eccezioni di cui hai bisogno e fai clic su Successiva pulsante.

9. Nella terza Creazione guidata regole, digita un nome per questa nuova regola Ccn nel file Nome regola , inserisci le descrizioni per la regola nel file Note sulle regole fare clic su Destinatario pulsante per aggiungere destinatari Cc o Ccn, spuntare le opzioni di esecuzione nel file Imposta le opzioni delle regole sezione e fare clic su OK pulsante.

10. In Auto CC / BCC Manager, assicurati che la nuova regola Cc / Ccn sia selezionata e seleziona il pulsante OK per chiudere la finestra di dialogo.

11. Vai avanti per fare clic Kutools> CC / BCC> Abilita CC / BCC automatico nell'interfaccia principale di Outlook per abilitare la regola.

E clicca il OK pulsante nella finestra di dialogo di riconferma che si apre.

Finora è stata creata la regola bcc, quando si invia un'e-mail, lo stesso messaggio verrà inviato al destinatario bcc allo stesso tempo.

Note:
(1) Con questa funzione è possibile impostare sempre CC anche le regole.
(2) È possibile creare più regole in base alle proprie esigenze utilizzando questo strumento.
(3) Se vuoi chiudere le regole, puoi cliccare Abilita CC / BCC automaticoe tutte le regole non funzioneranno. Inoltre puoi deselezionare il nome delle regole nel file Gestione CC/Ccn automatica finestra di dialogo per disabilitare alcune regole specificate.


Articolo correlato:

Come eseguire automaticamente il cc me stesso sempre in Outlook?


Kutools for Outlook: porta 100 funzionalità avanzate in Outlook e semplifica notevolmente il lavoro!

  • Auto CC / BCC dalle regole durante l'invio di e-mail; Avanzamento automatico Email multiple personalizzate; Risposta automatica senza server di scambio e più funzioni automatiche ...
  • Avviso BCC - mostra il messaggio quando provi a rispondere a tutti se il tuo indirizzo e-mail è nell'elenco BCC; Ricorda quando mancano allegatie altre funzioni di promemoria ...
  • Rispondi (tutti) con tutti gli allegati nella conversazione di posta; Rispondi a molte email in secondi; Aggiunta automatica di saluto quando rispondi; Aggiungi la data all'oggetto ...
  • Strumenti per gli allegati: gestisci tutti gli allegati in tutti i messaggi, Scollegamento automatico, Comprimi tutto, Rinomina tutto, Salva tutto... Rapporto rapido, Conta le email selezionate...
  • E-mail spazzatura potenti per abitudine; Rimuovi messaggi e contatti duplicati... Consentono di fare in modo più intelligente, veloce e migliore in Outlook.
girato kutools outlook scheda kutools 1180x121
girato kutools outlook kutools plus tab 1180x121
 
Commenti (53)
Ancora nessuna valutazione. Puoi essere il primo a votare!
Questo commento è stato fatto dal moderatore sul sito
Ciao, questo non sembra funzionare su Outlook 2013. Puoi creare un altro codice per quella versione? Grazie!
Questo commento è stato fatto dal moderatore sul sito
Gentile Kitkat, questo codice funziona anche su Outlook 2013. Dopo aver salvato il codice, eseguire le seguenti operazioni: 1. Andare su Costruttori scheda e fare clic Protezione macro. 2. Nel pop up Centro protezione finestra di dialogo, selezionare il file Abilita tutte le macro (non consigliato, può essere eseguito codice potenzialmente pericoloso) opzione nella sezione Impostazioni macro. Quindi fare clic OK. 3. Ora chiudi l'applicazione Outlook 2013 e quindi riavviala, il codice funzionerà. :-)
Questo commento è stato fatto dal moderatore sul sito
prendo aiuto dal tuo sito grazie
Questo commento è stato fatto dal moderatore sul sito
Funziona benissimo, ma c'è un modo per farlo con più bcc?
Questo commento è stato fatto dal moderatore sul sito
[quote]Funziona benissimo, ma c'è un modo per farlo con più bcc?Di Chris[/quote] Quindi, dal momento che chiama il metodo Item.Recipients.Add(strBcc) per aggiungere un altro destinatario, il programma tratta qualsiasi stringa fornita come un unico indirizzo email. Il trucco è semplicemente chiamare di nuovo lo stesso metodo nello stesso modo per una seconda variabile. Es. strBcc = "email1@email.com" strBcc2 = "email2@email.com" Set objRecip = Item.Recipients.Add(strBcc) objRecip.Type = olBCC Set objRecip = Item.Recipients.Add(strBcc2) objRecip.Type = olBCC Non sono un esperto di vba, quindi non sono affatto sicuro di cosa faccia la parte Set objRecip ... ma quanto sopra funziona per me.
Questo commento è stato fatto dal moderatore sul sito
Ho provato il tuo suggerimento ma mostra il messaggio di errore "operazione non riuscita. Le interfacce di messaggistica hanno restituito un errore sconosciuto. Se il problema persiste, riavvia Outlook. Impossibile risolvere il destinatario.", qualche suggerimento?
Questo commento è stato fatto dal moderatore sul sito
ciao, ho fatto le istruzioni per Outlook 2007 e non ha funzionato :/ qualche consiglio?
Questo commento è stato fatto dal moderatore sul sito
Le macro si avviano ma non fanno nulla in Outlook 2010: se metto Stop alla riga 13, si apre la finestra VBA e mi consente di eseguire le macro passo dopo passo ... ma al termine delle macro non vedo alcuna lettera. Sembra che invii una lettera prima dell'aggiunta di BCC.
Questo commento è stato fatto dal moderatore sul sito
Ha funzionato bene con Outlook 2013 ma ha riscontrato un errore di compilazione nel 2007
Questo commento è stato fatto dal moderatore sul sito
VBA ha funzionato come pubblicizzato. Grazie.
Questo commento è stato fatto dal moderatore sul sito
Quando invio l'e-mail, come posso rimuovere il BCC dagli elementi di invio, voglio che il Ccn sia nascosto negli elementi di invio.
Questo commento è stato fatto dal moderatore sul sito
Ciao, ti chiedi se hai trovato una soluzione per nascondere bcc dalla cartella inviata? Ho provato a farlo ma inutilmente. Qualsiasi aiuto sarà apprezzato. Grazie!
Questo commento è stato fatto dal moderatore sul sito
Ciao, sto anche cercando la stessa soluzione che voglio inserire automaticamente in BCC tutte le mie e-mail al mio indirizzo e-mail personale tramite il codice VBA che funziona correttamente. Ma quando vado agli articoli inviati, il campo BCC mi è visibile, voglio nasconderlo anche a me stesso in modo che anche lui non sia visibile a me. Qualcuno può per favore aiutare su questo con il codice VBA. Grazie Attualmente sto usando il seguente codice: 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 # ### ' indirizzo per Ccn -- deve essere un indirizzo SMTP o risolvibile ' in un nome nella rubrica strBcc = "privateemail@gmail.com" Set objRecip = Item.Recipients.Add(strBcc) objRecip.Type = olBCC Se No objRecip.Resolve Then strMsg = "Impossibile risolvere il destinatario Ccn. " & _ "Vuoi comunque inviare il messaggio?" res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _ "Impossibile risolvere il destinatario Ccn") Se res = vbNo Then Cancel = True End If End If Set objRecip = Nothing End Sub
Questo commento è stato fatto dal moderatore sul sito
Ciao anch'io sto cercando la stessa soluzione, per favore aiutami anche io. Voglio inserire automaticamente in BCC tutte le mie e-mail al mio indirizzo e-mail personale tramite codice VBA che funziona correttamente. Ma quando vado agli articoli inviati, il campo BCC mi è visibile, voglio nasconderlo anche a me stesso in modo che anche lui non sia visibile a me. Qualcuno può per favore aiutare su questo con il codice VBA. Grazie Attualmente sto usando il seguente codice: 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 # ### ' indirizzo per Ccn -- deve essere un indirizzo SMTP o risolvibile ' in un nome nella rubrica strBcc = "privateemail@gmail.com" Set objRecip = Item.Recipients.Add(strBcc) objRecip.Type = olBCC Se No objRecip.Resolve Then strMsg = "Impossibile risolvere il destinatario Ccn. " & _ "Vuoi comunque inviare il messaggio?" res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _ "Impossibile risolvere il destinatario Ccn") Se res = vbNo Then Cancel = True End If End If Set objRecip = Nothing End Sub
Questo commento è stato fatto dal moderatore sul sito
ehi, questo VBA funziona bene, una domanda se posso chiedere c'è un modo per attivare solo su un account? per esempio ho 3 account sul mio computer @yahoo, @hotmail, @gmail e voglio che solo quelli inviati dall'account @gmail siano BCC automatici ma il resto per andare normale cosa dovrebbe essere aggiunto allo script?
Questo commento è stato fatto dal moderatore sul sito
Mi interessa anche questo. Grazie!
Questo commento è stato fatto dal moderatore sul sito
Se è necessario eseguire il BCC su un account, utilizzare semplicemente Item.SendUsingAccount invece dell'e-mail fissa, in altre parole, utilizzare nella riga 10 quanto segue: strBcc = Item.SendUsingAccount questa stringa troverà l'indirizzo e-mail dell'account utilizzato per invialo e usalo. Divertiti!
Questo commento è stato fatto dal moderatore sul sito
Questo funzionerebbe solo quando desideri inserire in BCC lo stesso indirizzo e-mail da cui stai inviando e-mail. Cosa succede se si desidera selezionare in BCC diversi indirizzi e-mail in account diversi? Conto 1 :: 123@Gamil.com : BCC 123@abc.com Conto 1 :: 123@Hotmail.com : BCC 123@def.com Conto 1 :: 123@Yahoo.com : BCC 123@xyz.com
Questo commento è stato fatto dal moderatore sul sito
Potresti usare le dichiarazioni condizionali combinate con il bit fornito da Harry per determinare chi a BCC. In questo caso, userei l'istruzione Select Case: [quote]Select Case Item.SendUsingAccount Case "123@Gmail.com" strBcc = "123@abc.com" Case "123@Hotmail.com" strBcc = "123@ def.com" Caso "123@Yahoo.com" strBcc = "123@xyz.com" Fine Seleziona[/quote]
Questo commento è stato fatto dal moderatore sul sito
prendo aiuto dal tuo sito
Questo commento è stato fatto dal moderatore sul sito
Affronto un altro problema In MS Office Outlook Microsoft Office Outlook ha riscontrato un problema e deve essere chiuso ci scusiamo per l'inconveniente
Questo commento è stato fatto dal moderatore sul sito
Grazie per le istruzioni! Come posso regolare questo in modo da poter essere inserito in BCC su tutte le e-mail tranne che su alcuni indirizzi e-mail specifici o gruppi di "@dominio.com". Grazie!
Questo commento è stato fatto dal moderatore sul sito
Questo è stato un post molto utile per me! Uso Gmail come una sorta di backup per tutta la mia posta e questo lo ha reso possibile senza che le persone commentassero una riga CC aggiunta (l'unica opzione fornita da Outlook come impostazione predefinita).
Questo commento è stato fatto dal moderatore sul sito
Ottimo post - davvero d'aiuto, l'unico problema è che ccn non viene eseguito quando la posta non viene creata da Outlook, ad esempio fai clic con il pulsante destro del mouse su un file dal desktop, invia a, destinatario di posta o fai clic sull'e-mail icona del file dall'interno di un programma e non c'è bcc - qualcuno può aiutare? Ho anche leggermente modificato il codice, in modo che Outlook ti dia la possibilità di scegliere se inserire o meno in bcc il destinatario. 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 intresponse As Integer In caso di errore Riprendi Next intresponse = MsgBox("Fai clic su Sì per condividere questa email con il QA , fai clic su No per mantenerlo privato", _ vbYesNo + vbQuestion, _ "Email Privacy") If intresponse = vbYes Then strBcc = "recipient@email.com" Set objRecip = Item.Recipients.Add(strBcc) objRecip.Type = olBCC If Not objRecip.Resolve Then strMsg = "Impossibile risolvere il destinatario Ccn. " & _ "Vuoi comunque inviare il messaggio?" res = MsgBox(strMsg, vbYesNo + vbDefaultButton1, _ "Impossibile risolvere il destinatario Ccn") Se res = vbNo Then Cancel = True End If End If End If End Sub
Questo commento è stato fatto dal moderatore sul sito
Ciao, non riesco a far funzionare il codice in Office2013. Dal menu strumenti>>riferimenti devo attivare delle librerie specifiche? Grazie Kevin
Questo commento è stato fatto dal moderatore sul sito
Grazie. L'autobcc funziona come un piacere.
Questo commento è stato fatto dal moderatore sul sito
Ciao e grazie per il codice. Funziona perfettamente per me in Outlook 2013. Mi chiedevo se c'è un modo per farlo funzionare anche quando si risponde alle e-mail di altre persone. Sembra funzionare solo quando invio una "nuova" mail a qualcuno?
Questo commento è stato fatto dal moderatore sul sito
ciao, grazie funziona bene, ma la mia domanda è come posso usare questo BCC automatico per più e-mail, qui hai mostrato solo per una e-mail bcc, posso usarlo per più e-mail ?? se posso allora come?
Questo commento è stato fatto dal moderatore sul sito
Questo codice funziona, tranne per il fatto che ho bisogno di aprire lo sviluppatore dopo ogni riavvio. Dopo un riavvio, la macro non funziona a meno che non faccio clic su sviluppatore, apro la macro, la chiudi, apro la sicurezza, la chiudi. Qualche idea?
Questo commento è stato fatto dal moderatore sul sito
Questa macro funziona benissimo nel 2013 fino al riavvio. Se non faccio nulla dopo un riavvio, non funziona, funziona se faccio quanto segue dopo ogni riavvio: faccio clic sullo sviluppatore, Visual Basic, lo chiudo, quindi clic su Sicurezza macro, lo chiudi. Una volta che lo faccio, funziona per la sessione. Si ferma di nuovo al riavvio.
Non ci sono ancora commenti pubblicati qui
Carica Altre
Lasciate i vostri commenti
Pubblicazione come ospite
×
Valuta questo post:
0   Personaggi
Posizioni suggerite

Seguici

Copyright © 2009 - www.extendoffice.com. | Tutti i diritti riservati. Offerto da ExtendOffice, | Mappa del sito
Microsoft e il logo Office sono marchi o marchi registrati di Microsoft Corporation negli Stati Uniti e / o in altri paesi.
Protetto da Sectigo SSL