Hogyan lehet áthelyezni az e-mail üzenetet a megadott mappába az Outlook olvasása után?

Az e-mail üzenetek elolvasása után egy meghatározott mappába helyezése a legjobb módja annak, hogy az Inbox mappát tisztán tartsa az Outlook programban. Sok Outlook-felhasználó hajlamos arra, hogy szabályt hozzon létre ezekhez az olvasott e-mailekhez. Valójában az Outlook nem támogatja ezt a varázsló folyamatot. Ebben a cikkben megmutatjuk, hogyan lehet az e-mail üzeneteket egy meghatározott mappába áthelyezni, miután elolvasta az VBA kódot az Outlook programban.

Az e-mail üzenet áthelyezése a megadott mappába az Outlook olvasása után

Az e-mail üzenet áthelyezése a megadott mappába az Outlook olvasása után

E-mail üzeneteket áthelyezhet egy megadott mappába, miután elolvasta az Outlook futó VBA kódját.

1. Először létre kell hoznia egy új mappanevet “Értékelte”Bejövő mappa alatt.

2. Nyissa meg a Bejövő mappát, majd nyomja meg a gombot más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

3. Ezután kattintson duplán a kibontáshoz Project1 > Microsoft Outlook objektumok > ThisOutlookSession megnyitni VbaProject.OTM szerkesztő.

4. Ezután másolja és illessze be az alábbi VBA kódot a VbaProject.OTM szerkesztőbe, a fenti képernyőkép szerint.

VBA kód: üzenetek áthelyezése olvasás után

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. Ezután kattintson a gombra Megtakarítás gombot a VBA kód mentéséhez, majd zárja be a Microsoft Visual Basic for Applications ablak.

6. Kattintson a jobb gombbal a Gyorselérési eszköztár, és válassza ki A Gyorselérés eszköztár testreszabása a jobb egérgombbal kattintva. Lásd a képernyőképet:

7. Ban,-ben Outlook opciók párbeszédpanelen:

1). Válassza a lehetőséget makrók a Válaszd ki a parancsokat legördülő lista;

2). Válassza a lehetőséget Projekt1. ThisOutlookSession alatti dobozban Válaszd ki a parancsokat legördülő lista;

3). Kattints a hozzáad gomb;

4). Kattints a OK gombot.

8. Akkor láthatja a Macro gomb jelenik meg a Gyorselérési eszköztár. Győződjön meg arról, hogy abban a beérkező levelek mappában található, ahonnan az összes olvasott üzenetet áthelyezni kívánja, majd kattintson a gombra Macro gombra kattintva futtathatja a VBA kódot a Beérkező levelek mappában.

Megjegyzések:

1. Ez a VBA kód alkalmazható az Outlook 2007, 2010 és 2013 programokban; De az Outlook 2007 programban közvetlenül rákattinthat a gombra futás gombot a kód futtatásához.

2. Ha az Outlook programban több e-mail fiók létezik, a VBA kód csak abban a fiókban alkalmazható, amelyik adatfájl alapértelmezettként van beállítva. Az alapértelmezett adatfájlra kattintva ellenőrizheti filé > Info > fiók beállításai > fiók beállításai megnyitni fiók beállításai párbeszédablak. Ezután menjen a Adatfájl lapon láthatja, hogy az alapértelmezett adatfájlt a jelöli előtt.

3. Ha az alapértelmezett adatfájlt másik e-mail fiókra kívánja cserélni, válassza ki és jelölje ki az alapértelmezettként beállítani kívánt fiókot, majd kattintson a Beállítás alapértelmezettként a fiók beállításai párbeszédablak.

4. Amikor először futtatja a VBA kódot, és megtudja, hogy az olvasott üzenetek nem kerülnek-e egyszerre mozgatásra, akkor kattintson a Makró gombra, amíg az összes beolvasott üzenet el nem kerül a Beérkező levelek mappából.

---

A legjobb irodai hatékonyságnövelő eszközök

Kutools az Outlook számára - Több mint 100 hatékony funkció az Outlook feltöltéséhez

🤖 AI Mail Assistant: Azonnali profi e-mailek mesterséges intelligencia varázslattal – egyetlen kattintással zseniális válaszok, tökéletes hangnem, többnyelvű elsajátítás. Alakítsa át az e-mailezést könnyedén! ...

???? E-mail automatizálás: Hivatalon kívül (POP és IMAP esetén elérhető)  /  Ütemezze az e-mailek küldését  /  Automatikus CC/BCC szabályok szerint e-mail küldésekor  /  Automatikus továbbítás (Speciális szabályok)   /  Automatikus üdvözlet hozzáadása   /  A több címzettnek szóló e-mailek automatikus felosztása egyedi üzenetekre ...

📨 Email Management: Könnyen visszahívhatja az e-maileket  /  Blokkolja az alanyok és mások átverő e-mailjeit  /  Törölje az ismétlődő e-maileket  /  Részletes keresés  /  Mappák összevonása ...

📁 Attachments Pro: Kötegelt mentés  /  Batch Detach  /  Batch tömörítés  /  Automatikus mentés   /  Automatikus leválasztás  /  Automatikus tömörítés ...

🌟 Interface Magic: 😊További szép és menő hangulatjelek   /  Növelje Outlook termelékenységét a füles nézetekkel  /  Minimalizálja az Outlookot a bezárás helyett ...

👍 Csodák egy kattintással: Válasz mindenkinek a bejövő mellékletekkel  /   Adathalászat elleni e-mailek  /  🕘A feladó időzónájának megjelenítése ...

👩🏼‍🤝‍👩🏻 Névjegyek és naptár: Névjegyek kötegelt hozzáadása a kiválasztott e-mailekből  /  Egy kapcsolattartó csoport felosztása egyéni csoportokra  /  Távolítsa el a születésnapi emlékeztetőket ...

Több, mint 100 Jellemzők Várja felfedezését! Kattintson ide, ha többet szeretne megtudni.

KATT ide       ingyenes letöltés      Vásárlás