经典版Outlook中无需禁用对话组即可模拟新版邮件固定功能的方案咨询

我太懂这种纠结了——既想把关键邮件稳稳钉在列表顶部，又舍不得对话视图把邮件串起来的整洁感，单独开文件夹确实是退而求其次的办法。下面给你几个更贴合需求的方案，你可以挨个试试：

方案一：调整高级视图排序规则（无需代码） #

这是最省心的办法，核心是让「类别」成为第一排序维度，同时保留对话视图的分组逻辑：

• 先确保你已经开启了对话视图（顶部菜单栏→视图→对话）
• 右键点击当前视图的名称（比如「邮件」），选择「自定义当前视图」
• 在弹出的窗口里点击「排序」按钮：
  • 第一排序条件选「类别」，排序方式设为降序（Z→A），这样!Pinned分类会因为开头的感叹号排在最前面
  • 点击「添加」，添加第二个排序条件为「对话主题」，排序方式选「升序」
  • 再添加第三个排序条件为「接收时间」，排序方式选「降序」
• 确定保存后，你会发现所有标记了!Pinned的对话组会整体排在列表最顶部，每个对话组内部还是按最新邮件的时间排序，完美兼顾固定和对话视图！

方案二：VBA脚本批量标记整个对话组 #

如果上面的排序规则偶尔有疏漏（比如对话里只有单封邮件标记了分类），可以用VBA脚本一键把整个对话组都打上!Pinned分类，确保排序时整个组都被顶上去：

• 按下Alt + F11打开Outlook的VBA编辑器
• 插入一个新模块，粘贴下面的代码：

Sub PinEntireConversation()
    Dim selectedItem As Object
    Dim conversation As Outlook.Conversation
    Dim convRootItems As Outlook.SimpleItems
    Dim convChildItems As Outlook.SimpleItems
    Dim currentItem As Object
    
    ' 获取当前选中的邮件
    On Error Resume Next
    Set selectedItem = Application.ActiveExplorer.Selection(1)
    On Error GoTo 0
    
    If selectedItem Is Nothing Then
        MsgBox "请先选中一封邮件！", vbExclamation
        Exit Sub
    End If
    
    ' 获取该邮件所属的对话组
    Set conversation = selectedItem.GetConversation
    If conversation Is Nothing Then
        MsgBox "这封邮件不属于任何对话组！", vbInformation
        Exit Sub
    End If
    
    ' 标记对话组的根邮件和所有子邮件
    Set convRootItems = conversation.GetRootItems
    For Each currentItem In convRootItems
        currentItem.Categories = "!Pinned"
        currentItem.Save
        
        ' 遍历所有子邮件
        Set convChildItems = conversation.GetChildren(currentItem)
        For Each childItem In convChildItems
            childItem.Categories = "!Pinned"
            childItem.Save
        Next childItem
    Next currentItem
    
    MsgBox "整个对话组已标记为固定！", vbInformation
End Sub

• 保存后，你可以把这个宏添加到Outlook的快速访问工具栏，以后选中任意一封邮件点击按钮，就能把整个对话组都打上!Pinned分类，配合之前的排序规则就能实现完美的固定效果。

方案三：自定义字段替代分类（更灵活） #

如果你不想用分类来标记，也可以创建一个自定义字段来实现固定：

• 打开「自定义当前视图」窗口，点击「字段」按钮
• 在「可用字段选自」里选择「用户定义的字段在文件夹」，然后点击「新建」
• 字段名称设为「Pinned」，类型选「数字」，默认值设为0，确定保存
• 回到「排序」设置，把「Pinned」设为第一排序条件（降序），后面跟上对话主题和接收时间
• 之后你可以手动把需要固定的邮件的「Pinned」字段改成1，或者创建规则自动设置，这样排序时标记为1的对话组会直接顶到顶部，完全不影响对话视图。

备注：内容来源于stack exchange，提问作者Greedo