Si të zhvendosni automatikisht emailet specifike në dosje specifike pasi t'i lexoni ato në Outlook

Shumë përdorues dëshirojnë të zhvendosin emaile specifike nga Inbox në dosje të tjera specifike pasi t'i lexojnë ato, gjë që do ta mbajë të pastër dosjen e postës në Inbox. Por gjithmonë lëvizja me dorë do të jetë e rëndë. Ky artikull do të ekspozojë një metodë të shpejtë për ta realizuar atë automatikisht.

Si zakonisht, çdo email në hyrje do të zbresë në dosjen e postës në Inbox në Outlook. Pra, në këtë rast, dosja e Inbox do të jetë e rrëmujshme dhe do të mbushet me kalimin e kohës. Më shpesh sesa jo, ju ose mund të zhvendosni manualisht emaile specifike në dosje të tjera postare ose të krijoni një rregull të Outlook për të lëvizur automatikisht emailet specifike sapo të mbërrijnë në kutinë tuaj postare. Zbatimi i një rregulli të tillë është shumë më i përshtatshëm, por duhet të shkoni te dosjet specifike për të hyrë në postat e reja. Përballë këtij problemi, mund të shpresoni që Outlook të jetë në gjendje t'i zhvendosë automatikisht emailet specifike nga Inbox në dosje të tjera postare pasi të keni përfunduar leximin e tyre në Inbox në vend që të mbërrijnë. Por rregulli i Outlook nuk mund ta kuptojë atë. Për fat të mirë, ju mund të përdorni Outlook VBA për ta realizuar atë. Këtu janë kodet si dhe hapat e përpunuar.

Zhvendos automatikisht emailet specifike në dosje specifike pasi t'i lexoni ato

  1. Që në fillim, hapni Outlook dhe kaloni në skedën "Zhvilluesi".
  2. Pastaj në këtë skedë, shtypni butonin "Visual Basic" për të hapur dritaren e redaktuesit VBA.
  3. Më pas në dritaren e re, duhet të gjeni projektin "ThisOutlookSession" dhe të klikoni dy herë për ta hapur atë.
  4. Më pas kopjoni dhe ngjisni kodet e mëposhtme VBA në të.
Public WithEvents olItems As Outlook.Items

Sub Application_Startup()
    Set olItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub

Private Sub olItems_ItemChange(ByVal Item As Object)
    Dim deFolder As Folder
 
    'Ensure the email marked as read
    If TypeOf Item Is MailItem And Item.UnRead = False Then
 
    'Check the email subject and then move to specific folder
    'You can change these conditions and folders as per your needs
    If InStr(LCase(Item.Subject), "test") > 0 Then
       Set deFolder = Session.GetDefaultFolder(olFolderInbox).Parent.Folders("Test")
       Item.Move deFolder
    End If
 
    If InStr(LCase(Item.Subject), "worklog") > 0 Then
       Set deFolder = Session.GetDefaultFolder(olFolderInbox).Parent.Folders("WorkLog")
       Item.Move deFolder
    End If
 
    If InStr(LCase(Item.Subject), "report") > 0 Then
       Set deFolder = Session.GetDefaultFolder(olFolderInbox).Parent.Folders("Report")
       Item.Move deFolder
    End If
End Sub

Kodet VBA - Zhvendosni automatikisht emailet në dosje të tjera specifike pasi t'i lexoni ato

  1. Pas kësaj, ju duhet të nënshkruani në mënyrë dixhitale këtë kod.
  • Së pari, përdorni mjetin e integruar "Certifikatat Dixhitale për Projektet VBA" për të krijuar një certifikatë të re.
  • Pastaj caktojeni këtë certifikatë në makro aktuale. Merrni hapat e treguar në imazhin më poshtë:Nënshkruani në mënyrë dixhitale makronë aktuale
  1. Më vonë duhet të ndryshoni cilësimet e makrove për të aktivizuar vetëm makro të nënshkruara dixhitale.
  2. Së fundmi, duhet të rinisni Outlook-un për të aktivizuar këtë projekt VBA. Që tani e tutje, të gjitha emailet hyrëse do të vazhdojnë të shkojnë në Kutinë Postare. Por, sapo të lexohet emaili i ri, ai do të zhvendoset automatikisht në dosjet specifike.

Truket e zgjuara për të zgjidhur problemet e Outlook

Për shkak të faktit se Outlook është i prirur ndaj gabimeve, shumë përdorues dëshirojnë këshilla të zgjuara për t'u marrë me problemet e shpeshta. Normalisht, teknikat më të zakonshme përfshijnë krijimin e një profili të ri email-i, çaktivizimin e shtesave të palëve të treta, riparimin e paketës Office dhe përdorimin e mjetit të riparimit të kutisë hyrëse, Scanpst.exe. Nëse mjeti i integruar dështon, mund të përdorni një tjetër më të fuqishëm. program i korruptuar i riparimit të Outlook, Si DataNumen Outlook Repair.

Hyrje e autorit:

Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë riparoni SQL db të dëmtuar dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com

Komentet janë të mbyllura.