要调用的VBA代码"；“清理文件夹”；展望2010年？

有人知道在右键单击文件夹时调用右键菜单上的“清理文件夹”Outlook 2010命令的VBA代码吗

我已经在VBA代码中完成了这一步，以访问我要清理的文件夹：

Private Sub CleanUpAllFolders()
Dim Folders As Outlook.Folders
Dim Folder As Outlook.Folder
Set Folders = Session.GetDefaultFolder(olFolderInbox).Parent.Folders
For Each Folder In Folders
    If Left(Folder.Name, 1) = "_" Then
        ' Clean up folder... how do I invoke that command from VBA on this folder?
    End If
Next
End Sub

但是，我在Folder对象本身上看不到任何允许我调用“Clean Up Folder”的方法

---

如何在VBA中的当前选定文件夹上调用其中一个右键单击菜单命令？

我无法测试这一点，但据我所知，这可能有效

首先找到命令的idMso值。使用此选项查找值：

---

然后使用

Application.commandbar.ExecuteMso（idMso）

执行命令。祝你好运。

我在对象模型中也看不到任何明显的地方。您可以尝试在执行文件夹清理时录制宏的旧待机模式。查看录制的宏中的代码可能会提示您从何处开始查找这是一个很好的问题，我一直在研究，希望看到一些反馈。我找不到任何有用的对象模型或通过谷歌@与Excel不同，barrow Outlook不提供宏记录器function@brettdj谢谢你纠正我的误解。Outlook有时似乎是办公室家庭中不受欢迎的继子。这篇文章可能会提供更多帮助：