Pošaljite e-poruku na nekoliko primalaca i neke od njih stavite u polje „BCC“. Kasnije, ako želite da pošaljete drugu poštu samo primaocima BCC-a, možete koristiti sredstva navedena u ovom članku.
Da li ste ikada poslali Outlook e-poruke nekoliko primalaca sa nekim u polju „BCC“? Ponekad, nakon slanja takve e-poruke, možda ćete htjeti poslati drugu određenoj vrsti primatelja, kao što su primaoci BCC-a. Na primjer, želite im poslati neke posebne dodatne napomene. Sada ćemo vam predstaviti 2 načina. Prvi koristi copy and paste. A ovo drugo je zapravo mnogo efikasnije zbog VBA koda. Možete odabrati bilo koje prema vašim potrebama.
Metoda 1: Ručno kopirajte BCC primaoce u novu e-poštu
- Prvo, na listi e-pošte u folderu “Poslane stavke” odaberite originalnu e-poštu.
- Zatim dvaput kliknite na ovu poruku da biste je otvorili u vlastitom prozoru poruke.
- Nakon toga, u novom prozoru izaberite jednog primaoca u redu „BCC“.
- Zatim pritisnite “Ctrl + A” da odaberete sve BCC primaoce.
- Kasnije kliknite desnim tasterom miša i izaberite „Kopiraj“ iz kontekstnog menija.
- Nakon toga zatvorite ovaj email.
- Zatim kreirajte novu e-poštu pomoću dugmeta “Nova e-pošta” na kartici “Početna”.
- Na kraju, zalijepite kopirane BCC primaoce u polje „Prima“ ove nove e-pošte.
- Trenutno možete sastaviti i poslati ovu novu poštu po želji
Metoda 2: Pošaljite drugu e-poštu BCC primaocima putem VBA
- Prvo, pritisnite “Alt + F11” da pristupite VBA editoru.
- Zatim stavite VBA kod ispod u neiskorišteni modul.
Sub SendAnotherEmailToBCCRecipients()
Dim objOriginalMail As Outlook.MailItem
Dim objRecipient As Outlook.Recipient
Dim objNewMail As Outlook.MailItem
Dim objNewRecipient As Outlook.Recipient
'Get source email
Select Case TypeName(Application.ActiveWindow)
Case "Inspector"
Set objOriginalMail = ActiveInspector.CurrentItem
Case "Explorer"
Set objOriginalMail = ActiveExplorer.Selection.Item(1)
End Select
'Copy the BCC recipients to "To" field in new mail
Set objNewMail = Outlook.Application.CreateItem(olMailItem)
For Each objRecipient In objOriginalMail.Recipients
If objRecipient.Type = olBCC Then
Set objNewRecipient = objNewMail.Recipients.Add(objRecipient)
objNewRecipient.Type = olTo
objNewRecipient.Resolve
End If
Next
'Change the new email details
With objNewMail
.Subject = "Additional Notes for " & objOriginalMail.Subject
.Body = "Type mail body here....."
.Attachments.Add ("E:\Dos & Don'ts.txt")
.Importance = olImportanceHigh
.ReadReceiptRequested = True
.Send
.Display
End With
End Sub
- Nakon toga, dodajte ovaj makro na alatnu traku za brzi pristup pozivajući se na "Kako pokrenuti VBA kod u vašem Outlooku".
- Na kraju krajeva, isprobajte ovaj makro odmah.
- Za početak odaberite ili otvorite originalnu e-poštu.
- Zatim kliknite na makro na traci sa alatkama za brzi pristup.
- Zatim će biti poslat novi email. Njegovi primaoci su BCC primaoci originalne e-pošte, kao na sljedećoj slici.
Spasite svoje Outlook podatke na vrijeme
Veoma je preporučljivo da popraviti Outlook čim se vaš Outlook ošteti. Prvo se možete obratiti ugrađenom uslužnom programu za popravku – Scanpst. Međutim, ponekad možete biti podložni kvarovima Scanpst-a jer je šteta premašila ono što alat za prijemno sanduče može učiniti. U tom trenutku, vaše posljednje sredstvo je korištenje pouzdanog i robusnog alata treće strane, npr DataNumen Outlook Repair.
Uvod za autora:
Shirley Zhang je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući oštećen mdf i Outlook softverski proizvodi za popravku. Za više informacija posjetite www.datanumen.com





