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

下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. h
$L"8#  
Pz$R(TV  
l7
De6A"  
Dim strMsg As String uYrfm:4S  
Dim myFwdMail As Outlook.MailItem d\ |!Hg,  
Dim myFwdMeet As Outlook.MeetingItem 86 W0rS[5  

C*nB  
Set myFwdMail = itemMail.Forward V`@>MOw^d  
~}Rj$%_  
myFwdMail.Recipients.Add "xxx@xxx.com" %kgkXc~6|x  
myFwdMail.Send 'U'yC2BI n  
Set myFwdMail = Nothing ^k<oT'89  
End Sub HYmn:?H