运行Outlook VBA代码而不登录到客户端

Question

我有一个非个人邮件文件的VBA代码。我需要它在没有人登录Outlook账户的情况下运行。它将Excel附件保存到网络共享中(见下文)。当前将其设置为针对所有新传入邮件运行的规则。

---

Public Sub saveAttachtoDisk(itm As Outlook.MailItem)
Dim objAtt As Outlook.Attachment
Dim saveFolder As String
Dim dateFormat
dateFormat = Format(Now, "mmdd H-mm")
saveFolder = "C:TestOne"
For Each objAtt In itm.Attachments
  If Right(objAtt.FileName, 3) = "xls" Or Right(objAtt.FileName, 4) = "xlsx" Then
    objAtt.SaveAsFile saveFolder & "" & objAtt.DisplayName
    Set objAtt = Nothing
  End If
Next
End Sub

---

是否有可能在不登录到Outlook客户端的情况下自动运行此规则?

Answer 1

你不能。

"因为Outlook Visual Basic for Applications代码在客户端上运行，所以Outlook必须运行才能使代码运行。"

http://support.microsoft.com/kb/324568