2 ātri veidi, kā nosūtīt otro e-pastu tikai BCC saņēmējiem Outlook e-pastā

Jūs nosūtāt e-pastu vairākiem adresātiem un dažus no viņiem ievietojat laukā “BCC”. Vēlāk, ja vēlaties nosūtīt otru pastu tikai BCC adresātiem, varat izmantot šajā rakstā kopīgotos līdzekļus.

Vai esat kādreiz nosūtījis Outlook e-pastus vairākiem adresātiem, daži no tiem laukā “BCC”? Reizēm pēc šāda e-pasta nosūtīšanas, iespējams, vēlēsities nosūtīt otru īpašu adresātu tipam, piemēram, BCC adresātiem. Piemēram, jūs vēlaties viņiem nosūtīt dažas īpašas papildu piezīmes. Tagad mēs jūs iepazīstināsim ar diviem veidiem. Pirmais izmanto kopēšanu un ielīmēšanu. Un pēdējais faktiski ir daudz efektīvāks VBA koda dēļ. Jūs varat izvēlēties vai nu atbilstoši savām vajadzībām.

1. metode: BCC adresātu manuāla kopēšana uz jauno e-pastu

1. Pirmkārt, mapes “Nosūtītie vienumi” e-pasta sarakstā atlasiet sākotnējo e-pasta ziņojumu.
2. Pēc tam veiciet dubultklikšķi uz šī e-pasta, lai to atvērtu ziņojuma logā.
3. Pēc tam jaunajā logā rindā “BCC” atlasiet vienu adresātu.
4. Pēc tam nospiediet “Ctrl + A”, lai atlasītu visus BCC adresātus.
5. Vēlāk ar peles labo pogu noklikšķiniet un konteksta izvēlnē izvēlieties “Kopēt”.
6. Pēc tam aizveriet šo e-pastu.
7. Pēc tam izveidojiet jaunu e-pastu, izmantojot cilnes Sākums pogu “Jauns e-pasts”.
8. Visbeidzot, ielīmējiet nokopētos BCC adresātus šī jaunā e-pasta laukā “Kam”.
9. Pašlaik jūs varat rakstīt un nosūtīt šo jauno pastu pēc vēlēšanās

2. metode: nosūtiet otro e-pastu BCC saņēmējiem, izmantojot VBA

1. Pirmkārt, nospiediet “Alt + F11”, lai piekļūtu VBA redaktoram.
2. Pēc tam ievietojiet zemāk esošo VBA kodu neizmantotā 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

3. Pēc tam pievienojiet šo makro ātrās piekļuves rīkjoslai, atsaucoties uzKā palaist VBA kodu programmā Outlook".
4. Galu galā izmēģiniet šo makro tūlīt.

• Vispirms atlasiet vai atveriet sākotnējo e-pasta ziņojumu.
• Pēc tam ātrās piekļuves rīkjoslā noklikšķiniet uz makro.
• Pēc tam tiks nosūtīts jauns e-pasts. Tā saņēmēji ir sākotnējā e-pasta ziņojuma BCC saņēmēji, piemēram, šis attēls.

Savlaicīgi saglabājiet savus Outlook datus

Tas ir ļoti ieteicams labot Outlook tiklīdz jūsu Outlook ir bojāta. Pirmkārt, jūs varat izmantot iebūvēto remonta utilītu - Scanpst. Tomēr dažreiz jums var rasties Scanpst kļūmes, jo bojājums ir pārsniedzis iesūtnes rīka spēju. Tajā laikā jūsu pēdējā iespēja ir izmantot uzticamu un stabilu trešās puses rīku, piemēram, DataNumen Outlook Repair.

Autora ievads:

Šērlija Džana ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp bojāts mdf un perspektīvas remonta programmatūras produktus. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar