กำหนดเวลาและอีเมลซ้ำใน Outlook?


22

ฉันต้องส่งอีเมลในเวลาที่ระบุในแต่ละวันและต้องทำทุกวัน ฉันจะทำกับ Outlook ได้อย่างไร

Delay deliveryช่วยในการส่งจดหมายในเวลาที่กำหนด; แต่จะสร้างอีเมลใหม่ที่จะส่งในวันพรุ่งนี้ได้อย่างไร

ป้อนคำอธิบายรูปภาพที่นี่


1
หากคุณไม่สนใจ VBA วิธีนี้อาจใช้ได้กับคุณ: slipstick.com/developer/send-email-outlook-reminders-fires
kmote

ขอขอบคุณ. ฉันอ่านมาโคร แต่ไม่เข้าใจวิธีการทำ กรุณาแนะนำฉันและใส่ลงในคำตอบมากกว่าความคิดเห็นที่จะได้รับการยอมรับ
Nam G VU

ฉันขอแนะนำให้เพิ่มรายละเอียดเพิ่มเติมในโพสต์ของคุณ: อีเมลเหมือนกันทุกวันหรือเป็นเนื้อหาที่สร้างขึ้นโดยอัตโนมัติ ที่อยู่ปลายทางนั้นเหมือนกันหรือไม่
kmote

เรียน @kmote เนื้อหาและอีเมลจะเยื้องทุกวัน
Nam G VU

คำตอบ:


28

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

1. เปิดเครื่องมือแก้ไข VBA

บนแถบ Ribbon ของ Outlook คลิกที่แท็บนักพัฒนา (เปิดใช้ที่นี่ ) แล้วคลิกVisual Basicตกลง หากคุณไม่มีแท็บนักพัฒนาบนแถบริบบิ้นคุณจะต้องเปิดใช้งาน อ้างถึงคำแนะนำในหน้า MSDN นี้ (เลื่อนลงไปที่ส่วนที่มีข้อความ "เพื่อเปิดใช้งานแท็บนักพัฒนา" หมายเหตุ: คุณควรอ่านส่วนของเว็บไซต์นั้นที่มีข้อความว่า "เมื่อต้องการเปิดใช้งานแมโคร") การกดVisual Basicปุ่มจะทำให้แอปพลิเคชันใหม่เปิดขึ้น (ตัวแก้ไข VBA) เปิดThisOutlookSessionบานหน้าต่างใหญ่ตรงกลางคือที่มาโครของคุณจะไป

หากต้องการใช้ให้กด Alt + F11 เพื่อเปิดตัวแก้ไข VBA จากนั้นคัดลอกรหัสและวางลงใน ThisOutlookSession ( อ้างอิง )

ป้อนคำอธิบายรูปภาพที่นี่

2. วางแมโครต่อไปนี้ที่ด้านล่างของบานหน้าต่างแมโคร

'Original function written by Diane Poremsky: http://www.slipstick.com/developer/send-email-outlook-reminders-fires/
Private Sub Application_Reminder(ByVal Item As Object)
  Dim objMsg As MailItem
  Set objMsg = Application.CreateItem(olMailItem)    

If Item.MessageClass <> "IPM.Appointment" Then
  Exit Sub
End If

If Item.Categories <> "Automated Email Sender" Then
  Exit Sub
End If

  objMsg.To = Item.Location
  objMsg.Subject = Item.Subject
  objMsg.Body = Item.Body
  objMsg.Send

  Set objMsg = Nothing
End Sub

3. สร้างหมวดหมู่ใหม่

ควรจะเรียกหมวดหมู่ที่สร้างขึ้นใหม่ ( วิธีการ ) Automated Email Sender(นี่คือหัวเรื่องโดยพลการ แต่ถ้าคุณเปลี่ยนให้ตรวจสอบให้แน่ใจว่าได้เปลี่ยนในแมโครด้วย)

4. สร้างการนัดหมายในปฏิทิน

วางอีเมลผู้รับในช่อง "สถานที่"

ฟิลด์ "หัวเรื่อง" ของการนัดหมายจะถูกใช้เป็นฟิลด์หัวเรื่องของอีเมล

"เนื้อหา" ของการนัดหมายจะเป็นเนื้อหาของอีเมล

ตั้งค่าการนัดหมายให้เกิดขึ้นอีกในเวลาที่คุณต้องการ ตรวจสอบให้แน่ใจว่าได้ตั้งตัวเตือน

ตั้งเวลาเตือนความจำ

นอกจากนี้อย่าลืมกำหนดหมวดหมู่ที่คุณสร้างในขั้นตอนก่อนหน้า

ทดสอบก่อนโดยใส่ที่อยู่อีเมลของคุณในช่องตำแหน่ง

ป้อนคำอธิบายรูปภาพที่นี่


แค่นั้นแหละ! ตราบใดที่การตั้งค่าความปลอดภัยของแมโครถูกตั้งค่าไว้แมโครนี้จะทำให้อีเมลถูกส่งโดยอัตโนมัติทุกครั้งที่มีการเรียกใช้ตัวเตือนในการนัดหมายกับหมวดหมู่ที่ระบุ


1
ยอดเยี่ยมมันใช้ได้สำหรับฉัน ^^ ขอบคุณมาก!
Nam G VU

2
@kmote คำถามการแจ้งเตือนมีความสำคัญอย่างไรในการทำงานนี้ ฉันไม่ได้สังเกตในรหัส
SiegeX

1
@SiegeX: สังเกตชื่อของฟังก์ชัน ( Application_Reminder) นี่คือตัวจัดการเหตุการณ์ในตัวของ Outlook ที่ถูกเรียกโดยอัตโนมัติโดย Outlook เมื่อใดก็ตามที่การแจ้งเตือนเริ่มทำงาน ดังนั้นการแจ้งเตือนจึงเป็นตัวกระตุ้นที่ทำให้งานนี้เกิดขึ้น
kmote

@kmote ฉันเห็นแล้วดังนั้นถ้าฉันตั้งเวลา appt เป็น 2PM และตั้งเตือนความจำไว้ที่ 30 นาทีก่อนที่ appt อีเมลจะเริ่มทำงานเวลา 1:30 PM แทนที่จะเป็น 2PM
SiegeX

1
นอกจากนี้ยังสามารถใช้ร่วมกับแม่แบบโดยการเปลี่ยนสายการสร้างในรหัส VBA objMsg = Application.CreateItemFromTemplate("C:\Users\[USER]\AppData\Roaming\Microsoft\Templates\Test.oft")เพื่อ
Andy Mercer
โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.