如何显示当前打开的电子邮件的文件夹名称？

在 Outlook 的邮件列表视图中，您可以添加额外的列“在文件夹中”。

这篇文章解释了如何做到这一点。

从帖子中复制：
启动 Outlook >> 视图 >> 更改视图 >> 管理视图，选择当前视图设置 >> 修改 >> 列，然后再次添加“文件夹中”列。单击“确定”三次，然后重新启动 Outlook 客户端，当您在 Outlook 中再次进行搜索时，您应该能够看到粘滞的文件夹中列。

相关Microsoft 页面。

要显示当前选定或打开的邮件的文件夹，可以使用以下 VBA 宏：

Option Explicit

Public Sub ShowMailItemFolder()
    Dim exp As Explorer
    Dim sel As Selection
    Dim please As String
    Dim s As String
    Dim mi As Outlook.mailItem
    Set exp = Application.ActiveExplorer

    If exp Is Nothing Then
        MsgBox "No Explorer active!"
    Else
        Set sel = exp.Selection

        please = " Please select one Mail!"
        If sel Is Nothing Then
            MsgBox "No Selection!" & please
        ElseIf sel.count > 1 Then
            MsgBox "Multiple selection!" & please
        ElseIf sel.count < 1 Then
            MsgBox "No Selection!" & please
        ElseIf sel.Item(1).Class <> olMail Then
            MsgBox "No Mail selected!" & please
        Else
            Set mi = sel.Item(1)

            If mi Is Nothing Then
                MsgBox "No mail selected!"
            Else
                MsgBox mi.Parent.FolderPath
            End If
        End If
    End If
End Sub

定义一个菜单按钮，通过鼠标单击来启动此宏。它将打开一个消息框并显示 MailItem 文件夹。