切换到宽版
  • 4224阅读
  • 0回复

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

上一主题 下一主题
 
只看楼主 倒序阅读 0楼  发表于: 2017-09-29
下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. a=p3oh?%-O  
#q==GT7  
e<~uU9 lg1  
Dim strMsg As String 1'c!9  
Dim myFwdMail As Outlook.MailItem p'KU!I }  
Dim myFwdMeet As Outlook.MeetingItem *N\U{)b\  
Tud[VS?99  
Set myFwdMail = itemMail.Forward MyCX6+Ci)  
`9a%}PVQ-  
myFwdMail.Recipients.Add "xxx@xxx.com" 0u'2f`p*  
myFwdMail.Send Yx(?KN7V?  
Set myFwdMail = Nothing w gATfyg r  
End Sub T*k K-@.i  
分享到
快速回复
限60 字节
 
上一个 下一个