MeetingItem收件人。(MeetingItem Recipient. How to get email)

 我发现了一个类似的问题，但对于C＃ Outlook：如何从收件人字段获取电子邮件？ 在这个问题上，也没有正确的答案。 
 不过，我尝试了一些来自此主题的答案 
 recipient.AddressEntry.Address <=返回与recipient.Address相同的东西。地址直到现在我还没有使用，并且结果如下： 
 
"/o=POST/ou=Zuerich/cn=Recipients/cn=eicherr"
 
 我如何获得收件人的电子邮件地址？ 
 
 我也尝试.AddressEntry.GetContact().Email1Address和.AddressEntry.GetExchangeUser().Address这一切都不适合我。 
 
 这里是一个MSDN文件解释如何获得电子邮件地址，但我不知道如何在代码中使用它获取收件人的电子邮件地址 
 
 我的代码： 
 
Dim Msg As Outlook.MeetingItem
Set Msg = Item
Set recips = Msg.Recipients
Dim recip As Outlook.Recipient

For Each recip In recips
    Dim email as String
    email = CStr(recip.Address)
    Debug.Print email
End For

I found a similar question but for c# Outlook : How to get email from Recipient field? In this question there is also no correct answer.
 Still, I tried some of the answers from this thread
 recipient.AddressEntry.Address <= returns same thing as recipient.Address what I used till yet and what gievs me following result:
 
"/o=POST/ou=Zuerich/cn=Recipients/cn=eicherr"
 
How can I get email adress of recipient?
 
I tried also .AddressEntry.GetContact().Email1Address and .AddressEntry.GetExchangeUser().Address this all not works for me.
 
Here is a MSDN docs explanes how to get email adress but I don't undestand how can I use it in my code Obtain the E-mail Address of a Recipient
 
my code:
 
Dim Msg As Outlook.MeetingItem
Set Msg = Item
Set recips = Msg.Recipients
Dim recip As Outlook.Recipient

For Each recip In recips
    Dim email as String
    email = CStr(recip.Address)
    Debug.Print email
End For

原文：https://stackoverflow.com/questions/50387906