Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何在vba outlook中获取邮件发件人_Vba_Ms Access - Fatal编程技术网

如何在vba outlook中获取邮件发件人

如何在vba outlook中获取邮件发件人,vba,ms-access,Vba,Ms Access,vba中是否有返回电子邮件发件人的功能?当您在这里获得一些代码时,我将密切关注这一点。但是现在 Sub GetSendor() Dim oApp As New Outlook.Application Dim oMail As Outlook.MailItem Dim nm As Namespace Set nm = oApp.GetNamespace("MAPI") Set oMail = nm.GetDefaultFolder(olFolderInbox).Folders.Item(1).

vba中是否有返回电子邮件发件人的功能?

当您在这里获得一些代码时,我将密切关注这一点。但是现在

Sub GetSendor()

Dim oApp As New Outlook.Application
Dim oMail As Outlook.MailItem
Dim nm As Namespace

Set nm = oApp.GetNamespace("MAPI")
Set oMail = nm.GetDefaultFolder(olFolderInbox).Folders.Item(1).Items.GetLast

oMail.SenderEmailAddress

End Sub

电子邮件的发件人是Outlook
MailItem
对象的属性。您是否有
MailItem
对象?