Envío de archivo excel con macro a nombre de buzón compartido.

Espero que me puedan ayudar, tengo un código para enviar por outlook un archivo excel a través de una macro. Me funciona ok, incluso me envía el correo a nombre de otro buzón (un buzón al yo y otras personas tenemos acceso)
El problema que tengo es que cuando se envía el correo, el correo enviado queda en la carpeta enviado de la persona que envió el correo, y no en la carpeta enviados del buzón que se utilizó para enviar el correo.

Por ejemplo:
Yo Jonathan, envío un correo a nombre de Juan, el correo enviado se envía a nombre de Juan, pero queda en los elementos enviados de Jonathan. ¿Se puede hacer algo para que quede en los elementos enviados de Juan?

Mi código es el siguiente:

'adjuntar archivo a outlook

Dim correo As Outlook.Application

Dim mensaje As Outlook.MailItem

On Error Resume Next

Set correo = CreateObject("outlook.application")
correo.Session.Logon

Set mensaje = correo.CreateItem(olMailItem)

With mensaje

.To = Range("a205").Value
.Body = ""
.CC = Range("a206").Value
.Subject = Range("a204").Value
.SentOnBehalfOfName = "[email protected]"
.Attachments.Add ActiveWorkbook.FullName
.Send

End With

correo = Nothing
mensaje = Nothing

On Error GoTo 0

'fin adjuntar archivo a outlook