有没有办法显示发信人在通信薄里的名称呢？

Sub ddd()               
Set myNamespace = Application.GetNamespace("MAPI")
Set myFolder = myNamespace.GetDefaultFolder(olFolderInbox)
myFolder.Display
Set myItem = myFolder.Items(2)
myItem.Display
MsgBox myItem.SenderName
End Sub

这是显示发信人的名称的代码，有没有办法显示发信人在通信薄里的名称呢？

[ 本帖最后由 inadequate 于 2010-12-28 13:24 编辑 ]

没有直接的方法。

得到发件人的地址后在通信薄里查找。