Outlook 共享收件箱宏

Question

我会尽量说清楚。 我的团队有 5 个人。 我们每个人都有自己的个人 Outlook 电子邮件帐户。 我们的团队负责人也是我们所有人都可以访问的帐户的所有者（称为“SharedAccount@xx.com”）。 我有我想放入该共享电子邮件帐户的宏，它将侦听该电子邮件帐户的收件箱并对传入的消息进行处理。 由于我不是该帐户的所有者，因此我在个人电子邮件中编写了宏，对于 NameSpace 业务，我使用了以下代码（再次注意，这是在我的个人电子邮件 ThisOutlookSession 中）：

Dim objNS As Outlook.NameSpace
Set objNS = olApp.GetNamespace("MAPI")

Dim rec As recipient
Set rec = objNS.CreateRecipient("SharedAccount@xx.com")
rec.Resolve
Set inbox = objNS.GetSharedDefaultFolder(rec, olFolderInbox)

我这样做错了吗？ 我是否需要将此代码放入“Shared@xx.com”帐户配置文件的宏中？ 我知道宏对侦听器和所有这些都起作用，所以这个问题与我感觉的命名空间有关。 我真的非常感谢我能得到的任何帮助。 谢谢！

Answer 1

每个用户通常访问他们自己的 VbaProject.otm 文件。 请参阅VbaProject.OTM 部署以了解“允许指定另一个路径来运行 OTM 文件的参数 altvba”的描述。

如果这不可行，您可以使用此处描述的方法之一。 http://www.outlookcode.com/article.aspx?id=28在上面也有引用。

1. “干扰最少的技术是在 Outlook VBA 环境中使用 File | Export 命令将模块导出为 .bas、.cls 和 .frm 文件。”

2. “蛮力方法是将该文件从写入宏的机器复制到其他用户的机器，替换任何现有的 VbaProject.otm 文件。” （不大好。）

对我来说，最简单的方法是发送邮件，然后将文本粘贴到他们的编辑器中。