Ju dërgoni një email te disa marrës dhe vendosni disa prej tyre në fushën "BCC". Më vonë, nëse dëshironi të dërgoni një postë të dytë vetëm te marrësit e BCC, mund të përdorni mjetet e përbashkëta në këtë artikull.
A keni dërguar ndonjëherë ndonjë email të Outlook për disa marrës me disa në fushën "BCC"? Ndonjëherë, pas dërgimit të një emaili të tillë, mund të dëshironi t'i dërgoni një të dytë një lloji të caktuar marrësish, siç janë marrësit e BCC. Për shembull, ju dëshironi t'u dërgoni atyre disa shënime të veçanta shtesë. Tani, ne do t'ju prezantojmë 2 mënyra. I pari përdor copy and paste. Dhe kjo e fundit është në fakt shumë më efektive për shkak të kodit VBA. Ju mund të zgjidhni ose sipas nevojave tuaja.
Metoda 1: Kopjoni me dorë marrësit e BCC në emailin e ri
- Së pari, në listën e postës elektronike të dosjes "Artikuj të dërguar", zgjidhni emailin origjinal.
- Pastaj, klikoni dy herë mbi këtë postë për ta hapur atë në dritaren e tij të Mesazhit.
- Më pas, në dritaren e re, zgjidhni një marrës në linjën "BCC".
- Më pas, shtypni "Ctrl + A" për të zgjedhur të gjithë marrësit e BCC.
- Më vonë, klikoni me të djathtën dhe zgjidhni "Kopjo" nga menyja e kontekstit.
- Pas kësaj, mbylleni këtë email.
- Më pas, krijoni një email të ri me butonin "E-mail i ri" në skedën "Home".
- Së fundi, ngjitni marrësit e kopjuar të BCC në fushën "Për" të këtij emaili të ri.
- Aktualisht, ju mund ta kompozoni dhe dërgoni këtë postë të re sipas dëshirës
Metoda 2: Dërgoni një email të dytë marrësve të BCC nëpërmjet VBA
- Në radhë të parë, shtypni "Alt + F11" për të hyrë në redaktuesin VBA.
- Pastaj, vendosni kodin VBA më poshtë në një modul të papërdorur.
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
- Më pas, shtoni këtë makro në shiritin e veglave të aksesit të shpejtë duke iu referuar "Si të ekzekutoni kodin VBA në Outlook tuaj".
- Në fund të fundit, provoni këtë makro tani.
- Për të filluar, zgjidhni ose hapni emailin origjinal.
- Pastaj, klikoni makro në shiritin e veglave të aksesit të shpejtë.
- Më pas, do të dërgohet një email i ri. Marrësit e tij janë marrësit e BCC të emailit origjinal, si imazhi i mëposhtëm.
Shpëtoni të dhënat tuaja të Outlook në kohë
Është shumë e këshillueshme që riparimi i Outlook sapo të dëmtohet Outlook-u juaj. Së pari, mund të përdorni mjetin e integruar të riparimit - Scanpst. Megjithatë, ndonjëherë, mund të jeni subjekt i dështimeve të Scanpst pasi dëmi ka tejkaluar atë që mund të bëjë mjeti i kutisë hyrëse. Në atë kohë, zgjidhja juaj e fundit është të përdorni një mjet të besueshëm dhe të fuqishëm të palës së tretë, si p.sh DataNumen Outlook Repair.
Hyrje e autorit:
Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë mdf i dëmtuar dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com