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

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

上一主题 下一主题
 
只看楼主 倒序阅读 0楼  发表于: 2017-09-29
下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. k8SY=HP  
u[4h|*'"|  
a@9W'/?igk  
Dim strMsg As String V$iA3)7W%  
Dim myFwdMail As Outlook.MailItem qI tbY%  
Dim myFwdMeet As Outlook.MeetingItem |5q,%9_  
nE0I[T(  
Set myFwdMail = itemMail.Forward J-azBi  
\{Je!#  
myFwdMail.Recipients.Add "xxx@xxx.com" ep`8LQf  
myFwdMail.Send 6/p9ag]  
Set myFwdMail = Nothing EG_P^ <z  
End Sub V`i(vC(  
分享到
快速回复
限60 字节
 
上一个 下一个