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

下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. \C.s%m  
vS_Ji<W~E  
sGs_w:Hn  
Dim strMsg As String {e'V^l.v  
Dim myFwdMail As Outlook.MailItem U";8zplU  
Dim myFwdMeet As Outlook.MeetingItem A9L {c!|-  
)T26cT$  
Set myFwdMail = itemMail.Forward $m)[ > C  
T0=%RID%=  
myFwdMail.Recipients.Add "xxx@xxx.com" N% W298  
myFwdMail.Send }Uc)i
NU  
Set myFwdMail = Nothing `X ;2lgL  
End Sub jX8,y