Excel VBA複製Outlook發送項目到Windows文件夾

Question

我希望你能幫助這個。

我目前正在創建一個從Excel啓動的VBA宏，使用Excel文件中的變量創建傳出郵件，這非常簡單。但是，一旦發送，我們需要將郵件複製到網絡目錄而不是公用郵件文件（例如「R：\ Site Reports *****」）。我在Outlook中看到了幾個基於宏的線程，允許將郵件複製到Outlook中的公用文件夾，但是我無法看到任何基於Excel的宏中可以複製Outlook以外的郵件的宏。任何人都可以提出解決方案

提前許多感謝， 丹

Answer 1

您需要先保存郵件項目到磁盤，然後使用FileInfo.MoveTo方法，移動指定的文件到新的位置將其移動到網絡共享，提供選項來指定一個新的文件名。

MailItem.SaveAs方法將Microsoft Outlook項目保存爲指定的路徑和指定文件類型的格式。如果未指定文件類型，則使用MSG格式（.msg）。

當一個或多個項目添加到指定集合時，您可以處理Items類的ItemAdd事件。因此，您可以跟蹤項目何時添加到已發送郵件文件夾（即發送）。

最後，您可能會發現文章Automating Outlook from Other Office Applications有幫助。