Como criar automaticamente uma tarefa sempre que uma categoria específica for atribuída a um e-mail no Outlook

Este artigo ensinará como criar automaticamente uma nova tarefa ao atribuir uma categoria de cor específica a um e-mail por meio do Outlook VBA.

Antigamente, quando eu recebia um e-mail envolvendo uma tarefa, eu especificava a categoria “Tarefa” para este e-mail e criava uma nova tarefa relacionada. Para ser honesto, esse processo é realmente demorado. Tenho que anotar todas as informações com antecedência, pois esses detalhes devem ser exigidos na nova tarefa. Mas agora, com a ajuda do VBA, o Outlook pode criar automaticamente uma nova tarefa sempre que eu especificar a categoria “Tarefa” em um e-mail. Se você estiver interessado nesta dica, continue lendo para obtê-los em detalhes.

Criar automaticamente uma tarefa sempre que uma categoria específica for atribuída a um e-mail

1. Para começar, abra o Outlook e acesse a guia "Desenvolvedor".
2. Nesta guia, você pode encontrar e clicar no botão “Visual Basic”.
3. Em seguida, uma nova janela de “Microsoft Visual Basic for Applications” será aberta. Nele, você deve clicar duas vezes no projeto “ThisOutlookSession”.
4. Em seguida, você deve copiar os seguintes códigos VBA na janela do projeto “ThisOutlookSession”.

Public WithEvents OlItems As Outlook.Items

Sub Application_Startup()
    Set OlItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub

Sub OlItems_ItemChange(ByVal Item As Object)
    Dim obApp As Application
    Dim olTask As TaskItem

    If Item.Class = olMail And Item.Categories = "Task" Then
       Set obApp = Outlook.Application
       Set olTask = obApp.CreateItem(olTaskItem)
       With olTask
            .Subject = Item.Subject
            .Body = Item.Body
            .Attachments.Add Item
            .StartDate = Now
            .DueDate = Now + 3
            .Save
            .Display
       End With
    End If
 
    'To clear the category
    'If you want to keep the category, remove the following four lines
    With Item
         .Categories = ""
         .Save
    End With
 
    Set obApp = Nothing
    Set olTask = Nothing
End Sub

5. Depois disso, você seria obrigado a assinar este código. Você pode usar o utilitário interno do Office – “Certificado Digital para Projetos VBA” para alcançá-lo. Para etapas mais detalhadas, consulte a Etapa 2 neste artigo “2 etapas para marcar automaticamente lixo eletrônico como lido no Outlook".
6. Mais tarde, a fim de evitar macro maliciosa externa, você deve acessar a “Central de Confiabilidade” e alterar as configurações de macro para habilitar somente macros assinadas digitalmente.
7. Eventualmente, você pode tentar.

• Escolha um item de e-mail e atribua uma categoria específica a ele, como na captura de tela a seguir:
• Imediatamente, uma nova tarefa será criada automaticamente e exibida em uma nova janela pop-up.

Fique de olho em macros maliciosas em e-mails suspeitos

É de vital importância bloquear todas as macros externas não assinadas, pois elas podem conter vírus ou malware, que podem danificar seus dados do Outlook com facilidade. Portanto, os usuários devem prestar muita atenção aos e-mails que acompanham as macros. Além disso, é altamente recomendável investir em um notável ferramenta de correção de dados corrompidos do Outlook, gostar DataNumen Outlook Repair. Ele pode vir em seu socorro quando você sofre uma falha inesperada do Outlook.

Introdução do autor:

Shirley Zhang é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo reparar erro SQL mdf e produtos de software de reparo do Outlook. Para mais informações visite www.datanumen.com