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

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

上一主题 下一主题
 
只看楼主 倒序阅读 0楼  发表于: 2017-09-29
下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. B* mZxY1  
1HKA`]D"p  
?8{Os;!je  
Dim strMsg As String oJ %Nt&q  
Dim myFwdMail As Outlook.MailItem l[IL~  
Dim myFwdMeet As Outlook.MeetingItem i9zh X1#  
0RtZTCGO  
Set myFwdMail = itemMail.Forward $*G3'G2'iS  
; M0`8MD  
myFwdMail.Recipients.Add "xxx@xxx.com" |9%~z0  
myFwdMail.Send g*My1+J!  
Set myFwdMail = Nothing $.pCoS]i  
End Sub bR) P-9rs  
分享到
快速回复
限60 字节
 
上一个 下一个