none
Application.NewMailEX Event RRS feed

  • 質問

  • Outlook 2016において、メール受信時にApplication.NewMailEX Event は発生のでしょうか?

    幾つかSampleマクロで試してみたのですが、全く引っかかりませんでした。

    もし、このイベントがOutlook2016において発生するのでしたら、その前提条件を教えていただければありがたいです。

    因みに試したマクロは、以下です。

    Private Sub Application_NewMailEx(ByVal EntryIDCollection As String)
        Dim varEntryIDs
        Dim objItem
        Dim i As Integer
        varEntryIDs = Split(EntryIDCollection, ",")
        For i = 0 To UBound(varEntryIDs)
            Set objItem = Application.Session.GetItemFromID(varEntryIDs(i))
            Debug.Print objItem.Subject
        Next
    End Sub

    2017年7月25日 5:42

回答

  • こんにちは。

    マクロは「ThisOutlookSession」に記述されていますでしょうか?
    また、セキュリティオプションでマクロが無効になっている場合は動作しませんので、一度確認されることをお薦めいたします。
    2017年7月25日 8:58