E-poštno sporočilo pošljete več prejemnikom in nekatere od njih vnesete v polje »BCC«. Če želite pozneje poslati drugo pošto samo prejemnikom BCC, lahko uporabite sredstva, ki so v tem članku.
Ali ste kdaj poslali katero koli Outlookovo e-pošto več prejemnikom z nekaterimi v polju »BCC«? Včasih boste po pošiljanju takega e-poštnega sporočila morda želeli poslati drugo določeni vrsti prejemnikov, na primer prejemnikom BCC. Na primer, želite jim poslati nekaj posebnih dodatnih opomb. Zdaj vam bomo predstavili 2 načina. Prvi uporablja kopiranje in lepljenje. In slednji je zaradi kode VBA dejansko veliko bolj učinkovit. Izberete lahko bodisi glede na vaše potrebe.
1. način: Ročno kopirajte prejemnike BCC v novo e-pošto
- Najprej na seznamu e-poštnih sporočil v mapi »Poslani predmeti« izberite izvirno e-poštno sporočilo.
- Nato dvokliknite to pošto, da jo odprete v lastnem oknu za sporočila.
- Nato v novem oknu izberite enega prejemnika v vrstici “BCC”.
- Nato pritisnite »Ctrl + A«, da izberete vse prejemnike BCC.
- Kasneje z desno miškino tipko kliknite in v kontekstnem meniju izberite »Kopiraj«.
- Po tem zaprite to e-pošto.
- Nato ustvarite novo e-pošto z gumbom »Nova e-pošta« na zavihku »Domov«.
- Nazadnje prilepite kopirane prejemnike BCC v polje »Za« tega novega e-poštnega sporočila.
- Trenutno lahko poljubno sestavite in pošljete to novo pošto
2. način: pošljite drugo e-pošto prejemnikom BCC prek VBA
- Za dostop do urejevalnika VBA najprej pritisnite »Alt + F11«.
- Nato spodnjo kodo VBA vstavite v neuporabljen 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
- Nato dodajte ta makro v orodno vrstico za hitri dostop, ki se nanaša na »Kako zagnati kodo VBA v Outlooku".
- Navsezadnje poskusite ta makro zdaj.
- Za začetek izberite ali odprite izvirno e-pošto.
- Nato kliknite makro v orodni vrstici za hitri dostop.
- Nato bo poslano novo e-poštno sporočilo. Njegovi prejemniki so prejemniki BCC izvirnega e-poštnega sporočila, kot je naslednja slika.
Pravočasno rešite svoje Outlookove podatke
Zelo priporočljivo je, da popravilo Outlook takoj, ko je vaš Outlook poškodovan. Najprej se lahko zatečete k vgrajenemu pripomočku za popravilo – Scanpst. Vendar pa lahko včasih pride do napak Scanpst, saj je škoda presegla tisto, kar lahko naredi orodje za prejeto pošto. Takrat je vaša zadnja možnost uporaba zanesljivega in robustnega orodja tretje osebe, kot je DataNumen Outlook Repair.
Uvod avtorja:
Shirley Zhang je strokovnjakinja za obnovitev podatkov v DataNumen, Inc., ki je vodilna na svetu na področju tehnologij za obnovitev podatkov, vključno z poškodovan mdf in obeti za popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com





