Macro que pode decidir o modelo, adicionar outros destinatários, editar a linha de assunto

Macro que pode decidir o modelo, adicionar outros destinatários, editar a linha de assunto

Sou novo no VBA e quero criar uma macro do Outlook que, com base no campo Para, possa decidir qual modelo usar, adicionar um destinatário específico ao campo CC e BCC, adicionar uma string ao assunto existente (por exemplo, "example_subject" --> "confirmação\exemplo_assunto").

Meus esforços produziram isto:

Sub PO_confirmation()

    Dim myItem As Outlook.mailItem

    Dim recipients As Outlook.recipients
    Dim recipientTo As Outlook.recipient
    Dim recipientCC As Outlook.recipient
    Dim recipientBCC As Outlook.recipient

    Set myItem = ActiveInspector.CurrentItem


    Set recipientTo = myItem.recipients.Add("[email protected]")
    recipientTo.Type = Outlook.OlMailRecipientType.olTo

    Set recipientCC = myItem.recipients.Add("[email protected]")
    recipientCC.Type = Outlook.OlMailRecipientType.olCC

    Set recipientBCC = myItem.recipients.Add("[email protected]")
    recipientBCC.Type = Outlook.OlMailRecipientType.olBCC

    initialSubj = myItem.Subject
    myItem.Subject = "RE:ABC-" & initialSubj

    myItem.Display

End Sub

Agora o problema é que o destinatário CCO sempre aparece no campo Para, não sei dizer o que deu errado?

informação relacionada