在共享邮箱中为所有未答复的电子邮件创建搜索文件夹

时间:2018-07-02 06:43:32

标签: outlook-vba

下面提到的代码正在运行,但是再次移动了所有由共享邮箱发送的电子邮件,并且共享邮箱已复制到这些电子邮件中。例如-如果我从AAA邮箱发送任何电子邮件并在同一电子邮件上复制AAA那么该电子邮件不应移入“文件夹”。

1 个答案:

答案 0 :(得分:0)

您需要将传入电子邮件的SenderEmailAddress属性值与CurrentUser.Address属性值进行比较。 NameSpace.CurrentUser属性以Recipient对象的形式返回当前登录用户的显示名称。 Address类的Recipient属性返回一个字符串,该字符串表示收件人的电子邮件地址。