Note: The other languages of the website are Google-translated. Back to English

จะชะลอการส่งคำเชิญเข้าร่วมประชุมใน Outlook ได้อย่างไร 

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

ชะลอการส่งคำเชิญเข้าร่วมประชุมใน Outlook ด้วยรหัส VBA


ชะลอการส่งคำเชิญเข้าร่วมประชุมใน Outlook ด้วยรหัส VBA

อาจเป็นไปได้ว่าไม่มีวิธีโดยตรงในการชะลอการเชิญเข้าร่วมประชุมใน Outlook แต่รหัส VBA ด้านล่างสามารถช่วยคุณได้โปรดทำตามนี้:

1. ขั้นแรกคุณควรสร้างงานใหม่ ในรูปแบบใหม่ งาน หน้าต่าง:

(1. ) ระบุเรื่องวันที่เริ่มต้นวันที่สิ้นสุดการประชุม

(2. ) กำหนดวันที่และเวลาเตือนความจำเมื่อคุณต้องการส่งคำเชิญเข้าร่วมการประชุม

(3. ) พิมพ์ข้อความการประชุมตามที่คุณต้องการ

doc ล่าช้าในการส่งการประชุม 1

2. หลังจากสร้างงานแล้วโปรดคลิก บันทึกและปิด ตัวเลือกเพื่อปิดหน้าต่างนี้

3. จากนั้นกดไฟล์ ALT + F11 คีย์เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

4. ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน ดับเบิลคลิก นี้OutlookSession จาก โครงการ 1 (VbaProject.O ™) บานหน้าต่างเพื่อเปิดโหมดจากนั้นคัดลอกและวางรหัสต่อไปนี้ลงในโมดูลเปล่า

รหัส VBA: ชะลอการส่งคำเชิญเข้าร่วมประชุม:

Private Sub Application_Reminder(ByVal Item As Object)
    Dim xTaskItem As TaskItem
    Dim xAppointmentItem As AppointmentItem
    Dim xRcpArr() As String
    If (Item.Class <> olTask) Or (LCase(Item.Subject) <> "Meeting test") Then
        Exit Sub
    End If
    Set xTaskItem = Item
    xRcpArr = VBA.Split("yy@addin99.com,sky@addin99.com,ruby@addin99.com", ",")
    Set xAppointmentItem = Outlook.Application.CreateItem(olAppointmentItem)
    With xAppointmentItem
        .MeetingStatus = olMeeting
        For i = 0 To UBound(xRcpArr)
            .Recipients.Add (xRcpArr(i))
        Next
        .Subject = xTaskItem.Subject
        .Location = "Office room 1002"
        .Start = xTaskItem.StartDate + #2:00:00 PM#
        .Body = xTaskItem.Body
        .Duration = 120
        .ReminderSet = True
        .ReminderMinutesBeforeStart = 20
        .Save
        .Send
    End With
    xTaskItem.MarkComplete
    Set xTaskItem = Nothing
End Sub

doc ล่าช้าในการส่งการประชุม 2

หมายเหตุ: ในโค้ดด้านบน: การทดสอบการประชุม เป็นหัวข้อที่คุณสร้างขึ้นสำหรับการประชุมในขั้นตอนที่ 1 และคุณควรเปลี่ยนข้อมูลของ ที่อยู่ผู้รับ, สถานที่นัดพบ, เวลาเริ่มต้น และ ระยะเวลาการประชุม ของคุณเอง

5. บันทึกและปิดรหัสจากนั้นรีสตาร์ท Outlook เพื่อให้รหัสนี้มีผล

6. นับจากนี้เป็นต้นไปเมื่อตัวเตือนรายการงานปรากฏขึ้นตามเวลาที่คุณกำหนด Outlook จะส่งคำเชิญเข้าร่วมประชุมโดยอัตโนมัติ


Kutools สำหรับ Outlook - นำคุณลักษณะขั้นสูง 100 รายการมาสู่ Outlook และทำให้การทำงานง่ายขึ้นมาก

  • CC อัตโนมัติ / BCC ตามกฎเมื่อส่งอีเมล ส่งต่ออัตโนมัติ อีเมลหลายฉบับโดยกำหนดเอง ตอบอัตโนมัติ ไม่มีเซิร์ฟเวอร์แลกเปลี่ยนและคุณสมบัติอัตโนมัติอื่น ๆ ...
  • คำเตือน BCC - แสดงข้อความเมื่อคุณพยายามตอบกลับทั้งหมด หากที่อยู่อีเมลของคุณอยู่ในรายการ BCC; เตือนเมื่อไม่มีไฟล์แนบและคุณสมบัติการเตือนอื่น ๆ ...
  • ตอบกลับ (ทั้งหมด) พร้อมไฟล์แนบทั้งหมดในการสนทนาทางไปรษณีย์; ตอบกลับอีเมลจำนวนมาก ในไม่กี่วินาที เพิ่มคำทักทายอัตโนมัติ เมื่อตอบกลับ; เพิ่มวันที่ในหัวเรื่อง ...
  • เครื่องมือแนบ: จัดการไฟล์แนบทั้งหมดในอีเมลทั้งหมด ถอดอัตโนมัติ, บีบอัดทั้งหมด, เปลี่ยนชื่อทั้งหมด, บันทึกทั้งหมด ... รายงานด่วน, นับอีเมลที่เลือก...
  • อีเมลขยะที่มีประสิทธิภาพ ตามธรรมเนียม; ลบอีเมลและผู้ติดต่อที่ซ้ำกัน... ช่วยให้คุณทำงานได้อย่างชาญฉลาดขึ้นเร็วขึ้นและดีขึ้นใน Outlook
shot kutools outlook แท็บ kutools 1180x121
shot kutools Outlook kutools plus แท็บ 1180x121
 
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (0)
ยังไม่มีการให้คะแนน เป็นคนแรกที่ให้คะแนน!
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ

ช่องทางอื่นๆ

ลิขสิทธิ์© 2009 - wwwextendoffice.com | สงวนลิขสิทธิ์. ขับเคลื่อนโดย ExtendOffice. | แผนผังเว็บไซต์
Microsoft และโลโก้ Office เป็นเครื่องหมายการค้าหรือเครื่องหมายการค้าจดทะเบียนของ Microsoft Corporation ในสหรัฐอเมริกาและ / หรือประเทศอื่น ๆ
ได้รับการปกป้องโดย Sectigo SSL