VBA Outlook Mails auslesen
Hallo Gemeinschaft,
vwerwende folgendes script für da Verarbeiten von Emails, die in einen bestimmten Ordner gelangen - gibt es eine Möglichkeit, dass ich zwei Ordner überwache?
vwerwende folgendes script für da Verarbeiten von Emails, die in einen bestimmten Ordner gelangen - gibt es eine Möglichkeit, dass ich zwei Ordner überwache?
Sub Application_NewMailEx(ByVal EntryIDCollection As String)
'On Error Resume Next
Dim myFolder As Outlook.MAPIFolder
Dim myNameSpace As Outlook.NameSpace
Dim OLApp As New Outlook.Application
Dim msg As Outlook.MailItem
Set myNameSpace = Application.GetNamespace("MAPI")
Set myFolder = myNameSpace.GetDefaultFolder(olFolderInbox).Folders("Booking")
Set Application.ActiveExplorer.CurrentFolder = myFolder
Application.GetNamespace("MAPI").GetDefaultFolder (olFolderInbox)
For Each msg In myFolder.Items
If msg.UnRead Then
.....
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 7889449487
Url: https://administrator.de/forum/vba-outlook-mails-auslesen-7889449487.html
Ausgedruckt am: 02.04.2025 um 00:04 Uhr
2 Kommentare
Neuester Kommentar

Dein Fragenkontingent ist für diese Woche schon aufgebraucht, komm Freitag wieder.
Outlook newMailex oder NewMail?
Zeppel.
Application_NewMailEx(ByVal EntryIDCollection As String)
Das erfasst eh schon alles was rein kommt ... RTFMOutlook newMailex oder NewMail?
Zeppel.