คุณส่งอีเมลถึงผู้รับหลายคนและใส่บางคนในช่อง "BCC" ในภายหลัง หากคุณต้องการส่งอีเมลฉบับที่สองไปยังผู้รับ BCC เท่านั้น คุณสามารถใช้วิธีการที่แบ่งปันในบทความนี้
คุณเคยส่งอีเมล Outlook ใด ๆ ไปยังผู้รับหลายคนโดยบางอีเมลในช่อง "BCC" หรือไม่? ในบางครั้ง หลังจากส่งอีเมลดังกล่าวแล้ว คุณอาจต้องการส่งอีเมลฉบับที่สองไปยังผู้รับประเภทใดประเภทหนึ่ง เช่น ผู้รับ BCC ตัวอย่างเช่น คุณต้องการส่งหมายเหตุเพิ่มเติมบางอย่างให้พวกเขา ตอนนี้เราจะแนะนำคุณ 2 วิธี อดีตใช้การคัดลอกและวาง และอย่างหลังนั้นมีประสิทธิภาพมากกว่าเนื่องจากรหัส VBA คุณสามารถเลือกตามความต้องการของคุณ
วิธีที่ 1: คัดลอกผู้รับ BCC ไปยังอีเมลใหม่ด้วยตนเอง
- ประการแรก ในรายการอีเมลของโฟลเดอร์ "รายการที่ส่ง" ให้เลือกอีเมลต้นฉบับ
- จากนั้น ดับเบิลคลิกที่เมลนี้เพื่อเปิดในหน้าต่างข้อความของตัวเอง
- จากนั้น ในหน้าต่างใหม่ ให้เลือกผู้รับหนึ่งรายในบรรทัด “BCC”
- จากนั้นกด “Ctrl + A” เพื่อเลือกผู้รับ BCC ทั้งหมด
- หลังจากนั้น ให้คลิกขวาและเลือก "คัดลอก" จากเมนูบริบท
- หลังจากนั้นให้ปิดอีเมลนี้
- จากนั้น สร้างอีเมลใหม่โดยปุ่ม “อีเมลใหม่” บนแท็บ “หน้าแรก”
- สุดท้าย วางผู้รับสำเนาลับที่คัดลอกลงในฟิลด์ "ถึง" ของอีเมลใหม่นี้
- ในปัจจุบัน คุณสามารถเขียนและส่งจดหมายใหม่นี้ได้ตามต้องการ
วิธีที่ 2: ส่งอีเมลฉบับที่สองไปยังผู้รับ BCC ผ่าน VBA
- ในขั้นแรกให้กด“ Alt + F11” เพื่อเข้าถึงตัวแก้ไข VBA
- จากนั้น ใส่รหัส VBA ด้านล่างลงในโมดูลที่ไม่ได้ใช้
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
- ต่อจากนั้น ให้เพิ่มแมโครนี้ไปยัง Quick Access Toolbar โดยอ้างถึง “วิธีเรียกใช้รหัส VBA ใน Outlook ของคุณ"
- ในที่สุด ลองใช้มาโครนี้ทันที
- ในการเริ่มต้น ให้เลือกหรือเปิดอีเมลต้นฉบับ
- จากนั้นคลิกแมโครในแถบเครื่องมือด่วน
- ถัดไป อีเมลใหม่จะถูกส่งออกไป ผู้รับคือผู้รับ BCC ของอีเมลต้นฉบับ ดังเช่นภาพต่อไปนี้
กอบกู้ข้อมูล Outlook ของคุณให้ทันเวลา
ขอแนะนำอย่างยิ่งให้ ซ่อมแซม Outlook ทันทีที่ Outlook ของคุณเสียหาย ขั้นแรก คุณสามารถขอความช่วยเหลือจากยูทิลิตี้ซ่อมแซมในตัว – Scanpst อย่างไรก็ตาม ในบางครั้ง คุณอาจประสบกับความล้มเหลวของ Scanpst เนื่องจากความเสียหายเกินกว่าที่เครื่องมือกล่องจดหมายจะทำได้ เมื่อถึงเวลานั้น ทางเลือกสุดท้ายของคุณคือการใช้เครื่องมือของบุคคลที่สามที่เชื่อถือได้และมีประสิทธิภาพ เช่น DataNumen Outlook Repair.
บทนำผู้เขียน:
Shirley Zhang เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ mdf เสียหาย และผลิตภัณฑ์ซอฟต์แวร์ซ่อมแซมแนวโน้ม ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.