更改“;从「;在outlook VBA宏中

更改“;从「;在outlook VBA宏中,vba,outlook,Vba,Outlook,我在outlook中有一个宏,可以使用我的个人电子邮件地址自行发送电子邮件。但我有另一封电子邮件,我有“发送为”权限,并希望宏使用该电子邮件地址发送电子邮件。在宏中,我有 objmail.to、objectmail.cc和objmail.bcc,但我没有将objmail.from硬编码为发送电子邮件地址。不管怎样,我都能做到这一点 If ChkResolved = True Then If ChkEnglish = True Then If ChkLan = True

我在outlook中有一个宏,可以使用我的个人电子邮件地址自行发送电子邮件。但我有另一封电子邮件,我有“发送为”权限,并希望宏使用该电子邮件地址发送电子邮件。在宏中,我有 objmail.to、objectmail.cc和objmail.bcc,但我没有将objmail.from硬编码为发送电子邮件地址。不管怎样,我都能做到这一点

 If ChkResolved = True Then
    If ChkEnglish = True Then
        If ChkLan = True Then
           objMail.To = "xxxx@test.com"
           objMail.Body = "Test" & vbNewLine & vbNewLine & Signature

         End If
    End If
 End If

如果您使用的是Outlook 2007或更高版本,则该属性将提供此功能。

您必须选择mailitem.SentonBehalfName并将Outlook中显示的邮箱名称作为字符串输入。

我使用的是Outlook 2010。我试过了,但没有成功。