我正在编写一个宏,目的是在电子邮件上运行,当前正在编辑。 我面对的问题是,我无法删除附件。我得到80030002 error。 这里是我的代码 Set myItem = ActiveInspector.CurrentItem
c = myItem.Attachments.Count
For i = c To 1 Step -1
Set myAttachment = myItem.At
背景: 使用Outlook规则触发脚本,我希望所有从某些高知名度的客户我的电子邮件中立即打开在收到。 我已成功设置了一个规则,当这些客户端向我发送电子邮件时触发。它看起来是这样的: 而且我已经成功地创建了打开邮件的回复,这取决于谁送了它的脚本。它看起来像这样: Sub OpenEmailImmediately(oEmail As Outlook.MailItem)
Select Cas
简短的问题:如何使用它们后正确关闭outlook项目? 代码重现该问题: Dim olApp As New Microsoft.Office.Interop.Outlook.Application
Dim olSelection As Microsoft.Office.Interop.Outlook.Selection = olApp.ActiveExplorer.Selection
For