Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

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

Outlook 2013 wenn die email gelesen markiert ist dann soll sie in einen ordner verschoben werden

Frage Microsoft Outlook & Mail

Mitglied: jjsn1988

jjsn1988 (Level 1) - Jetzt verbinden

04.12.2014, aktualisiert 15:51 Uhr, 1052 Aufrufe, 2 Kommentare

Hallo ihr Admins,
outlook 2013
wenn die email gelesen markiert ist dann soll sie in einen ordner verschoben werden
ist dies möglich?
Habe es mit den normalen Regeln versucht dort aber nicht die einstellung gefunden als gelesen markiert oder so.
Danke für eure Zeit und Ideen
Mitglied: vossi31
04.12.2014 um 18:12 Uhr
Moin,

mit Outlook 2010 geht es nicht über Regeln, wenn ich dies richtig deute.
http://www.administrator.de/forum/outlook-2010-mails-nachdem-sie-gelese ...
Mit OL2013 vermutlich auch nicht.
Du könntest dir aber das Verschieben über die "Quicksteps", die Du auf eine Taste legst etwas vereinfachen.

Henning
Bitte warten ..
Mitglied: colinardo
04.12.2014, aktualisiert um 21:20 Uhr
Moin zusammen,
könnte man mit einem Makro erledigen:
(Im Beispiel werden Mails im Posteingang die als gelesen markiert wurden, automatisch in einen Unterorder des Posteingangs verschoben [lässt sich in Zeile 10 anpassen]). Der Code muss im VBA-Editor ALT+F11 in den Abschnitt ThisOutlookSession oder DieseOutlookSitzung kopiert werden. Zusätzlich muss natürlich die Ausführung von Makros im Sicherheitscenter von Outlook erlaubt werden.
Wichtig: Danach ist unbedingt ein Neustart von Outlook nötig.
01.
'Wichtig: Diese Variablen müssen unbedingt am Anfang des Code-Fensters stehen, es darf keine andere Prozedur davor stehen! 
02.
Dim WithEvents m_items As items 
03.
Dim WithEvents m_Inspector As Inspector 
04.
Dim folderTarget as Folder 
05.
 
06.
Private Sub Application_Startup() 
07.
    'Ordner der überwacht werden soll 
08.
    Set m_items = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Items 
09.
    ' Ordner in den die Mails verschoben werden 
10.
    Set folderTarget = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox).Folders("ZIELORDNERNAME") 
11.
End Sub 
12.
 
13.
Private Sub m_Inspector_Close() 
14.
    On Error Resume Next 
15.
    m_Inspector.CurrentItem.Move folderTarget 
16.
End Sub 
17.
 
18.
Private Sub m_items_ItemChange(ByVal Item As Object) 
19.
    Dim mail As MailItem, objInsp As Inspector, found As Boolean 
20.
 
21.
    If Item.CLASS = olMail Then 
22.
        Set mail = Item 
23.
        If Not mail.UnRead Then 
24.
            On Error Resume Next 
25.
            If Application.Inspectors.count > 0 Then 
26.
                For Each objInsp In Application.Inspectors 
27.
                    If objInsp.CurrentItem.EntryID = mail.EntryID Then 
28.
                        Set m_Inspector = objInsp 
29.
                        found = True 
30.
                        Exit For 
31.
                    End If 
32.
                Next 
33.
            End If 
34.
            If Not found Then 
35.
                mail.Move folderTarget 
36.
            End If 
37.
        End If 
38.
    End If 
39.
End Sub
Grüße Uwe

p.s. wurde nur grob getestet, Benutzung erfolgt auf eigene Gefahr, keine Funktionsgarantie unter allen Bedingungen.
Bitte warten ..
Neuester Wissensbeitrag
Humor (lol)

Linkliste für Adventskalender

(3)

Information von nikoatit zum Thema Humor (lol) ...

Ähnliche Inhalte
E-Mail
Outlook,Mail,Smartphone Problem als gelesen markiert (6)

Frage von Yannosch zum Thema E-Mail ...

Outlook & Mail
gelöst Outlook 2013 Von Feld in alten Entwürfen (2)

Frage von Xartor zum Thema Outlook & Mail ...

Microsoft Office
Aus Outlook 2013 Daten aus Tabellenfeldern in Excel übertragen (7)

Frage von ich2110 zum Thema Microsoft Office ...

Heiß diskutierte Inhalte
Windows Server
DHCP Server switchen (24)

Frage von M.Marz zum Thema Windows Server ...

SAN, NAS, DAS
gelöst HP-Proliant Microserver Betriebssystem (14)

Frage von Yannosch zum Thema SAN, NAS, DAS ...

Grafikkarten & Monitore
Win 10 Grafikkarte Crash von Software? (13)

Frage von Marabunta zum Thema Grafikkarten & Monitore ...

Erkennung und -Abwehr
Spam mit eigener Domain (12)

Frage von NoobOne zum Thema Erkennung und -Abwehr ...