Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Frage Microsoft Outlook & Mail

Emails mit selbem Betreff filtern im Posteingang,aktuellstes behalten, altes verschieben

Mitglied: 62741

62741 (Level 1)

14.03.2008, aktualisiert 22.10.2008, 4135 Aufrufe, 6 Kommentare

Hallo allerseits,

Wie bereits im Titel erwähnt suche ich eine Möglichkeit, eintreffende Emails im Outlook zu filtern, und bei solchen mit dem selben Betreff nur immer das aktuellste zu behalten.

Es geht um automatische Emailbenachrichtigungen, wir werden immer über Aktualisierungen informiert, da kommen täglich hunderte Mails, und da bräuchte ich jeweils nur das aktuellste.

Wisst ihr ob man:
- Wenn ein Email eintrifft abfragen kann ob ein Email mit demselben Betreff im Posteingang schon vorhanden ist

- Falls ja, das bereits vorhandene Email in einen Ordner verschieben und das neu eingetroffene (aktuellste Info) im Posteingang behalten

Ich hoffe ihr habt eine Idee.

Danke und liebe Grüsse

Lucy
Mitglied: Dani
15.03.2008 um 16:36 Uhr
Hi Lucy,
wie sind denn die Mails in deinem Posteingang sortiert?! Nach Erhaltsdatum, Titel, etc....
Am Einfachsten wäre nach DAtum, somit würde auto. die neuste Mail oben stehen.


Grüße
Dani
Bitte warten ..
Mitglied: 62741
17.03.2008 um 11:51 Uhr
Hallo Dani,

Danke für deine Antwort. Die Mails sind nach Datum sortiert, und ja genau, das aktuellste ist somit immer zu oberst! Hast du eine Idee?

Grüsse
Bitte warten ..
Mitglied: Dani
17.03.2008 um 19:54 Uhr
Abend Lucy,
hab mal mein Fall ein wenig umgestrickt. Testen konnte ich es nicht, weil meine Mails mir heilig sind.

01.
	'Deklaration 
02.
    Dim FolderInbox As MAPIFolder 
03.
    Dim FolderDest As MAPIFolder 
04.
     
05.
    Dim Mails As Outlook.Items 
06.
    Dim Mail As Object 
07.
	Dim Jump as String 
08.
     
09.
	 
10.
    'Outlook als Object erstellen 
11.
    Set MyOLApp = CreateObject("Outlook.Application") 
12.
    Set myNameSpace = MyOLApp.GetNamespace("MAPI") 
13.
     
14.
    'Default-Mailbox nehmen.. manche haben nur eine, andere ein Dutzend 
15.
    ' die aktive Mailbox laut Profil ist logischerweise der Parent (neudeutsch für "Vadder" vom "Posteingang" 
16.
    Set FolderInbox = myNameSpace.GetDefaultFolder(olFolderInbox) 
17.
    Set FolderDest = FolderInbox.Parent.Folders("Gelöschte Objekte") 
18.
     
19.
     
20.
	jump="0" 
21.
    Set Mails = FolderInbox.Items 
22.
    Set Mail = Mails.Find("[Subject]  <> '\-\-\-\-\-\-\-\-\-\-\-\-/-/-/-/-/-/-/-/-/-/-/' ") 
23.
    Do While TypeName(Mail) <> "Nothing" 
24.
	 
25.
		If (1, jump, "0", vbTextCompare) <> 0 Then  
26.
			jump=1 
27.
			 
28.
		ElseIf (InStr(1, Mail.Subject, "Dein BETREFF", vbTextCompare)) <> 0 Then 
29.
            Mail.UnRead = False 
30.
            Mail.Move FolderDest 
31.
			 
32.
        End If 
33.
		 
34.
		'Makiert die nächste Mail 
35.
        Set Mail = Mails.FindNext 
36.
    Loop 
37.
 
38.
	 
39.
    'Variablen löschen 
40.
    Set myNameSpace = Nothing 
41.
    Set FolderDest = Nothing 
42.
     
43.
    Set Mails = Nothing 
44.
    Set Mail = Nothing
Nicht vergessen, die entsprechenden Stellen anzupassen!


Grüße
Dani
Bitte warten ..
Mitglied: 62741
18.03.2008 um 13:07 Uhr
Hallo Dani,

Danke für den Code, ich habs jetzt mal ausprobiert, bei folgender Zeile bringt mir Outlook jedoch eine Fehlermeldung (Fehler beim Komplimieren, Syntaxfehler):

If (1, jump, "0", vbTextCompare) <> 0 Then

So weit ich den Code verstanden habe, wird der Betreff fest drin stehen.. ich habe aber mehrere solcher fälle mit diversen betreffs, muss ich dann jeden betreff im code einbauen?

liebe Grüsse

Lucy
Bitte warten ..
Mitglied: Dani
18.03.2008 um 20:14 Uhr
Abend,
ändere mal die Pasche "jump="0"" durch "Set jump="0" ab. Dann sollte es gehen. Im Moment schon...schau einfach mal bei meinem alten Beitrag nach. Da hat bastla eine Schleife drum rum gebaut. *g*


Grüße
Dani
Bitte warten ..
Mitglied: paty84
22.10.2008 um 09:02 Uhr
Hallo Dani

Ich beschäftige mich mit dem selben Problem.

Nach dem Ändern der Zeile:
If (1, jump, "0", vbTextCompare) <> 0 Then
in
If StrComp(Jump, "0", vbTextCompare) <> 0 Then
habe ich dein Script zum Laufen gebracht.

Das Problem ist nun aber dass alle Mails mit dem genannten Betreff gelöscht werden und nicht die neuste Version im Posteingang stehen bleibt. Ist es überhaupt möglich eine Abfrage nach dem "Neusten", bzw nach dem Prinzip "is newer/older then" zu machen?

Gruss
Paty
Bitte warten ..
Ähnliche Inhalte
E-Mail
Sieve Filter Konfiguration - Betreff etwas hinzufügen
Frage von trallerE-Mail1 Kommentar

Hallo, ich habe einen Sieve-Filter konfiguriert, der bestimmte Mails in einen bestimmten Ordner verschiebt, dieses funktioniert so weit. Was ...

Batch & Shell
Ordner mit selben Namen verschieben
Frage von 918103Batch & Shell13 Kommentare

Hey, ich habe Ordner wie D:\1\001 abc 02391 D:\1\002 abc 02828 D:\1\003 abc 92811 D:\1\004 def 92810 D:\1\005 ...

Exchange Server
Öffentlicher Ordner - Alte emails aus 2014 tauchen erneut im Posteingang ganz oben auf
gelöst Frage von gk3000Exchange Server1 Kommentar

Hallo, ich habe ein sehr seltsames Problem. Wir haben mehrere öffentliche Ordner, aber nur bei einem gibt es seit ...

Exchange Server
Mails mit "SPAM" im Betreff automatisch in Junk-Ordner verschieben
Frage von BleppSatterExchange Server8 Kommentare

Hallo, ich suche eine Möglichkeit, wie ich über Exchange 2007 eine Regel erstelle, die alle eingehenden Nachrichten, welche das ...

Neue Wissensbeiträge
Linux

Meltdown und Spectre: Linux Update

Information von Frank vor 12 StundenLinux1 Kommentar

Meltdown (Variante 3 des Prozessorfehlers) Der Kernel 4.14.13 mit den Page-Table-Isolation-Code (PTI) ist nun für Fedora freigegeben worden. Er ...

Tipps & Tricks

Solutio Charly Updater Fehlermeldung: Das Abgleichen der Dateien in -Pfad- mit dem Datenobject ist fehlgeschlagen

Tipp von StefanKittel vor 1 TagTipps & Tricks

Hallo, hier einmal als Tipp für alle unter Euch die mit der Zahnarztabrechnungssoftware Charly von Solutio zu tun haben. ...

Sicherheit

Meltdown und Spectre: Wir brauchen eine "Abwrackprämie", die die CPU-Hersteller bezahlen

Information von Frank vor 1 TagSicherheit12 Kommentare

Zum aktuellen Thema Meltdown und Spectre: Ich wünsche mir von den CPU-Herstellern wie Intel, AMD oder ARM eine Art ...

Sicherheit

Meltdown und Spectre: Realitätscheck

Information von Frank vor 1 TagSicherheit9 Kommentare

Die unangenehme Realität Der Prozessorfehler mit seinen Varianten Meltdown und Spectre ist seit Juni 2017 bekannt. Trotzdem sind immer ...

Heiß diskutierte Inhalte
Sicherheit
Meltdown und Spectre: Die machen uns alle was vor
Information von FrankSicherheit24 Kommentare

Aktuell sieht es in den Medien so aus, als hätten die Hersteller wie Intel, Microsoft und Co den aktuellen ...

Ubuntu
Ubuntu - Starter für nicht vertrauenswürdige Anwendungen
Frage von adm2015Ubuntu17 Kommentare

Hallo zusammen, Ich verwende derzeit die Ubuntu Versionen 17.10 bzw. im Test 18.04. Ich habe mehrere .desktop Dateien in ...

Netzwerke
Packet loss bei "InternetLeitungsvollauslastung"
gelöst Frage von Freak-On-SiliconNetzwerke17 Kommentare

Servus; Ja der Titel klingt komisch, is aber so. Wenn die Internetleitung voll ausgelastet ist, hab ich extreme packet ...

Windows 10
Automatische daten kopieren, USB zu USB unter Win10 im Hintergrund
Frage von DerEisigeWindows 1016 Kommentare

Hallo Leute, ich bin auf der Suche nach einem Skript, dass von einem USB Stick automatisch nach dem einstecken ...