Betreff und Absender in Outllook auslesen

Bild

Betrifft: Betreff und Absender in Outllook auslesen
von: Klaus
Geschrieben am: 23.09.2003 14:17:58

Hallo,
ist es möglich den Betreff und den Absender einer Mail die sich im Posteingang im Outlook befindet auszulesen?Wenn ja, wie?
Vielen Dank im voraus.
Grüße Klaus

Bild


Betrifft: AW: Betreff und Absender in Outllook auslesen
von: Andreas S
Geschrieben am: 23.09.2003 15:57:29

Hallo,

hier ein Ansatz:


Sub OutlookMakro()
Dim myOlApp As Object
Dim myNamespace As Object
Dim myFolder As Object
Dim myItems As Object
Dim myMail
Set myOlApp = CreateObject("Outlook.Application")
Set myNamespace = myOlApp.GetNamespace("MAPI")
Set myFolder = myNamespace.GetDefaultFolder(6)
Set myItems = myFolder.Items
For Each myMail In myItems
    Debug.Print myMail.Subject, myMail.sendername
Next
End Sub



Gruss
Andreas


Bild


Betrifft: AW: Betreff und Absender in Outllook auslesen
von: Klaus
Geschrieben am: 25.09.2003 15:37:41

Hallo Andreas,
vielen Dank.Klappt wunderbar.
Grüße Klaus


 Bild

Beiträge aus den Excel-Beispielen zum Thema " Betreff und Absender in Outllook auslesen"