วิธีแทรกข้อความเฉพาะที่เคอร์เซอร์เมื่อเขียนข้อความใน Outlook?
สมมติว่าคุณมีสตริงข้อความเฉพาะที่ใช้บ่อยเมื่อเขียนข้อความอีเมลดังนั้นคุณต้องการแทรกข้อความที่ตำแหน่งปัจจุบันของเคอร์เซอร์ในเนื้อหาอีเมลโดยอัตโนมัติโดยไม่ต้องพิมพ์ซ้ำแล้วซ้ำอีก บทความนี้ผมจะพูดถึงวิธีง่ายๆในการแก้ปัญหานี้อย่างรวดเร็ว
แทรกข้อความเฉพาะหรือวันที่ปัจจุบันที่เคอร์เซอร์เมื่อเขียนข้อความด้วยรหัส VBA
แทรกข้อความเฉพาะหรือวันที่ปัจจุบันที่เคอร์เซอร์เมื่อเขียนข้อความด้วยรหัส VBA
รหัส VBA ต่อไปนี้สามารถช่วยคุณในการแทรกสตริงข้อความหรือวันที่ปัจจุบันที่ตำแหน่งเคอร์เซอร์ได้โปรดดำเนินการดังนี้:
1. กด ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2. จากนั้นคลิก สิ่งที่ใส่เข้าไป > โมดูลคัดลอกและวางโค้ดด้านล่างลงในโมดูลเปล่าที่เปิดอยู่:
รหัส VBA: แทรกข้อความเฉพาะหรือวันที่ปัจจุบันที่เคอร์เซอร์
Option Explicit
Public Sub InsertInfoToSelection()
Dim xDoc As Word.Document
Dim xSel As Word.Selection
On Error Resume Next
Select Case TypeName(Application.ActiveWindow)
Case "Explorer"
Set xDoc = Application.ActiveExplorer.Selection(1).GetInspector.WordEditor
Case "Inspector"
Set xDoc = Application.ActiveInspector.WordEditor
End Select
Set xSel = xDoc.Application.Selection
xSel.InsertBefore Format("ExtendOffice")
Set xDoc = Nothing
Set xSel = Nothing
End Sub
หมายเหตุ: ในโค้ดด้านบน ExtendOffice เป็นข้อความเฉพาะที่คุณต้องการแทรกหากคุณต้องการแทรกวันที่ปัจจุบันแทนสตริงข้อความโปรดเปลี่ยนข้อความในสคริปต์นี้ xSel.InsertBefore รูปแบบ ("ExtendOffice") ไปยัง xSel.InsertBefore Format (ตอนนี้ "DD / MM / YYYY").
3. จากนั้นบันทึกและปิดหน้าต่างรหัสสร้างอีเมลใหม่และในหน้าต่างข้อความให้คลิก ปรับแต่งแถบเครื่องมือด่วน เลื่อนลงและเลือก คำสั่งเพิ่มเติมดูภาพหน้าจอ:
4. ใน ตัวเลือกของ outlook โปรดดำเนินการดังต่อไปนี้:
(1. ) เลือก แมโคร จาก เลือกคำสั่งจาก หล่นลง;
(2. ) คลิกชื่อมาโครที่คุณใส่ไว้
(3. ) จากนั้นคลิก เพิ่ม เพื่อเพิ่มมาโครนี้ลงในไฟล์ ปรับแต่งแถบเครื่องมือด่วน กล่องรายการ
5. จากนั้นคลิก OK เพื่อปิดกล่องโต้ตอบตอนนี้ไอคอนมาโครถูกแทรกลงในไฟล์ ปรับแต่งแถบเครื่องมือด่วน. วางเคอร์เซอร์ในตำแหน่งที่คุณต้องการแทรกข้อความจากนั้นคลิกปุ่มมาโครนี้ข้อความเฉพาะจะถูกแทรกพร้อมกันดูภาพหน้าจอ:
แทรกข้อความเฉพาะที่ตำแหน่งใดก็ได้เมื่อเขียนข้อความ:
กับ Kutools สำหรับ Outlook's ข้อความอัตโนมัติ คุณสามารถสร้างข้อความอัตโนมัติแล้วแทรกได้ทุกที่เมื่อเขียนข้อความตามที่คุณต้องการ Kutools สำหรับ Outlook: ด้วย Add-in ของ Excel ที่มีประโยชน์มากกว่า 100 รายการให้ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 60 วัน ดาวน์โหลดและทดลองใช้ฟรีทันที!
|
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
Kutools สำหรับ Outlook - คุณสมบัติอันทรงพลังมากกว่า 100 รายการเพื่อเติมพลังให้กับ Outlook ของคุณ
🤖 ผู้ช่วยจดหมาย AI: ส่งอีเมลระดับมืออาชีพทันทีด้วยเวทมนตร์ AI คลิกเพียงครั้งเดียวเพื่อตอบกลับอย่างชาญฉลาด น้ำเสียงที่สมบูรณ์แบบ การเรียนรู้หลายภาษา เปลี่ยนรูปแบบการส่งอีเมลอย่างง่ายดาย! ...
📧 การทำงานอัตโนมัติของอีเมล: ไม่อยู่ที่สำนักงาน (ใช้ได้กับ POP และ IMAP) / กำหนดการส่งอีเมล / Auto CC/BCC ตามกฎเมื่อส่งอีเมล / ส่งต่ออัตโนมัติ (กฎขั้นสูง) / เพิ่มคำทักทายอัตโนมัติ / แบ่งอีเมลผู้รับหลายรายออกเป็นข้อความส่วนตัวโดยอัตโนมัติ ...
📨 การจัดการอีเมล์: เรียกคืนอีเมลได้อย่างง่ายดาย / บล็อกอีเมลหลอกลวงตามหัวเรื่องและอื่นๆ / ลบอีเมลที่ซ้ำกัน / การค้นหาขั้นสูง / รวมโฟลเดอร์ ...
📁 ไฟล์แนบโปร: บันทึกแบทช์ / การแยกแบทช์ / การบีบอัดแบบแบตช์ / บันทึกอัตโนมัติ / ถอดอัตโนมัติ / บีบอัดอัตโนมัติ ...
🌟 อินเตอร์เฟซเมจิก: 😊อีโมจิที่สวยและเจ๋งยิ่งขึ้น / เพิ่มประสิทธิภาพการทำงาน Outlook ของคุณด้วยมุมมองแบบแท็บ / ลดขนาด Outlook แทนที่จะปิด ...
???? เพียงคลิกเดียวสิ่งมหัศจรรย์: ตอบกลับทั้งหมดด้วยไฟล์แนบที่เข้ามา / อีเมลต่อต้านฟิชชิ่ง / 🕘 แสดงโซนเวลาของผู้ส่ง ...
👩🏼🤝👩🏻 รายชื่อและปฏิทิน: แบทช์เพิ่มผู้ติดต่อจากอีเมลที่เลือก / แบ่งกลุ่มผู้ติดต่อเป็นกลุ่มแต่ละกลุ่ม / ลบการแจ้งเตือนวันเกิด ...
เกิน คุณสมบัติ 100 รอการสำรวจของคุณ! คลิกที่นี่เพื่อค้นพบเพิ่มเติม