ผู้ใช้หลายคนคุ้นเคยกับการแทรกวันที่หรือเวลาปัจจุบันลงในหัวเรื่องหรือเนื้อหาของอีเมลเมื่อเขียนอีเมลใหม่ บทความนี้จะสอนวิธีบรรลุผลในเวลาอันรวดเร็ว
ในหน้าก่อนหน้านี้ost - "วิธีเพิ่มวันที่ปัจจุบันลงในหัวเรื่องของอีเมล Outlook ของคุณโดยอัตโนมัติ” คุณสามารถเรียนรู้วิธีเพิ่มวันที่หรือเวลาปัจจุบันลงในหัวเรื่องโดยอัตโนมัติ แต่วิธีการในหน้านั้นost เป็นเพียงการสร้างรูปแบบข้อความที่กำหนดเอง ดังนั้นทุกครั้งที่คุณต้องการสร้างอีเมลใหม่โดยมีวันที่หรือเวลาปัจจุบันในหัวเรื่องคุณต้องเลือกแบบฟอร์มที่กำหนดเองแทนที่จะสร้างอีเมลใหม่ตามปกติ เห็นได้ชัดว่ามันจะค่อนข้างยุ่งยาก
อันที่จริง Outlook ได้เสนอช่องสำหรับใส่วันที่หรือเวลาให้กับเราแล้ว นอกจากนี้คุณสามารถใช้ Outlook VBA เพื่อแทรกวันที่หรือเวลาปัจจุบันลงในเนื้อหาหรือหัวเรื่องของอีเมลใหม่โดยอัตโนมัติ สำหรับวิธีที่คุณเลือกนั้นขึ้นอยู่กับความถี่ที่คุณต้องใส่วันที่หรือเวลา
แทรกด้วยตัวเองตามฟิลด์ "วันที่และเวลา"
- ถึงtart ด้วยเปิด Outlook
- จากนั้นสร้างข้อความใหม่โดยคลิกปุ่ม "อีเมลใหม่" ในกลุ่ม "ใหม่" ใต้แท็บ "หน้าแรก"
- จากนั้นในหน้าต่างข้อความใหม่คุณสามารถคลิกเข้าไปในเนื้อหาอีเมลและไปที่แท็บ“ แทรก”
- ถัดไปคุณสามารถค้นหาและคลิกช่อง "วันที่และเวลา" ในกลุ่ม "ข้อความ"
- หลังจากนั้นกล่องโต้ตอบใหม่จะปรากฏขึ้น คุณสามารถเลือกรูปแบบที่ใช้ได้จากนั้นคลิกปุ่ม“ ตกลง”
- หลังจากกลับไปที่หน้าต่างข้อความคุณจะเห็นวันที่หรือเวลาปัจจุบันในเนื้อหาอีเมล ตามค่าเริ่มต้น Outlook ไม่อนุญาตให้คุณใช้ช่อง "วันที่และเวลา" กับหัวเรื่อง
- ดังนั้นสุดท้ายหากคุณต้องการแทรกวันที่หรือเวลาที่ต้องการคุณต้องคัดลอกจากเนื้อหาและวางลงในหัวเรื่องด้วยตนเอง
แนะนำให้ใช้วิธีนี้มากกว่าหากคุณแทบไม่จำเป็นต้องใส่วันที่หรือเวลาปัจจุบัน แต่หากคุณจำเป็นต้องแทรกบ่อยครั้งหรือตลอดเวลาคุณควรใช้รหัส VBA ต่อไปนี้เพื่อให้บรรลุโดยอัตโนมัติ
แทรกอัตโนมัติด้วย Outlook VBA
- ในตอนแรกให้กดปุ่ม“ Alt + F11” เพื่อเข้าถึงตัวแก้ไข VBA
- จากนั้นดับเบิลคลิกโครงการ“ ThisOutlookSession” ทางด้านซ้ายเพื่อเปิด
- จากนั้นคัดลอกรหัสต่อไปนี้ลงในนั้น
Public WithEvents objInspectors As Inspectors
Public WithEvents objMail As MailItem
Private Sub Initialize_handlers()
Set objInspectors = Application.Inspectors
End Sub
Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
If TypeOf Inspector.CurrentItem Is MailItem Then
Set objMail = Inspector.CurrentItem
End If
End Sub
Private Sub objMail_Open(Cancel As Boolean)
Dim strTime As String
'the current time
strTime = Now
'insert to subject
'If you don't want to insert to subject, remove the following line
objMail.Subject = strTime
'insert to body
'If you don't want to insert to body, remove the following line
objMail.Body = strTime & objMail.Body
End Sub
หมายเหตุ: รหัสข้างต้นจะทำงานเพื่อแทรกเวลาปัจจุบันลงในหัวเรื่องและเนื้อหาโดยอัตโนมัติ หากคุณต้องการแทรกวันที่ปัจจุบันให้แทนที่ "objMail_เปิด” ย่อยมีดังต่อไปนี้:
Private Sub objMail_Open(Cancel As Boolean)
Dim strDate As String
'the current date
strDate = Date
'insert to subject
objMail.Subject = strDate
'insert to body
objMail.Body = strDate & objMail.Body
End Sub
- จากนั้นลงนามรหัสนี้ตามปกติ
- ต่อมา restart Outlook เพื่อเปิดใช้งานแมโคร
- ในที่สุดคุณก็สามารถลองได้
- คลิกที่ปุ่ม "อีเมลใหม่" โดยตรงเพื่อเปิดอีเมลใหม่
- คุณจะพบว่าอีเมลอัตโนมัติใหม่มีวันที่หรือเวลาปัจจุบันในหัวเรื่องและเนื้อหาดังภาพด้านล่าง:
อย่าวางใจในอีเมลที่ไม่รู้จักทันที
คุณต้องเคยได้รับอีเมลขยะ คุณจัดการกับพวกเขาอย่างไร? ไม่สามารถดาวน์โหลดไฟล์แนบหรือเปิดลิงก์ในอีเมลประเภทนี้เนื่องจากอาจมีไวรัส เมื่อข้อมูล Outlook ของคุณติดไวรัสเครื่องมือซ่อมแซมกล่องขาเข้า Scanpst.exe จะไม่สร้างเอฟเฟกต์ ในกรณีนี้คุณไม่มีทางเลือกอื่นนอกจากหันไปหาผู้ที่มีประสบการณ์มากกว่า PST แก้ไข เครื่องมือเช่น DataNumen Outlook Repair.
บทนำผู้เขียน:
Shirley Zhang เป็นผู้เชี่ยวชาญด้านการกู้คืนข้อมูลใน DataNumen, Inc. ซึ่งเป็นผู้นำระดับโลกด้านเทคโนโลยีการกู้คืนข้อมูล ได้แก่ ความเสียหาย SQL Server และผลิตภัณฑ์ซอฟต์แวร์ซ่อมแซมแนวโน้ม ดูข้อมูลเพิ่มเติมได้ที่ wwwdatanumenด้วย.