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

Outlook에서 이메일을 월별로 분류하는 방법은 무엇입니까?

받은 편지함에 많은 이메일이 있는 경우 편지함을 깔끔하고 잘 정리된 것처럼 보이게 하려면 아래 스크린샷과 같이 이메일을 받은 특정 월을 기준으로 다른 폴더에 저장하거나 보관할 수 있습니다. 일반적으로 폴더를 수동으로 만든 다음 하나씩 이동할 수 있습니다. 분명히, 이 접근 방식은 시간이 많이 걸리고 번거로울 것입니다. 이 기사에서는 이 작업을 빠르고 쉽게 해결하기 위한 VBA 코드에 대해 설명합니다.


VBA 코드를 사용하여 월을 기준으로 이메일 분류

월을 기준으로 이메일을 다른 폴더로 이동하려면 아래 VBA 코드를 적용하십시오.

1. 클릭하여 선택 받은 편지함 이메일을 분류하려는 폴더.

2. 누르고 ALT + F11 키를 눌러 응용 프로그램 용 Microsoft Visual Basic 창.

3. 클릭 끼워 넣다 > 모듈을 클릭하고 모듈 창에 다음 코드를 붙여 넣습니다.

VBA 코드: 월을 기준으로 이메일 분류

Sub ClassifyEmailsbyMonth()
'Updateby ExtendOffice
Dim xCurFolder As Folder
Dim xMoveFolder As Folder
Dim xMail As MailItem
Dim I As Long
Dim xYear As String, xMonth As String
On Error Resume Next
Set xCurFolder = Application.ActiveExplorer.CurrentFolder
For I = xCurFolder.Items.Count To 1 Step -1
  DoEvents
  If xCurFolder.Items.Item(I).Class = olMail Then
    Set xMail = xCurFolder.Items.Item(I)
    xYear = Year(xMail.ReceivedTime)
    xMonth = Month(xMail.ReceivedTime)
    Set xMoveFolder = Nothing
    Set xMoveFolder = xCurFolder.Folders(xYear & "." & xMonth)
    If xMoveFolder Is Nothing Then
      Set xMoveFolder = xCurFolder.Folders.Add(xYear & "." & xMonth)
    End If
    xMail.Move xMoveFolder
  End If
Next
Set xMoveFolder = Nothing
Set xCurFolder = Nothing
End Sub

4. 그런 다음, F5 키를 눌러 이 코드를 실행하고 선택한 받은 편지함 폴더의 모든 이메일이 이메일 수신 시간의 특정 월별로 분류됩니다(스크린샷 참조).


Outlook 용 Kutools-Outlook에 100 개의 고급 기능을 제공하고 작업을 훨씬 더 쉽게 만듭니다!

  • 자동 CC / BCC 이메일을 보낼 때 규칙에 따라; 자동 전달 사용자 정의에 의한 여러 이메일; 자동 회신 교환 서버없이 더 많은 자동 기능 ...
  • BCC 경고 -모두 답장하려고 할 때 메시지 표시 메일 주소가 숨은 참조 목록에있는 경우; 첨부 파일 누락시 알림및 기타 알림 기능 ...
  • 메일 대화에서 모든 첨부 파일로 (전체) 회신; 많은 이메일에 답장 초 안에; 인사말 자동 추가 대답 할 때; 제목에 날짜 추가 ...
  • 첨부 도구 : 모든 메일의 모든 첨부 파일 관리, 자동 분리, 모두 압축, 모두 이름 바꾸기, 모두 저장 ... 빠른 보고서, 선택한 메일 수...
  • 강력한 정크 메일 관습에 의해; 중복 메일 및 연락처 제거... Outlook에서 더 스마트하고 빠르며 더 나은 작업을 수행 할 수 있습니다.
샷 kutools 전망 kutools 탭 1180x121
샷 kutools 전망 kutools 플러스 탭 1180x121
 
코멘트 (0)
아직 평가가 없습니다. 가장 먼저 평가하세요!
아직 코멘트가 없습니다
여러분의 의견을 남겨
게스트로 게시
×
이 게시물 평가 :
0   등장 인물
추천 위치