Vba 在PST存储中隐藏搜索文件夹

我已经创建了一个pst存储，其中文件夹结构将由我的加载项管理。

---

是否可以删除或隐藏“已删除的邮件”和“搜索文件夹”文件夹？

否，即使您删除了这些文件夹，Outlook也始终会重新创建这些文件夹。

否，即使您删除了这些文件夹，Outlook也始终会重新创建这些文件夹。

要隐藏，请参阅vba上的示例

要隐藏，请参见vba上的示例

Option Explicit
Private Sub Hide_Folders()
    Dim Outlook_Folder As Outlook.folder
    Dim oPA As Outlook.PropertyAccessor
    Dim Prop_Name, Value, Folder_Type As String

    Prop_Name = "http://schemas.microsoft.com/mapi/proptag/0x10F4000B"

    Value = True ' hide

    Set Outlook_Folder = Application.ActiveExplorer.CurrentFolder

    Debug.Print Outlook_Folder.Name

    Set oPA = Outlook_Folder.PropertyAccessor

    oPA.SetProperty Prop_Name, Value

    Set Outlook_Folder = Nothing
    Set oPA = Nothing
End Sub