在MS Outlook中使用VBA设置默认邮件签名

问：

尝试使用 VBA 设置默认的 Outlook 邮件签名。到目前为止，使用word对象执行以下操作：确保SIG作为HTM文件存在于%appdata%\Microsoft\Signatures中Public Sub setmails() Application.EmailOptions.EmailSignature.NewMessageSignature = "SIG" Application.EmailOptions.EmailSignature.ReplyMessageSignature = "SIG" End Sub

在Outlook更新之前，它可以正常工作，可以设置每个邮件帐户的签名，这是一个很好的选择，但据我所知，它没有出现在任何对象中。

现在，如果我运行这个，回复签名是可以的，新的是空白的，如果我反转它们，新的是可以的，回复是空白的，所以一个动作取消了另一个动作。

亲切问候 尼古拉

还尝试了注册表，在注册表中，我发现了一个关键的新签名和一个回复，其中添加了我的电子邮件帐户。如果我从第二个注册表项中手动删除我的电子邮件帐户，一切正常。