Outlook 에서 작업을(를) 만들 때 기본 시작일을 오늘 날짜로 설정하는 방법은 무엇입니까？

Outlook 에서 작업을(를) 만들면 다음 스크린샷과 같이 “시작일” 작업이 기본적으로“없음”으로 표시됩니다. 그러나 때로는 이 작업의 시작일을 자주 오늘 날짜로 설정해야 하므로 매번 “시작일” 필드에서 수동으로 날짜를 선택해야 합니다. Outlook 에서 작업을(를) 만들 때 기본 시작일을 자동으로 오늘 날짜로 설정할 수 있는 빠른 방법이 있을까요？

Outlook 에서 VBA 코드를 사용하여 작업을(를) 만들 때 기본 시작일을 오늘 날짜로 설정하기

---

Outlook 에서 VBA 코드를 사용하여 작업을(를) 만들 때 기본 시작일을 오늘 날짜로 설정하기

아마도 Outlook 에서 이 작업을 직접 처리할 만한 다른 좋은 방법은 없을 것입니다。 여기에서는 이를 해결하기 위한 VBA 코드를 소개하겠습니다。 다음 단계를 따라 주세요：

1. Outlook 을(를) 실행한 후ALT + F11키를 누른 채로Microsoft Visual Basic for Applications창을 엽니다。

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

VBA 코드： 기본 시작일을 오늘 날짜로 설정하기：

Public WithEvents xInspectors As Outlook.Inspectors
Public WithEvents xTaskItem As Outlook.TaskItem
Private Sub Application_Startup()
   Set xInspectors = Outlook.Inspectors
End Sub
Private Sub xInspectors_NewInspector(ByVal Inspector As Inspector)
    If Not (TypeOf Inspector.CurrentItem Is TaskItem) Then Exit Sub
    Set xTaskItem = Inspector.CurrentItem
End Sub
Private Sub xTaskItem_Open(Cancel As Boolean)
If (Len(xTaskItem.Subject) = 0 And Len(xTaskItem.Body) = 0) And (xTaskItem.StartDate = #1/1/4501# And xTaskItem.DueDate = #1/1/4501#) Then
    xTaskItem.StartDate = Now
End If
End Sub

3。 코드 삽입 후 커서를 두 번째 코드 섹션에 놓고F5키를 눌러 이 코드를 실행합니다。 스크린샷 참조：

4. 이후에는 매번 작업을(를) 만들 때 Outlook 이 다음 스크린샷과 같이 기본적으로 시작일 및 종료 날짜을 현재 날짜로 자동 설정합니다：