2016-01-06 138 views
0

我一直在Outlook中設置規則有一些麻煩。我的問題的原因是,前景規則的定義和條件似乎不夠強大。Outlook規則,也許與VBA

我想要做什麼。 當有人回覆我係統內的電子郵件時,我收到來自票務系統的自動消息,其中有一個主題,如「添加了評論」。

我想:

  1. 移動這些項目到特定文件夾。
  2. 添加兩類
  3. 播放通知音,
  4. 旗今天跟進,

現在,使用規則,每當我完成一個任務,一個新的電子郵件從系統自帶該規則將再次運行並再次標記所有已完成的任務。 但我想爲已被標記爲完成的郵件制定一個例外。

可能嗎? 我正在考慮使用VBA。也許這裏有人對我可以從哪裏開始有一些指導?

回答

0

如果您想在Outlook中使用VBA。你可以做這樣的事情,這將允許你在回覆時處理一條新消息。

Private WithEvents Items As Outlook.Items 

Private Sub Application_Startup() 
    Dim Ns As Outlook.NameSpace 
    Dim Folder As Outlook.MAPIFolder 

    Set Ns = Application.GetNamespace("MAPI") 
    Set Folder = Ns.GetDefaultFolder(olFolderInbox) 
    Set Items = Folder.Items 
End Sub 

Private Sub Items_ItemAdd(ByVal Item As Object) 
    If TypeOf Item Is Outlook.MailItem Then 
    ProcessNewMessage Item 
    End If 
End Sub 

Private Sub ProcessNewMessage(NewMail As Outlook.MailItem) 
    'DO WHAT YOU NEED TO WHEN NEW MAIL ARRIVES HERE 
    'E.G 
    'MsgBox NewMail.Subject 
End Sub 

您只需編寫消息到達時應執行的操作。檢查主題包含的內容等。

+0

謝謝我會盡力盡快對其進行測試。 – Sipko

+0

好吧,我已經嘗試了一些東西。雖然自從我設置它以來沒有收到新的郵件。 我唯一想知道的是這個叫做什麼? 我的意思是,我不得不創建它作爲一個類模塊,以不給我錯誤。 但是這個類是自動調用還是需要創建一個常規模塊來調用它? – Sipko

+0

應將此代碼添加到名爲ThisOutlookSession的模塊中。 http://stackoverflow.com/questions/5660028/how-to-enable-thisoutlooksession-in-outlook-2007 – Pure