Cum să mutați mesajul de e-mail în folderul specificat după ce ați citit în Outlook?
Mutarea mesajului de e-mail într-un folder specificat după citire este cel mai bun mod de a păstra folderul Inbox curat în Outlook. Pentru mulți utilizatori Outlook, ei tind să creeze o regulă pentru aceste e-mailuri citite în mișcare. De fapt, Outlook nu acceptă acest proces de asistență pentru reguli. În acest articol, vă vom arăta cum să mutați mesajele de e-mail în folderul specificat după ce ați citit cu codul VBA în Outlook.
Mutați mesajul de e-mail în folderul specificat după ce ați citit în Outlook
- Automatizați e-mailurile cu Auto CC / BCC, Auto înainte prin reguli; trimite Răspuns automat (În afara biroului) fără a necesita un server de schimb...
- Primiți mementouri ca Avertisment BCC când răspundeți la toate în timp ce vă aflați în lista BCC și Amintiți-vă când lipsesc atașamentele pentru atașamente uitate...
- Îmbunătățiți eficiența e-mailului cu Răspunde (toate) cu atașamente, Adăugați automat salutul sau data și ora în semnătură sau subiect, Răspunde la mai multe e-mailuri...
- Simplificați e-mailurile cu Rechemare e-mailuri, Instrumente de atașare (Comprimați toate, Salvați automat toate...), Eliminați duplicatele, și Raport rapid...
Mutați mesajul de e-mail în folderul specificat după ce ați citit în Outlook
Puteți muta mesajele de e-mail într-un folder specificat după ce ați citit cu rularea codului VBA în Outlook.
1. În primul rând, trebuie să creați un nou nume de folder „Reviewed”Din folderul Mesaje primite.
2. Deschideți folderul Inbox, apoi vă rugăm să apăsați pe Alt + F11 tastele pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.
3. Apoi faceți dublu clic pentru a extinde Project1 > Obiecte Microsoft Outlook > Această sesiune Outlook pentru a deschide VbaProject.OTM Editor.
4. Apoi copiați și lipiți codul VBA de mai jos în editorul VbaProject.OTM așa cum se arată în captura de ecran de mai sus.
Cod VBA: mutați mesajele după citire
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. Apoi faceți clic pe Economisiți pentru a salva codul VBA și apoi pentru a închide Microsoft Visual Basic pentru aplicații fereastră.
6. Faceți clic dreapta pe Bara de instrumente pentru acces rapidȘi selectați Personalizați bara de instrumente cu acces rapid din meniul cu clic dreapta. Vedeți captura de ecran:
7. În Opțiuni Outlook casetă de dialog, trebuie să:
1). Selectați Macrocomenzi în Alegeți comenzi de la lista verticală;
2). Selectați Proiectul 1. ThisOutlookSession în caseta de sub Alegeți comenzi de la lista verticală;
3). Apasă pe Adăuga buton;
4). Apasă pe OK butonul.
8. Apoi puteți vedea Macro butonul care apare în Bara de instrumente pentru acces rapid. Asigurați-vă că localizați în folderul din căsuța de e-mail din care doriți să mutați toate mesajele citite, apoi faceți clic pe Macro butonul pentru a rula codul VBA în interiorul Mesajelor primite.
notițe:
1. Acest cod VBA poate fi aplicat în Outlook 2007, 2010 și 2013; Dar, în Outlook 2007, puteți face clic direct pe Alerga pentru a rula codul.
2. Dacă există mai multe conturi de e-mail existente în Outlook, codul VBA poate fi aplicat numai în contul în care fișierul de date este setat ca implicit. Puteți verifica fișierul de date implicit făcând clic pe Fișier > Informație > Setările contului > Setările contului pentru a deschide Setările contului căsuță de dialog. Apoi du-te la Fișier de date , veți vedea că fișierul de date implicit este marcat de înainte.
3. Dacă doriți să schimbați fișierul de date implicit într-un alt cont de e-mail, selectați și evidențiați contul pe care doriți să-l setați ca implicit, apoi faceți clic pe Setați ca implicit în Setările contului căsuță de dialog.
4. Când rulați codul VBA pentru prima dată și aflați că mesajele citite nu sunt mutate simultan, vă rugăm să continuați să faceți clic pe butonul Macro până când toate mesajele citite din Mesaje primite sunt mutate.
Cele mai bune instrumente de productivitate de birou
Kutools pentru Outlook - Peste 100 de funcții puternice pentru a vă supraalimenta Outlook
🤖 AI Mail Assistant: E-mailuri profesionale instantanee cu magie AI--un singur clic pentru răspunsuri geniale, ton perfect, stăpânire în mai multe limbi. Transformați e-mailurile fără efort! ...
📧 Automatizare e-mail: În afara biroului (disponibil pentru POP și IMAP) / Programați trimiterea de e-mailuri / CC/BCC automat după reguli la trimiterea e-mailului / Redirecționare automată (Reguli avansate) / Adăugare automată felicitare / Împărțiți automat e-mailurile cu mai mulți destinatari în mesaje individuale ...
📨 Managementul e-mail: Amintește-ți cu ușurință e-mailurile / Blocați e-mailurile înșelătorii de către subiecți și alții / Ștergeți e-mailurile duplicate / Cautare Avansata / Consolidați foldere ...
📁 Atașamente Pro: Salvați în serie / Detașare lot / Compresă în loturi / Salvare automata / Detașare automată / Comprimare automată ...
🌟 Magia interfeței: 😊Mai multe emoji drăguțe și cool / Îmbunătățiți-vă productivitatea Outlook cu vizualizările cu file / Minimizați Outlook în loc să închideți ...
???? Minuni cu un singur clic: Răspundeți tuturor cu atașamentele primite / E-mailuri anti-phishing / 🕘Afișați fusul orar al expeditorului ...
👩🏼🤝👩🏻 Contacte și calendar: Adăugați în lot contacte din e-mailurile selectate / Împărțiți un grup de contact în grupuri individuale / Eliminați mementouri de ziua de naștere ...
Peste 100 Caracteristici Așteaptă explorarea ta! Click aici pentru a descoperi mai multe.