2017-08-31 92 views
0

行动时,我有这样这让我表演动作回复,转发和撰写电子邮件时,代码:触发执行从特定帐户

Public WithEvents myItem As Outlook.MailItem 

Private Sub Application_ItemLoad(ByVal Item As Object) 
    If Item.Class = olMail Then 
     Set myItem = Item 
    End If 
End Sub 

Private Sub myItem_Open(Cancel As Boolean) 
    msgbox ("hello world") 
End Sub 

现在我想自动CC添加收件人,只有当特定的帐户我我正在回复,转发或撰写新邮件。我是完全noob编码。任何线索如何开始?感谢您分享任何知识。

回答

0

使用MailItem.SendUsingAccount属性。如果它为空,则可以假定默认帐户(Application.Session.Accounts(1))正在使用。)