Hallo zusammen,
viele von euch kennen das vielleicht.
Man schreibt den ganzen Tag mit einer Person hin und her und dass immer auf eine angefangene E-Mail, sodass irgendwann der Betreff ungefähr so aussieht:
AW: Antw.: AW: Antw.: AW: Antw.: AW: Antw.: AW: Antw.: AW: Antw.: AW:
Schnell sammeln sich also E-Mails zum gleichen Thema an, die dann aber schon wieder alt sind, weil eine neue da ist.
Hat jemand eine Idee oder einen Ansatz zu einem VBA-Script, mit dem man am Ende eines Tages oder auf Knopfdruck das E-Mail-Postfach so bereinigen kann, dass immer nur die aktuellste E-Mail da ist?
Gruß
jugendsani
Hat jemand eine Idee oder einen Ansatz zu einem VBA-Script,
mit dem man am Ende eines Tages oder auf Knopfdruck das
E-Mail-Postfach so bereinigen kann, dass immer nur die
aktuellste E-Mail da ist?
Hallo Sani,
ich bin mir nahezu sicher ich könnte das lösen. Aber da ich von OL keine Ahnung habe ist mir das im Rahmen dieses Forums zu Zeitaufwendig.
So gesehen, müßtest du da schon selbst im Internet nach Codeteilen suchen und die zusammensetzen.
z.B. diesen als Anfang:
Private Sub Application\_NewMail()
' Holt die erste ungelesene Mail und tut was damit
Dim olFld As Outlook.MAPIFolder
Set olFld = Outlook.Session.GetDefaultFolder(olFolderInbox)
olFld.items.Sort "[ReceivedTime]", False
Dim oMail As Outlook.MailItem
Set oMail = olFld.items.GetFirst
' Hier kann man dann alles mit der Mail weiter anfangen
MsgBox "Newmail:" & oMail.subject
Set oMail = Nothing
Set oFld = Nothing
End Sub
Das ist schon mal ein guter Ansatz, darauf aufbauend könntest du nach Bestandteilen des Codes im Inet suchen, z.B. nach
Outlook.Session.GetDefaultFolder(olFolderInbox)
usw.
Gruß
Reinhard