Thanks for the quick response, Michael.
I found some code on a discussion forum that purports to do some of what I'm
asking.
Sub ShowSenderEmail()
If ActiveExplorer.Selection.Count = 0 Then Exit Sub
If ActiveExplorer.Selection.Item(1).Class = olMail Then
MsgBox ActiveExplorer.Selection.Item(1).SenderEmailAddress
End If
End Sub
I have placed this code in a module and can run it as a macro for any
selected email in my inbox. This code works for messages received from an
SMTP host, but those emails already show the sender's address in my inbox
view. If I receive a message from an Exchange user, the address revealed by
this code seems to be some sort of active directory address, like this...
/O=EXCHANGE1/OU=FIRST ADMIN GROUP/CN=RECIPIENTS/CN=JONDOE
I am new to Outlook and especially VBA with Outlook. Can I somehow use VBA
to grab a resolvable address for exchange users? If so, how can I add the
UserProperty to each incoming mail and then add that custom field to the view?
Thanks for your help.
-- Richard
Michael Bauer said:
Yes, you'd have to add a UserProperty to each email and write the address
yourself into that property. Then use the field chooser to add that field to
the view.
Am Thu, 31 May 2007 09:01:00 -0700 schrieb Richard T:
I am in an exchange environment using Outlook 2003. In my inbox, all emails
are displayed with the sender's name as [Last Name, First Name].
I am trying to find a way to display the sender's email address here
instead. Is this something I need VBA to do? I can't seem to find any
options to accomplish this.
Thank you,
Richard
