Skip to main content

Outlook에서 카테고리별로 이메일을 계산하는 방법은 무엇입니까?

Author: Kelly Last Modified: 2025-08-06

Outlook에서 이메일에 색상 범주를 사용하여 강조 표시했을 수 있습니다. 하지만, 카테고리별로 이메일을 계산하는 방법을 알고 있습니까? 이 기사에서는 두 가지 해결책을 공유합니다:

Office Tab - Microsoft Office에서 탭 편집 및 탐색을 활성화하여 작업을 간편하게 처리하세요.
지금 Kutools for Outlook의 잠금을 해제하고 무제한 액세스로 100개 이상의 기능을 즐기세요.
Outlook 2024 - 2010 또는 Outlook 365를 이러한 고급 기능으로 강화하고, 100개 이상의 강력한 기능을 사용해 이메일 경험을 한 단계 높이세요!

즉시 검색 기능을 사용하여 Outlook에서 이메일을 카테고리별로 계산

이 방법은 즉시 검색 기능을 통해 지정된 색상 범주로 표시된 모든 이메일을 찾는 방법을 안내하며, 그런 다음 상태 표시줄에서 모든 검색 결과의 총 개수를 쉽게 얻을 수 있습니다.

1. 메일 보기에서 Ctrl + E 키를 동시에 눌러 검색 도구를 활성화합니다.

2. 검색 > 카테고리화 클릭한 후, 계산하려는 지정된 색상 범주를 선택합니다.

doc-count-emails-by-category-1

3. 이제 지정된 색상 범주로 표시된 모든 이메일이 찾아져 메일 목록에 표시됩니다. 그리고 상태 표시줄에서 모든 검색 결과의 총 개수를 쉽게 얻을 수 있습니다. 스크린샷을 참조하세요:

doc-count-emails-by-category-2

참고:

(1) 노란색 범주와 주황색 범주로 표시된 이메일을 동시에 계산하려면, 즉시 검색 상자에 직접 검색 조건 category:="노란색 범주" AND "주황색 범주"를 입력하세요:

doc-count-emails-by-category-3

(2) 노란색 범주 또는 주황색 범주로 표시된 이메일을 동시에 계산하려면, 즉시 검색 상자에 직접 검색 조건 category:="노란색 범주" OR "주황색 범주"를 입력하세요.


VBA를 사용하여 Outlook에서 이메일을 카테고리별로 계산

이 방법은 Outlook에서 사용자 정의 날짜 범위 내에서 카테고리별로 이메일을 계산하기 위한 VBA를 소개합니다. 다음과 같이 진행하세요:

1. 메일 보기에서 이메일 폴더를 선택하세요.

2. Alt + F11 키를 동시에 눌러 Microsoft Visual Basic for Applications 창을 엽니다.

3. 삽입 > 모듈을 클릭하고 새 모듈 창에 아래 VBA 코드를 붙여넣습니다:

VBA: Outlook에서 카테고리별로 이메일 계산

Sub CategoriesEmails()

Dim oFolder As MAPIFolder
Dim oDict As Object
Dim sStartDate As String
Dim sEndDate As String
Dim oItems As Outlook.Items
Dim sStr As String
Dim sMsg As String


On Error Resume Next
Set oFolder = Application.ActiveExplorer.CurrentFolder

Set oDict = CreateObject("Scripting.Dictionary")

sStartDate = InputBox("Type the start date (format MM/DD/YYYY)")
sEndDate = InputBox("Type the end date (format MM/DD/YYYY)")

Set oItems = oFolder.Items.Restrict("[Received] >= '" & sStartDate & "' And [Received] <= '" & sEndDate & "'")
oItems.SetColumns ("Categories")

For Each aitem In oItems
sStr = aitem.Categories
If Not oDict.Exists(sStr) Then
oDict(sStr) = 0
End If
oDict(sStr) = CLng(oDict(sStr)) + 1
Next aitem

sMsg = ""
For Each aKey In oDict.Keys
sMsg = sMsg & aKey & ":   " & oDict(aKey) & vbCrLf
Next
MsgBox sMsg

Set oFolder = Nothing

 End Sub

4. F5 키를 누르거나 실행 버튼을 클릭하여 이 VBA를 실행합니다.

5. (1) 첫 번째로 나타나는 Microsoft Outlook 대화 상자에서 계산할 사용자 정의 날짜 범위의 시작 날짜를 입력하고 확인 버튼을 클릭하세요. (2) 두 번째 Microsoft Outlook 대화 상자에서 종료 날짜를 입력하고 확인 버튼을 클릭하세요. 스크린샷을 참조하세요:

doc-count-emails-by-category-4doc-count-emails-by-category-5

이제 대화 상자가 나타나 색상 범주로 표시된 이메일의 개수가 표시됩니다. 스크린샷을 참조하세요:

doc-count-emails-by-category-6


관련 기사


최고의 오피스 생산성 도구

속보: Kutools for Outlook 무료 버전 출시!

100개 이상의 놀라운 기능을 갖춘 완전히 새로워진 Kutools for Outlook을 경험해 보세요! 지금 다운로드하세요!

🤖 Kutools AI : 첨단 AI 기술을 활용하여 이메일 회신, 요약, 최적화, 확장, 번역, 작성까지 어떤 작업도 손쉽게 처리합니다.

📧 이메일 자동화: 자동 응답(POP 및 IMAP 지원) / 이메일 예약 발송 / 메일 발송 시 규칙에 따라 자동 참조/숨은 참조 / 고급 규칙 기반 자동 전달 / 자동 인사말 추가 / 여러 수신자 이메일을 개별 이메일로 자동 분할 ...

📨 이메일 관리: 이메일 회수 / 제목 등으로 스팸 이메일 차단 / 중복된 이메일 삭제 / 고급 검색 / 폴더 정리 ...

📁 첨부 파일 Pro: 일괄 저장 / 일괄 분리 / 일괄 압축 / 자동 저장 / 자동 분리 / 자동 압축 ...

🌟 인터페이스 매직: 😊더 예쁘고 멋진 이모지 / 중요한 이메일 도착 시 알림 / 종료 대신 Outlook 최소화 ...

👍 원클릭 편의 기능: 모두 회신(첨부 파일 포함) / 피싱 방지 이메일 / 🕘보낸 사람의 시간대 표시 ...

👩🏼‍🤝‍👩🏻 연락처 & 캘린더: 선택한 이메일에서 연락처 일괄 추가 / 연락처 그룹을 개별 그룹으로 분리 / 생일 알림 제거 ...

원하는 언어로 Kutools를 사용할 수 있습니다 – 영어, 스페인어, 독일어, 프랑스어, 중국어 등40개 이상의 언어 지원!

한 번의 클릭으로 Kutools for Outlook을 즉시 활성화하세요. 기다리지 말고, 지금 다운로드하여 효율성을 높이세요!

kutools for outlook features1 kutools for outlook features2