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

下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. a 0SZw  
W@ R7CQE@  
AiHU*dp6  
Dim strMsg As String Ed=/w6<  
Dim myFwdMail As Outlook.MailItem <*5S7)]BP  
Dim myFwdMeet As Outlook.MeetingItem >|3Y+X  
pwo$qs(p  
Set myFwdMail = itemMail.Forward N9-0b  
gj^)T_E_  
myFwdMail.Recipients.Add "xxx@xxx.com" '\bokwsP  
myFwdMail.Send V(E LrjB0  
Set myFwdMail = Nothing E@ea?Sx  
End Sub nCYz];".