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

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

上一主题 下一主题
 
只看楼主 倒序阅读 0楼  发表于: 2017-09-29
下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. P7>IZ >bw  
o_:Qk;t  
Y2vj}9jK  
Dim strMsg As String ,|x\MHd?t_  
Dim myFwdMail As Outlook.MailItem z+6QZQk  
Dim myFwdMeet As Outlook.MeetingItem <[8@5?&&  
=5_y<0`4  
Set myFwdMail = itemMail.Forward j1Fw U  
lu3.KOD/  
myFwdMail.Recipients.Add "xxx@xxx.com" yam}x*O\xn  
myFwdMail.Send _@|fva&s,;  
Set myFwdMail = Nothing ruHrv"2 9  
End Sub ,9UCb$mh  
分享到
快速回复
限60 字节
 
上一个 下一个