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

下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. E#"QaI8`  
m1_?x
U  
Z+ubc"MVb  
Dim strMsg As String U`q[ 5U"  
Dim myFwdMail As Outlook.MailItem ZWMX!>o<  
Dim myFwdMeet As Outlook.MeetingItem RsBo\#`  
04tUf3>  
Set myFwdMail = itemMail.Forward }@yvw*c  
|)6(_7e9  
myFwdMail.Recipients.Add "xxx@xxx.com" O{8"f\*  
myFwdMail.Send XuJwZN!(  
Set myFwdMail = Nothing []Cvma1\  
End Sub 7'FDI`e[