Hvordan flyttes e-mail til den angivne mappe efter læsning i Outlook?
Flytning af e-mail til en bestemt mappe efter læsning er den bedste måde at holde indbakke-mappen ren i Outlook. For mange Outlook-brugere har de en tendens til at oprette en regel for flytning af disse læste e-mails. Faktisk understøtter Outlook ikke denne regelguide-proces. I denne artikel viser vi dig, hvordan du flytter e-mail-beskeder til den angivne mappe efter læsning med VBA-kode i Outlook.
Flyt e-mail til den angivne mappe efter læsning i Outlook
- Automatiser e-mail med Auto CC / BCC, Automatisk videresendelse ved regler; sende Auto svar (Ikke til stede) uden at kræve en udvekslingsserver...
- Få påmindelser som BCC Advarsel når du svarer til alle, mens du er på BCC-listen, og Påmind, når du mangler vedhæftede filer for glemte vedhæftede filer...
- Forbedre e-mail-effektiviteten med Svar (alle) med vedhæftede filer, Tilføj automatisk hilsen eller dato og tid til signatur eller emne, Besvar flere e-mails...
- Strømline e-mail med Genkald e-mails, Vedhæftningsværktøjer (Komprimer alle, Gem alt automatisk...), Fjern duplikaterog Hurtig rapport...
Flyt e-mail til den angivne mappe efter læsning i Outlook
Du kan flytte e-mail-beskeder til en bestemt mappe efter læsning med kørende VBA-kode i Outlook.
1. For det første skal du oprette et nyt mappenavn “Bedømt”Under mappen Indbakke.
2. Åbn mappen Indbakke, og tryk derefter på andre + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.
3. Dobbeltklik derefter for at udvide Project1 > Microsoft Outlook-objekter > Denne OutlookSession at åbne VbaProject.OTM editor.
4. Kopier og indsæt derefter nedenstående VBA-kode i VbaProject.OTM-editoren som vist i ovenstående skærmbillede.
VBA-kode: flyt meddelelser efter læsning
Sub MoveInbox2Reviewed()
On Error Resume Next
Set oOutlook = CreateObject("Outlook.Application")
Set oNamespace = oOutlook.GetNamespace("MAPI")
Set oFolderSrc = oNamespace.GetDefaultFolder(olFolderInbox)
Set oFolderDst = oFolderSrc.Folders("Reviewed")
Set oFilteredItems = oFolderSrc.Items.Restrict("[UnRead] = False")
For Each oMessage In oFilteredItems
oMessage.Move oFolderDst
Next
End Sub
5. Klik derefter på Gem for at gemme VBA-koden og derefter lukke Microsoft Visual Basic til applikationer vindue.
6. Højreklik på Hurtig adgangs værktøjslinje, og vælg Tilpas værktøjslinjen Hurtig adgang fra højreklikmenuen. Se skærmbillede:
7. i Outlook Options dialogboks skal du:
1). Vælg Makroer i Vælg kommandoer fra rulleliste
2). Vælg Projekt1. Denne OutlookSession i kassen under Vælg kommandoer fra rulleliste
3). Klik på Tilføj knap;
4). Klik på OK .
8. Så kan du se Makro knappen vises i Hurtig adgangs værktøjslinje. Sørg for, at du finder i den indbakke, du vil flytte alle de læste beskeder fra, og klik derefter på Makro knap for at køre VBA-koden inde i indbakken.
Noter:
1. Denne VBA-kode kan anvendes i Outlook 2007, 2010 og 2013; Men i Outlook 2007 kan du direkte klikke på Kør knappen for at køre koden.
2. Hvis der findes flere e-mail-konti i din Outlook, kan VBA-koden kun anvendes på den konto, hvilken datafil er indstillet som standard. Du kan kontrollere standarddatafilen ved at klikke på File (Felt) > INFO > Kontoindstillinger > Kontoindstillinger at åbne Kontoindstillinger dialog boks. Gå derefter til Datafil fanen, vil du se, at standarddatafilen er markeret med før.
3. Hvis du vil ændre standarddatafilen til en anden e-mail-konto, skal du vælge og fremhæve den konto, du vil indstille som standard, og derefter klikke på Indstillet som standard i Kontoindstillinger dialog boks.
4. Når du kører VBA-koden første gang og finder ud af, at de læste beskeder ikke flyttes på én gang, skal du fortsætte med at klikke på Makro-knappen, indtil alle læste beskeder i indbakken flyttes ud.
Bedste kontorproduktivitetsværktøjer
Kutools til Outlook - Over 100 kraftfulde funktioner til at superlade din Outlook
🤖 AI Mail Assistant: Øjeblikkelige pro-e-mails med AI-magi – et klik for geniale svar, perfekt tone, flersproget beherskelse. Forvandl e-mailing ubesværet! ...
📧 Email Automation: Ikke til stede (tilgængelig til POP og IMAP) / Planlæg Send e-mails / Auto CC/BCC efter regler ved afsendelse af e-mail / Automatisk videresendelse (avancerede regler) / Tilføj automatisk hilsen / Opdel automatisk e-mails med flere modtagere i individuelle meddelelser ...
📨 Email Management: Genkald nemt e-mails / Bloker svindel-e-mails af emner og andre / Slet duplikerede e-mails / Avanceret søgning / Konsolider mapper ...
📁 Vedhæftede filer Pro: Batch Gem / Batch adskilles / Batch komprimere / Automatisk gem / Automatisk afmontering / Automatisk komprimering ...
🌟 Interface Magic: 😊 Flere smukke og seje emojis / Boost din Outlook-produktivitet med fanebaserede visninger / Minimer Outlook i stedet for at lukke ...
👍 Wonders med et enkelt klik: Besvar alle med indgående vedhæftede filer / Anti-phishing e-mails / 🕘Vis afsenderens tidszone ...
👩🏼🤝👩🏻 Kontakter og kalender: Batch Tilføj kontakter fra udvalgte e-mails / Opdel en kontaktgruppe til individuelle grupper / Fjern fødselsdagspåmindelser ...
Over 100 Features Afvent din udforskning! Klik her for at finde mere.