如何通过VBA在Outlook中开启/关闭对话视图？

你提到的四个属性确实是对话视图启用后的精细化设置，而控制对话视图全局开关的关键属性是View.ShowAsConversation——这是Outlook对象模型中可读写的布尔值：

• 启用对话视图：将ShowAsConversation设为True
• 禁用对话视图：将ShowAsConversation设为False

示例代码（VBA） #

Sub ToggleConversationView()
    Dim targetFolder As Folder
    Dim targetView As View
    
    ' 获取当前选中的文件夹
    Set targetFolder = Application.ActiveExplorer.CurrentFolder
    ' 获取目标视图（以默认"邮件"视图为例）
    Set targetView = targetFolder.Views("邮件")
    
    ' 切换对话视图状态
    targetView.ShowAsConversation = Not targetView.ShowAsConversation
    ' 保存修改后的视图设置
    targetView.Save
End Sub

注意事项 #

• 该属性支持Outlook 2010及后续版本，对应Outlook.View类
• 仅适用于支持对话视图的文件夹类型（如邮件文件夹）
• 修改后必须调用View.Save()才能使设置永久生效

内容的提问来源于stack exchange，提问作者Adam J. Kessel