2013-10-19 84 views
6

在工作中,我使用Microsoft Outlook,而且我已經用盡了Outlook規則的空間。當主題包含特定字詞時刪除電子郵件

我試圖創建一個VBA過程,它會檢查我的電子郵件,因爲我知道它,如果在主題中有一個帶有指定字符串的電子郵件,它將刪除它。

這就是我試圖代碼,但我無法得到它的工作:

Public Sub process_email(itm As Outlook.MailItem) 
    Dim new_msg As MailItem 

    If new_msg.subject Like "*keyword*" Then 
     new_msg.Delete 
    End If 
End Sub 
+1

參見[這](HTTP://計算器.com/questions/8005713/using-vba-to-read-new-outlook-email)@JimmyPena。用它來捕獲傳入的郵件然後刪除它。 –

回答

5

我得到它的工作:

'deletes all emails with "Magic Carpet Ride" in the subject 
     If InStr(itm.Subject, "Magic Carpet Ride") > 0 Then 
      itm.UnRead = False 
      itm.Save 
      itm.Delete 
      End 
     End If 
相關問題