Outlook 에서 회의 초대 메시지 전송을 지연하는 방법은 무엇인가요？

일반적으로 특정 시간에 메시지를 바로 보내는 대신 '지연 배달' 기능을 사용할 수 있습니다. 하지만 때로는 이메일처럼 회의 초대 메시지 전송을 지연하고 싶을 수도 있습니다. Outlook 에서 원하는 시간에 정확히 회의 초대를 보내려면 어떻게 해야 할까요？

VBA 코드를 사용하여 Outlook 에서 회의 초대 메시지 전송 지연하기

---

VBA 코드를 사용하여 Outlook 에서 회의 초대 메시지 전송 지연하기

Outlook 에서는 회의 초대를 직접 지연하는 방법이 없을 수도 있지만， 아래의 VBA 코드가 도움이 될 수 있습니다。 다음 단계를 따라 주세요：

1。 먼저 작업를 생성해야 합니다。 새작업창에서：

(1.)회의의 제목， 시작일， 종료 날짜를 지정하세요；

(2.)회의 초대를 보내고 싶은 날짜와 시간을 설정하세요；

(3.)필요에 따라 회의 메시지를 입력하세요。

2。 작업 생성 후저장 및 닫기옵션을 클릭하여 이 창을 닫으세요。

3。 그런 다음ALT + F11키를 누른 채로Microsoft Visual Basic for Applications창을 엽니다。

4.Microsoft Visual Basic for Applications창에서ThisOutlookSession을(를)Project1(VbaProject.OTM)패널에서 두 번 클릭하여 모듈을 열고， 다음 코드를 빈 모듈에 복사하여 붙여넣으세요。

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

참고： 위 코드에서：Meeting test는 단계 1 에서 생성한 회의 제목입니다。 또한수신자 주소,회의 장소,시작 시간및회의 지속 시간을 본인 정보로 변경해야 합니다。

5. 코드를 저장하고 닫기한 후 Outlook 을 다시 시작하여 코드가 적용되도록 하세요。

6. 이제부터 설정한 특정 시간에 작업 항목 알림이 표시되면 Outlook 이 자동으로 회의 초대를 전송합니다。