Outlook VBA ThisOutlookSession -> Outlook COM AddIn

  • VB.NET

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von klaus25.

    Outlook VBA ThisOutlookSession -> Outlook COM AddIn

    Hallo zusammen,

    ich möchte gerne den folgenden Code, den ich bisher in Outlook-VBA im 'Modul' ThisOutlookSession erfolgreich ausführe, in ein Outlook COM-AddIn packen.

    VB.NET-Quellcode

    1. Option Explicit
    2. Public WithEvents newMails_inbox As Outlook.Items
    3. Public Sub Application_Startup()
    4. newMailsinbox = Application.GetNamespace("MAPI").Folders.Item("Postfach1").Folders.Item("Inbox").Items
    5. End Sub
    6. Private Sub newMailsinbox_ItemAdd(ByVal Item As Object)
    7. MsgBox("Neues Element im Posteingang")
    8. End Sub

    dazu habe ich in VisualStudio ein Outlook AddIn Projekt angelegt und folgenden Code eingefügt:

    VB.NET-Quellcode

    1. Public Class ThisAddIn
    2. Public WithEvents newMailsinbox As Microsoft.Office.Interop.Outlook.Items
    3. Public Sub ThisAddIn_Startup() Handles Me.Startup
    4. newMailsinbox = Application.GetNamespace("MAPI").Folders.Item("Postfach1").Folders.Item("Inbox").Items
    5. End Sub
    6. Private Sub newMailsinbox_ItemAdd(ByVal Item As Object)
    7. MsgBox("Neues Element im Posteingang")
    8. End Sub
    9. End Class

    jedoch kommt es zu keine Funktion, bzw. die Meldung erscheint nicht. Das AddIn wird aber gestartet (hatte es mit einer msgbox im StartUp überprüft)

    Kann mir hier jemand weiter helfen: was ich fasch gemacht habe bzw. was man ändern muß.

    Gruß Klaus25

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „klaus25“ ()