Vba 获取对宏中Outlook邮箱根目录的引用

我正在尝试将项目移动到特定文件夹中

我可以使用典型的

myNameSpace.GetDefaultFolder(olFolderInbox).Folders("myfolder")

我想将项目移动到任意文件夹中。目前效果良好

myNameSpace.Folders("Mailbox - Main").Folders("myfolder")

---

但我不想硬编码路径。我想将此宏放在几个系统上，并希望避免为每个用户编写唯一的版本。

如果您想要默认存储的根目录，请使用收件箱父目录：

myNameSpace.GetDefaultFolder(olFolderInbox).Parent.Folders("my‌​folder")

---

如果您想要默认存储的根目录，请使用收件箱父目录：myNameSpace.GetDefaultFolder（olFolderInbox）.ParentSo i can do-namespace.GetDefaultFolder（olFolderInbox）.parent.Folders（“myfolder”）？是的，这将为您提供与收件箱相同级别的名为“myfolder”的文件夹。