2013-10-22 35 views
0

嗨,我不能运行下面的代码在Outlook中使用VBA创建邮件对象。不起作用的是发件人邮件地址的设置。通过邮件设置邮件发件人。从VBA

Dim outobj As Object 

Set outobj = CreateObject("Outlook.Application") 
Set mail = outobj.CreateItem(0) 

    mail.From = "[email protected]" 
    mail.To = "[email protected]" 
    mail.Bcc = "[email protected]" 
    mail.Subject = "Mail" 

代码mail.From不工作,并说,属性或方法不被支持的对象......为什么出现这种情况运行时错误(“438”)?

回答

0

正确的写法是

mail.SentOnBehalfOfName ="..." 

现在的代码工作正常。