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

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

上一主题 下一主题
 
只看楼主 倒序阅读 0楼  发表于: 2017-09-29
下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. JV_VF'  
NN> E1d=  
KTLq~Ru  
Dim strMsg As String 8G3CQ]G  
Dim myFwdMail As Outlook.MailItem v3\ |  
Dim myFwdMeet As Outlook.MeetingItem K!~j}z*  
E&>3{uZI  
Set myFwdMail = itemMail.Forward 0#Ivo<V  
0APh=Alq  
myFwdMail.Recipients.Add "xxx@xxx.com" LL% Aw)Q`  
myFwdMail.Send <KY \sb9  
Set myFwdMail = Nothing ["O/%6b9+  
End Sub |y%pJdPk=  
分享到
快速回复
限60 字节
 
上一个 下一个