有没有办法通过代码更改Outlook VBA只读对象？（特别是CurrentUser.Address和.Name）

我正在尝试编写一些代码，允许用户更改所选帐户当前用户的名称和地址。这允许用户（拥有自己的域）从该域中的任何电子邮件地址以及域中的任何名称发送电子邮件

这样做的原因是因为用户拥有域，并且可以在不同的角色中操作域，例如销售、运营、支持等的不同地址。有太多不同的地址，不能简单地为每个角色创建一个单独的“account”对象

我尝试使用.sendonbehalfof，但它确实会像您预期的那样发送一封电子邮件，发件人名称为：

sales@myDomain.com代表…发送

当我使用

Set Application.Session.Accounts.Item(1).CurrentUser.Name = "WhhateverIwant"

最后出现了一个错误：“编译错误：应为：表达式”

---

救命啊！如何通过VBA代码更改当前用户名和电子邮件地址？

将MailItem.SendUsingAccout属性设置为Application.Session.Accounts集合中的一个Account对象。

我试过了。不幸的是，有一大堆潜在的电子邮件地址可以使用。该帐户将用于一个域，但他们可以使用该域中的任何电子邮件地址。这有意义吗？对于Exchange，请将MailItem.SentonBehalfName属性设置为当前用户可以代表其发送的GAL用户的名称。