Finding the email address in Outlook.MailItem

[Static]

u need to tap the recipients data...

Dim oMail As Outlook.MailItem
Dim oRecip As Outlook.Recipient
'...other stuff...
For Each oRecip In oMail.Recipients
    Debug.Print oRecip.Address 'Not sure which one...
    Debug.Print oRecip.AddressEntry
Next