如何在Outlook中按类别计算电子邮件?
您可能在Outlook中突出显示了具有颜色类别的电子邮件。 但是,您知道如何按类别对电子邮件进行计数吗? 本文将分享两种解决方案:
- 自动发送电子邮件 自动CC / BCC, 自动转发 按规则; 发送 自动回复 (不在办公室)无需交换服务器...
- 获取类似提醒 BCC警告 当您在密件抄送列表中回复所有内容时,以及 缺少附件时提醒 对于忘记的附件...
- 提高电子邮件效率 回复(全部)并附上附件, 自动添加问候语或日期和时间到签名或主题中, 回复多封电子邮件...
- 简化电子邮件发送 撤回电子邮件, 附件工具 (压缩全部、自动保存全部...)、 删除重复及 快速报告...
使用即时搜索功能在Outlook中按类别对电子邮件进行计数
该方法将指导您查找所有由指定颜色类别标记的电子邮件。 即时搜索 功能,然后轻松地从处获取所有搜索结果的总数 状态栏.
1.在 邮箱: 查看,按 按Ctrl + E 同时激活按键 搜索工具.
2。 点击 搜索 > 分类,然后选择指定的颜色类别,以此作为电子邮件计数依据。
3.现在,找到所有标记有指定颜色类别的电子邮件,并将其列在邮件列表中。 而且,您可以在状态栏上轻松获得所有搜索结果的总数。 看截图:
笔记:
(1)用于计数标有的电子邮件 黄色类 和 橙色类别 同时,请输入搜索条件 category:=“黄色类别”和“橙色类别” 到 即时搜索 直接装箱:
(2)用于计数标有的电子邮件 黄色类 or 橙色类别 同时,请输入搜索条件 category:=“黄色类别”或“橙色类别” 到 即时搜索 直接装箱。
使用VBA在Outlook中按类别对电子邮件进行计数
此方法将引入VBA,以在Outlook中的自定义日期范围内按类别对电子邮件进行计数。 请执行以下操作:
1.在 邮箱: 视图中,选择要计算电子邮件数量的电子邮件文件夹。
2。 按 其他 + 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对话框中,请输入您将在其中计算电子邮件的自定义日期范围的开始日期,然后单击 OK 按钮。 (2) 在第二个Microsoft Outlook对话框中,输入结束日期,然后单击 OK 按钮。 查看屏幕截图:
现在出现一个对话框,显示带有颜色类别标记的电子邮件数量。 看截图:
相关文章
最佳办公生产力工具
Kutools for Outlook - 超过 100 种强大功能可增强您的 Outlook
🤖 人工智能邮件助手: 具有人工智能魔力的即时专业电子邮件——一键天才回复、完美语气、多语言掌握。轻松改变电子邮件! ...
📧 电子邮件自动化: 外出(适用于 POP 和 IMAP) / 安排发送电子邮件 / 发送电子邮件时按规则自动抄送/密件抄送 / 自动转发(高级规则) / 自动添加问候语 / 自动将多收件人电子邮件拆分为单独的消息 ...
📨 电子邮件管理: 轻松回忆电子邮件 / 按主题和其他人阻止诈骗电子邮件 / 删除重复的电子邮件 / 高级搜索 / 合并文件夹 ...
📁 附件专业版: 批量保存 / 批量分离 / 批量压缩 / 自动保存 / 自动分离 / 自动压缩 ...
🌟 界面魔法: 😊更多又漂亮又酷的表情符号 / 使用选项卡式视图提高 Outlook 工作效率 / 最小化 Outlook 而不是关闭 ...
👍 一键奇迹: 使用传入附件回复全部 / 反网络钓鱼电子邮件 / 🕘显示发件人的时区 ...
👩🏼🤝👩🏻 通讯录和日历: 从选定的电子邮件中批量添加联系人 / 将联系人组拆分为各个组 / 删除生日提醒 ...
超过 100特点 等待您的探索! 单击此处了解更多。