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

下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. @V(*65b2  
d<% z 1Dj2  
t;\kR4P  
Dim strMsg As String Olt`:;j-  
Dim myFwdMail As Outlook.MailItem t!*?dr  
Dim myFwdMeet As Outlook.MeetingItem ^({})T0wu  
O80<Z#%j`  
Set myFwdMail = itemMail.Forward 2-&k^Gl!:  
%huRsQ%}  
myFwdMail.Recipients.Add "xxx@xxx.com" +:8fC$vVfC  
myFwdMail.Send |_LU~7./  
Set myFwdMail = Nothing =w;F<M|Y  
End Sub :Uz|3gq