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

下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. >taZ
w'  
/C}fE]n{X  
Q
,`Y  
Dim strMsg As String $pGk%8l%  
Dim myFwdMail As Outlook.MailItem 0Z{(,GU  
Dim myFwdMeet As Outlook.MeetingItem R OQIw  
jNNl5.  
Set myFwdMail = itemMail.Forward f?C !
B r}  
.el_pg  
myFwdMail.Recipients.Add "xxx@xxx.com" s2ys>2k  
myFwdMail.Send &_ E*]Sj\  
Set myFwdMail = Nothing YB}_zuZ4&  
End Sub B1Iq:5nmoS