我有两个 e-mail 地址连接到 Outlook2010。我正在使用 VBA 宏将选定的邮件从收件箱移动到指定的文件夹。它非常适合我的主要帐户。不幸的是，我无法将其用于我的辅助帐户。它总是将邮件移到我的主帐户文件夹中。我的问题是：如何设置对二级帐户的有效引用以解决该问题？我应该提供完整的电子邮件地址代替“ myemail”吗？
Dim objNS As Outlook.NameSpace
Dim objFolder As Outlook.MAPIFolder
Set objNS = GetNamespace("MAPI")
Set objFolder = objNS.Folders("myemail")
Set objFolder = objFolder.Folders("XYZ")
1 回答
最好，最透明的方法可能是先为辅助帐户打开 Outlook Store。您可以使用以下命令获取所有商店的列表(在 Outlook 中为 Data-File)(请参阅链接)
然后，您可以在商店对象上调用 GetRootFolder 或 GetSpecialFolder 来检索 sub-folder 引用。另外，请查看http://msdn.microsoft.com/en-us/library/office/bb206775(v=office.12).aspx以获取有关如何获取有关商店信息的示例。