KutoolsforOffice— 하나의 솔루션, 다섯 가지 강력한 도구。적은 노력으로 더 큰 성과。

Outlook 에서 범주별 이메일 수를 계산하는 방법은 무엇인가요?

작성자Kelly수정 날짜

Outlook 에서 이메일에 색상 범주를 적용해 보셨을 것입니다。 그런데 범주별로 이메일 수를 계산하는 방법을 알고 계신가요? 이 문서에서는 두 가지 해결 방법을 소개합니다:

Office Tab - Microsoft Office 에서 탭 기반 편집 및 탐색 활성화, 업무를 손쉽게
지금 바로 Kutools for Outlook 의 잠금을 해제하고 100 가지 이상의 기능을 무제한으로 영원히 즐기세요
이 고급 기능으로 Outlook 2024 - 2010 또는 Outlook 365 를 강화하세요。 100+가지 강력한 기능을 즐기며 이메일 경험을 한층 업그레이드하세요!

Instant Search 기능을 사용하여 Outlook 에서 범주별 이메일 수 계산하기

이 방법은 지정된 색상 범주로 표시된 모든 이메일을Instant Search기능으로 찾아낸 후, 검색 결과의 총 개수를상태 표시줄에서 쉽게 확인할 수 있도록 안내합니다。

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

2. 검색>범주별를 클릭한 후, 이메일을 계산할 특정 색상 범주를 선택합니다。

doc-count-emails-by-category-1

3. 이제 지정된 색상 범주로 표시된 모든 이메일이 찾아져 이메일 목록에 나열됩니다。 검색 결과의 총 개수는 상태 표시줄에서 쉽게 확인할 수 있습니다。 스크린샷 참조:

doc-count-emails-by-category-2

참고 사항:

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

doc-count-emails-by-category-3

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


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


관련 문서


최고의 Office 생산성 도구

Kutools for Outlook 의 완전히 새로운 버전을 100+가지 놀라운 기능과 함께 경험해 보세요!지금 다운로드하세요!

🤖KUTOOLS AI:고급 AI 기술을 활용하여 이메일 회신, 요약, 최적화, 확장, 번역, 작성 등 이메일 관련 작업을 손쉽게 처리합니다。

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

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

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

🌟인터페이스 마법:😊더 예쁘고 멋진 이모지 제공/중요 이메일 수신 시 알림/Outlook 종료 대신 최소화...

👍한 번의 클릭으로 해결:모두 회신(첨부 파일 포함)/피싱 이메일 방지/🕘발신자의 현재 시간 시간대 표시...

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

Kutools 를 선호하는 언어로 사용하세요 – 영어, 스페인어, 독일어, 프랑스어, 중국어 및 40+개의 다른 언어를 지원합니다!

한 번의 클릭으로 즉시 Kutools for Outlook 의 잠금을 해제하세요。 더 이상 기다리지 마시고 지금 다운로드하여 업무 효율을 높이세요!

kutools for outlook features1kutools for outlook features2

🚀 한 번의 클릭으로 다운로드 — 모든 Office 애드인 받기

강력히 권장: Kutools for Office (5-in-1)

한 번의 클릭으로다섯 개의 설치 프로그램을동시에 다운로드하세요 —Kutools for Excel, Outlook, Word, PowerPointOffice Tab Pro.지금 다운로드하세요!

  • 한 번의 클릭으로 편리하게: 다섯 개의 설치 패키지를 한 번에 다운로드하세요。
  • 🚀모든 Office 작업에 대비 완료: 필요한 시점에 필요한 애드인을 설치하세요。
  • 🧰포함됨: Kutools for Excel / Kutools for Outlook / Kutools for Word / Office Tab Pro / Kutools for PowerPoint