Question

我会尽量保持清醒。我的团队中有5个人。我们每个人都有自己的个人展望电子邮件帐户我们的团队负责人也是我们都有权访问的帐户的所有者（称之为“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”帐户配置文件的宏中？我知道宏对于听众和所有这些都有效，所以问题与NameSpaces有关。我真的非常感谢我能得到的任何帮助。谢谢！

Answer 1

每个用户通常都会访问自己的VbaProject.otm文件。有关“允许指定运行OTM文件的其他路径的参数altvba”的说明，请参阅VbaProject.OTM deployment。

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

“最少侵入性的技术是使用Outlook VBA环境中的File | Export命令将模块导出为.bas，.cls和.frm文件。”
“强力方法是将此文件从写入宏的计算机复制到其他用户的计算机，替换任何现有的VbaProject.otm文件。” （不是很好。）

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

Outlook共享收件箱宏

1 个答案: