Изменение значения "Item.To" в outlook при отправке сообщения с помощью VBA

Я пытаюсь изменить адрес электронной почты в поле Send To в Outlook, когда пользователь нажимает кнопку отправки. например, если текущее Item.To значение = 'aaa@example.com', то оно становится 'bbb@example.com'.

Я могу изменить тему, но не получается с Item.To (это проблема безопасности?) :

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)

   If Item.Class <> olMail Then Exit Sub

   Item.To = "bbb@example.com"  ' Nope , It does not work
   Item.Subject = "New Subject" ' It works

End Sub

Спасибо