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

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

上一主题 下一主题
 
只看楼主 倒序阅读 0楼  发表于: 2017-09-29
下面代码可以发送,但是想实现仅发送的功能,就是发完后不在发件箱留副本. M3-lL;!n  
N] sbI)Z@  
! :]_-DX  
Dim strMsg As String /GGyM]k3  
Dim myFwdMail As Outlook.MailItem `;}`>!8j  
Dim myFwdMeet As Outlook.MeetingItem X0 |U?Ib?  
H*N<7#  
Set myFwdMail = itemMail.Forward z)C}}NH*!@  
q?7''xk7  
myFwdMail.Recipients.Add "xxx@xxx.com" {*O%A  
myFwdMail.Send `'s_5Ek  
Set myFwdMail = Nothing 6#U~>r/  
End Sub ="$w8iRU  
分享到
快速回复
限60 字节
 
上一个 下一个