從Outlook中的輔助電子郵件帳戶發送

我有一個包含一些VBA的Excel電子表格，它將向電子表格中的電子郵件地址發送營銷電子郵件給每個人。從Outlook中的輔助電子郵件帳戶發送

當我通過我的主帳戶發送它時，它的工作原理絕對完美，但是當我嘗試通過我們的'marketing @'電子郵件帳戶發送時，它只會將發送到該帳戶。

電子郵件從我的帳戶發送（正確）並顯示在我發送的項目中，當它們在marketing @ account中收到時，回覆地址爲marketing @，因此一切似乎都正常。它只是不發送給收件人。

我有權限在Exchange中的SendAs和這個工程（如果我嘗試一個不同的地址，我得到一個訪問被拒絕的錯誤信息），但不能解決爲什麼這根本不適用於我。

這是我的代碼：

Private Sub StackOverflow() 
    Dim OlApp As Outlook.Application 
    Dim olMail As Outlook.MailItem 

    Set OlApp = New Outlook.Application 
    Set olMail = OlApp.CreateItem(olMailItem) 
    With olMail 
     .SentOnBehalfOfName = """Marketing"" <[email protected]>" 
     .To = "Recipient" 
     .Subject = "Test" 
     .Body = "Test" 
     .Display 
    End With 

    Set olMail = Nothing 
    Set OlApp = Nothing 
End Sub

什麼樣的變化，我需要對這個代碼把它發送給收件人，而不是回到我從發送帳戶？

來源

2016-10-11 Stephen

請看[ask]和[mcve]。 – Mat

編輯以使代碼最小化 – Stephen

當前最小代碼將發送到「收件人」。它既不完整也不可驗證。如果您放入足夠的代碼以便您看到（驗證）問題，那麼使用最少的和現在完整的示例代碼就可以獲得比零更好的答案。描述如何以他人可以嘗試重新創建過程的方式獲得「收件人」。 – niton

這現在已經解決了，它與Excel或Outlook無關。

看來，不知何故，在服務器上放置了一條規則，將從該帳戶發送到帳戶的任何內容重新路由到該帳戶。現在這條規則已被刪除，代碼完美地工作。

來源

2016-10-12 12:41:12 Stephen

從Outlook中的輔助電子郵件帳戶發送

回答

相關問題