ไปยังเนื้อหาหลัก

วิธีแทรกตัวเลือกวันที่ในอีเมลใน Outlook?

ผู้เขียน : ซิลูเวีย แก้ไขล่าสุด: 2024-05-09

สมมติว่าคุณจำเป็นต้องส่งตารางงานให้กับเพื่อนร่วมงาน โดยมอบหมายงานต่างๆ ให้กับบุคคลอื่นในวันที่ต่างกัน อย่างไรก็ตาม คุณกังวลเกี่ยวกับการป้อนวันที่ผิดพลาดด้วยตนเอง ดังนั้นคุณจึงต้องใช้ตัวเลือกวันที่แทน บทช่วยสอนนี้มีวิธีการที่จะช่วยคุณแทรกตัวเลือกวันที่ในอีเมลใน Outlook


แทรกตัวเลือกวันที่ในอีเมลใน Outlook ด้วยรหัส VBA

คุณสามารถเรียกใช้โค้ด VBA ต่อไปนี้เพื่อแทรกตัวเลือกวันที่ในอีเมล Outlook โปรดปฏิบัติตามคำแนะนำด้านล่าง

  1. เปิด Outlook ของคุณ กด อื่น ๆ + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
  2. ในบานหน้าต่างด้านซ้าย ดับเบิลคลิก Project1 > วัตถุ Microsoft Outlook > เซสชัน Outlook นี้ จากนั้นคัดลอกโค้ด VBA ต่อไปนี้ลงใน ThisOutlookSession (รหัส) หน้าต่าง
    รหัส VBA: แทรกตัวเลือกวันที่ในอีเมล Outlook
    Sub DatePicker()
    'Updated by Extendoffice 20220615
      Dim xDoc As Document
      On Error Resume Next
      Set xDoc = Application.ActiveInspector.WordEditor
      With xDoc.Application.Selection
        .Range.ContentControls.Add (wdContentControlDate)
        .ParentContentControl.DateDisplayFormat = "MMMM d, yyyy"
        .InsertAfter Format(Now(), "MMMM d, yyyy")
        .MoveRight wdCharacter, 1
      End With
    End Sub
    หมายเหตุ ในรหัสคุณสามารถเปลี่ยน "MMMM ด ปปปป" เป็นรูปแบบวันที่ที่คุณต้องการ
  3. อยู่ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก เครื่องมือ > อ้างอิง
  4. ตัว Vortex Indicator ได้ถูกนำเสนอลงในนิตยสาร ข้อมูลอ้างอิง – Project1 ให้ทำเครื่องหมายที่ ไลบรารีวัตถุ Microsoft Word 16.0 ช่องทำเครื่องหมายแล้วคลิก OK เพื่อบันทึกการเปลี่ยนแปลง
  5. กด อื่น ๆ + Q ปุ่มเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
  6. ตัว Vortex Indicator ได้ถูกนำเสนอลงในนิตยสาร จดหมาย ดูคลิกไฟล์ อีเมลใหม่ ใต้ปุ่ม หน้าแรก แท็บเพื่อสร้างอีเมลใหม่
  7. ตัว Vortex Indicator ได้ถูกนำเสนอลงในนิตยสาร ระบุความประสงค์หรือข้อมูลเพิ่มเติม คลิกหน้าต่าง ปรับแต่งแถบเครื่องมือด่วน ปุ่ม และจากนั้นเลือก คำสั่งเพิ่มเติม จากเมนูแบบเลื่อนลง ดูภาพหน้าจอ:
  8. ตัว Vortex Indicator ได้ถูกนำเสนอลงในนิตยสาร ตัวเลือกของ outlook หน้าต่างคุณต้องกำหนดค่าดังนี้
    1. Choose แมโคร ใน เลือกคำสั่งจาก รายการแบบหล่นลง
    2. เลือกสคริปต์ที่คุณสร้างด้านบนในกล่องคำสั่งด้านซ้าย
    3. คลิก เพิ่ม ปุ่ม
    4. เก็บสคริปต์ที่เลือกไว้ในกล่องด้านขวา จากนั้นคลิกปุ่ม แก้ไข ปุ่ม. ใน ปุ่มปรับเปลี่ยน กล่องโต้ตอบ กำหนดปุ่มใหม่ให้กับสคริปต์แล้วคลิก ตกลง
    5. คลิก OK ใน ตัวเลือกของ outlook หน้าต่างเพื่อบันทึกการเปลี่ยนแปลง
  9. ตอนนี้สคริปต์ VBA ถูกเพิ่มไปยัง แถบเครื่องมือด่วน และแสดงเป็นไอคอนที่คุณระบุ
  10. จากนี้ไป ขณะเขียนอีเมล คุณสามารถคลิกไอคอนตัวเลือกวันที่บน แถบเครื่องมือด่วน เพื่อแทรกตัวใช้เลือกวันที่ลงในเนื้อหาอีเมล จากนั้นเลือกวันที่ที่คุณต้องการจากอีเมลนั้น ดูการสาธิตต่อไปนี้
หมายเหตุ:
  • คุณสามารถแทรกตัวเลือกวันที่หลายรายการลงในเนื้อหาของอีเมลได้
  • คุณสามารถเปลี่ยนวันที่ที่คุณเลือกได้: คลิกที่ฟิลด์วันที่เพื่อแสดงตัวควบคุมวันที่ จากนั้นเลือกวันที่ใหม่ตามต้องการ
  • ตัวเลือกวันที่นี้สามารถแทรกลงในเนื้อความของการนัดหมายหรืองานได้ หากคุณต้องการ ให้สร้างการนัดหมายหรืองานใหม่และทำซ้ำขั้นตอนที่ 7-8 ด้านบนเพื่อให้บรรลุเป้าหมาย
  • หากคุณรีสตาร์ท Outlook และพบว่าสคริปต์ไม่ทำงาน นั่นเป็นเพราะแมโครถูกปิดใช้งาน คุณต้องทำตามขั้นตอนด้านล่างเพื่อเปิดใช้งานมาโครอีกครั้ง:
    1. คลิกที่ เนื้อไม่มีมัน > Options เพื่อเข้าสู่ ตัวเลือกของ outlook หน้าต่าง
    2. คลิกที่ ศูนย์ความเชื่อถือ > การตั้งค่าศูนย์ความเชื่อถือ.
    3. ตัว Vortex Indicator ได้ถูกนำเสนอลงในนิตยสาร ศูนย์ความเชื่อถือ คลิกที่หน้าต่าง การตั้งค่ามาโคร แท็บเลือก เปิดใช้งานมาโครทั้งหมด แล้วคลิก OK > OK เพื่อบันทึกการตั้งค่าใหม่
    4. เริ่ม Outlook ใหม่อีกครั้ง

สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

ข่าวด่วน: Kutools สำหรับ Outlook เปิดตัว เวอร์ชันฟรี!

สัมผัสประสบการณ์ Kutools ใหม่สำหรับ Outlook เวอร์ชันฟรีพร้อมฟีเจอร์ที่น่าทึ่งกว่า 70 รายการ ให้คุณใช้งานได้ตลอดไป! คลิกดาวน์โหลดเลย!

🤖 Kutools AI : ส่งอีเมลระดับมืออาชีพทันทีด้วยเวทมนตร์ AI คลิกเพียงครั้งเดียวเพื่อตอบกลับอย่างชาญฉลาด น้ำเสียงที่สมบูรณ์แบบ การเรียนรู้หลายภาษา เปลี่ยนรูปแบบการส่งอีเมลอย่างง่ายดาย! ...

📧 การทำงานอัตโนมัติของอีเมล: ตอบกลับอัตโนมัติ (ใช้ได้กับ POP และ IMAP)  /  กำหนดการส่งอีเมล  /  Auto CC/BCC ตามกฎเมื่อส่งอีเมล  /  ส่งต่ออัตโนมัติ (กฎขั้นสูง)   /  เพิ่มคำทักทายอัตโนมัติ   /  แบ่งอีเมลผู้รับหลายรายออกเป็นข้อความส่วนตัวโดยอัตโนมัติ ...

📨 การจัดการอีเมล์: เรียกคืนอีเมล  /  บล็อกอีเมลหลอกลวงตามหัวเรื่องและอื่นๆ  /  ลบอีเมลที่ซ้ำกัน  /  การค้นหาขั้นสูง  /  รวมโฟลเดอร์ ...

📁 ไฟล์แนบโปรบันทึกแบทช์  /  การแยกแบทช์  /  การบีบอัดแบบแบตช์  /  บันทึกอัตโนมัติ   /  ถอดอัตโนมัติ  /  บีบอัดอัตโนมัติ ...

🌟 อินเตอร์เฟซเมจิก: 😊อีโมจิที่สวยและเจ๋งยิ่งขึ้น   /  เตือนคุณเมื่อมีอีเมลสำคัญมาถึง  /  ลดขนาด Outlook แทนที่จะปิด ...

???? เพียงคลิกเดียวสิ่งมหัศจรรย์: ตอบกลับทั้งหมดด้วยไฟล์แนบที่เข้ามา  /   อีเมลต่อต้านฟิชชิ่ง  /  🕘 แสดงโซนเวลาของผู้ส่ง ...

👩🏼‍🤝‍👩🏻 รายชื่อและปฏิทิน: แบทช์เพิ่มผู้ติดต่อจากอีเมลที่เลือก  /  แบ่งกลุ่มผู้ติดต่อเป็นกลุ่มแต่ละกลุ่ม  /  ลบการแจ้งเตือนวันเกิด ...

ปลดล็อค Kutools for Outlook ทันทีด้วยการคลิกเพียงครั้งเดียว—ฟรีอย่างถาวร- อย่ารอช้า ดาวน์โหลดตอนนี้และเพิ่มประสิทธิภาพของคุณ!

kutools สำหรับคุณสมบัติ Outlook1 kutools สำหรับคุณสมบัติ Outlook2
 

 

 

Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
This is my error: "Compile error: User defined type not defined."
When I go to Tools, Reference is grayed out.
This comment was minimized by the moderator on the site
WHEN I CLOSE THE OUTLOOK AND RESTAR THIS IS NOT WORKING, WHY? CAN YOU HELP
This comment was minimized by the moderator on the site
Hi,

I'm very sorry, this issue occurred because macros were disabled after restarting Outlook. Please follow these steps to re-enable macros:
Click on File > Options to enter the Outlook Options window, click on Trust Center > Trust Center Settings, in the Trust Center window, click on the Macro Settings tab, select the Enable all macros option, and click OK to save the new settings. Please restart Outlook once more, and the issue should be resolved.
This comment was minimized by the moderator on the site
Hello. Very clear instructions, thank you.
When I attempt to use the macro, I get this error:
"Compile error: User defined type not defined."
Sub DatePicker() and xDoc As Document are highlighted.
Any ideas on how to fix it please?
This comment was minimized by the moderator on the site
Hi Dave,

To solve this problem, please follow the instruction of step 3 and 4 to enable the Microsoft Word 16.0 Object Library option in the Microsoft Visual Basic for Applications window.
https://www.extendoffice.com/images/stories/comments/comment-picture-zxm/outlook-word-referece-vba.png?1711618070
This comment was minimized by the moderator on the site
This was exactly what I was looking for. Thank you!!
There are no comments posted here yet
Leave your comments
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations