[求助]如何实现仅发送功能vba [复制链接]

下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. KI"#f$2&  
`KZm0d{H  
>FeX<L  
Dim strMsg As String zfJ
T,h-{  
Dim myFwdMail As Outlook.MailItem g|
o,uD  
Dim myFwdMeet As Outlook.MeetingItem %z=le7  
Ouk^O}W6  
Set myFwdMail = itemMail.Forward `'DmDg  
uy>q7C  
myFwdMail.Recipients.Add "xxx@xxx.com" KjD/o?JUr  
myFwdMail.Send is?{MJZ_  
Set myFwdMail = Nothing (p"%O  
End Sub (~
p< P+