Outlook에서 모임 초대 보내기를 지연하는 방법은 무엇입니까?

일반적으로 지금이 아닌 특정 시간에 메시지를 보내기 위해 배달 지연 기능을 적용 할 수 있습니다. 그러나 때로는 이메일과 같은 회의 초대장 보내기를 연기하고 싶을 때가 있습니다. Outlook에서 필요한 시간에 회의 초대장을 보내려면 어떻게해야합니까?

VBA 코드를 사용하여 Outlook에서 모임 초대 보내기 지연

VBA 코드를 사용하여 Outlook에서 모임 초대 보내기 지연

Outlook에서 회의 초대를 연기하는 직접적인 방법은 없지만 아래 VBA 코드가 도움이 될 수 있습니다. 다음과 같이하십시오.

1. 먼저 새 작업을 만들어야합니다. 새로운 태스크 창 :

(1.) 회의 주제, 시작일, 종료일을 지정합니다.

(2.) 회의 초대를 보낼 때 미리 알림 날짜와 시간을 설정합니다.

(3.) 필요에 따라 회의 메시지를 입력합니다.

회의를 보내는 문서 지연 1

2. 작업을 생성 한 후 저장 후 닫기 이 창을 닫는 옵션.

3. 그런 다음 ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

4. 에서 응용 프로그램 용 Microsoft Visual Basic 창, 더블 클릭 ThisOutlook세션 인사말 프로젝트 1 (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(",,", ",")
    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

회의를 보내는 문서 지연 2