小编Gru*_*les的帖子

使用Outlook VBA脚本,是否可以根据从Mailitem类中获取的唯一标识符显示电子邮件？

即我遍历文件夹并使用SenderName,Subject,SentOn和ConversationID填充列表框.

For i = oFolder.Items.Count To 1 Step -1
    Me.ListBox1.AddItem oFolder.Items.Item(i).ConversationID
Next i

列表框位于用户表单中,我希望能够根据ConversationID显示电子邮件.我不确定如何实际做到这一点,但也许是这样的:

Dim Msg As Outlook.MailItem
Set Msg = oFolder.GetObjectFromConversationID(Me.ListBox1.Value).Display
Msg.Display