Макрос, который может определить шаблон, добавить других получателей, отредактировать строку темы

Question

Я новичок в VBA и хочу создать макрос Outlook, который на основе поля "Кому" может решить, какой шаблон использовать, добавить конкретного получателя в поле "CC" и "BCC", добавить строку в существующую тему (например, "example_subject")-> «подтверждение \ пример_объекта»).

Мои усилия привели к этому:

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("AAA@aaa.com")
    recipientTo.Type = Outlook.OlMailRecipientType.olTo

    Set recipientCC = myItem.recipients.Add("bbb@aaa.com")
    recipientCC.Type = Outlook.OlMailRecipientType.olCC

    Set recipientBCC = myItem.recipients.Add("ccc@aaa.com")
    recipientBCC.Type = Outlook.OlMailRecipientType.olBCC

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

    myItem.Display

End Sub

Теперь проблема в том, что получатель BCC всегда отображается в поле «Кому», я не могу сказать, что пошло не так?