テンプレートを決定したり、他の受信者を追加したり、件名を編集したりできるマクロ

Question

私は VBA の初心者ですが、宛先フィールドに基づいて、使用するテンプレートを決定し、CC および BCC フィールドに特定の受信者を追加し、既存の件名に文字列を追加する (例: "example_subject" --> "confirmation\example_subject") Outlook マクロを作成したいと考えています。

私の努力の結果は次のようになりました:

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

問題は、BCC 受信者が常に [宛先] フィールドに表示されることです。何が間違っているのかわかりません。