Deleting an email when subject contains certain words
12,327
I got it to work:
'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
Author by
Admin
Updated on June 08, 2022Comments
-
Admin almost 2 years
At work I use Microsoft Outlook, and I've run out of space for outlook rules.
I'm trying to create a VBA procedure that will check my email as I get it, and if there is a email with a specified string in the subject it will delete it.
This is what I tried to code but I couldn't get it to work:
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