僅在打開郵件時在共享郵箱中運行腳本

我試圖從網絡上找到我的問題的答案。因爲我從outlook-vba沒有太多的經驗，所以我決定在這裏問。僅在打開郵件時在共享郵箱中運行腳本

我想要做的是在用戶打開郵件時運行腳本。此外，我需要僅在共享郵箱中運行此腳本，而不是在用戶自己的框中。

我已經使用了用戶@ZZA question # 21727768中的代碼，但它對創建郵件和回覆郵件有點煩惱（它也會在這些情況下運行腳本）。這很有幫助，但我還沒有找到一種方法來將該代碼應用於用戶從共享郵箱打開郵件的情況。

這裏有什麼幫助嗎？

謝謝！

來源

2016-07-06 AkAntA

沒除了複製並粘貼來自該問題的代碼之外，你還嘗試其他任何東西嗎？ –

你應該看看這個工作與共享郵箱http://www.slipstick.com/developer/code-samples/use-macro-assign-messages-shared-mailbox/ –

你可以發佈你的腳本試圖跑？ – 0m3r

好吧，我發現了一個更簡單的方法來做到這一點（這主要是與吸菸有關的問題代碼，在OP）

Public WithEvents myItem As Outlook.MailItem 
Public EventsDisable As Boolean 



Private Sub Application_ItemLoad(ByVal Item As Object) 
    If EventsDisable = True Then Exit Sub 
    If Item.Class = olMail Then 
     Set myItem = Item 
    End If 
End Sub 


Private Sub myItem_Open(Cancel As Boolean) 
    EventsDisable = True 
    'this is the new part 
    If myItem.Parent = "NAMEOFYOURSHAREDINBOX" Then 
     'your code here 
    End If 
    EventsDisable = False 
End Sub

晴學分hstay

HTH

來源

2016-07-08 07:44:45

謝謝！這解決了我的問題。還要感謝@hstay。 – AkAntA

僅在打開郵件時在共享郵箱中運行腳本

回答

相關問題