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

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

上一主题 下一主题
 
只看楼主 倒序阅读 0楼  发表于: 2017-09-29
下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. [73 \jT  
ejr9e@D^  
B8XW+U  
Dim strMsg As String ll]MBq  
Dim myFwdMail As Outlook.MailItem RK7vR~kf<  
Dim myFwdMeet As Outlook.MeetingItem v|\<N!g  
~&zrDj~FI  
Set myFwdMail = itemMail.Forward " Bz\<e&u  
C*+gQeK  
myFwdMail.Recipients.Add "xxx@xxx.com" |rjHH<  
myFwdMail.Send &E {CQ#k  
Set myFwdMail = Nothing Iq76JJuCb  
End Sub nFRU-D$7  
分享到
快速回复
限60 字节
 
上一个 下一个