A solução a seguir faz o que o OP queria, exceto que eles disseram que não queriam mexer com o VBA, porque era muito complexo. Eu concordo, é assustador. Eu me considero um iniciante no VBA para o Outlook. Mas eu tive o mesmo problema e a macro a seguir funcionou para mim, então estou compartilhando, na esperança de que isso ajude alguém.
Public Sub File_Stock_Incoming_Message(Item As Outlook.MailItem)
' This macro is called from a wizard-built rule, where the
' rule operates on *every* incoming message, and its action
' is to call this macro.
Dim NS As Outlook.NameSpace
Set NS = Application.Session
Dim MoveToFolder As Outlook.MAPIFolder
Set MoveToFolder = NS.Folders("mainboxname").Folders("MsgLog")
Dim sbjstr As String
sbjstr = Item.Subject
If (sbjstr = "Whatever Site Error") Then
Item.Move MoveToFolder
End If
End Sub
Observe que neste código do VBA, o email será arquivado na pasta MsgLog somente se o assunto corresponder exatamente a "Whatever Site Error". Ele não arquiva um email com o assunto "Whatever Language Erro", nem arquivará um email com o assunto "Whatever Whatever Errors". Na verdade, como está escrito aqui, é sensível a maiúsculas e minúsculas, por isso nem mesmo arquiva um email com um assunto de "qualquer erro de site".
- Advertência: uma resposta baseada em VBA é executada apenas no cliente Outlook, na medida em que
Eu sei.
- Advertência: você precisa ativar macros no Outlook para usar essa
solução.