Si të ruani automatikisht emailet specifike të dërguara në një dosje specifike me Outlook VBA

Zgjidhjet e Outlook Shtator 29, 2025

Si parazgjedhje, Outlook do t'i ruajë emailet e dërguara në dosjen "Sent Items". Nëse nuk dëshironi të ruani emailet specifike të dërguara në dosjen e paracaktuar, mund të përdorni metodën e prezantuar në këtë artikull.

Disa përdorues duan t'i ruajnë automatikisht disa emaile të dërguara në dosjen e specifikuar në vend që t'i ruajnë në dosjen e paracaktuar "Artikuj të dërguar". Kështu, shumë përdorin rregullin e Outlook, i cili ofron një veprim të ngjashëm - "lëvizni një kopje në dosjen e specifikuar", e paraqitur si pamja e mëposhtme e ekranit. Sidoqoftë, me këtë do të thotë, në fakt, emaili origjinal i dërguar ruhet ende në dosjen "Artikuj të dërguar". Vetëm një kopje e emailit të dërguar zhvendoset në dosjen e specifikuar. Me sa duket, kjo veçori nuk mund të përmbushë nevojat reale.Krijo një rregull për të zhvendosur automatikisht një kopje në dosjen e specifikuar

Sigurisht, përdoruesit mund të specifikojnë manualisht një dosje jo të parazgjedhur për të ruajtur emailin e dërguar. Thjesht shkoni te skeda "Opsionet" dhe klikoni në "Ruaj artikullin e dërguar në" > "Dosje tjetër". Por kjo qasje do të jetë e mundimshme pasi përdoruesit duhet të specifikojnë manualisht dosjen çdo herë.Ruani manualisht artikullin e dërguar në një dosje tjetër

Tani që të dy mjetet e përmendura më sipër nuk janë efikase, pse të mos përsërisni tek Outlook VBA? Këtu janë kodet dhe hapat konkretë për të ruajtur automatikisht emailet specifike të dërguara në një dosje specifike.

Ruaj automatikisht emailet specifike të dërguara në një dosje specifike

  1. Të start me, hapni aplikacionin Outlook.
  2. Pastaj duhet të shtypni butonat "Alt + F11", të cilat do t'ju ndihmojnë të hyni në dritaren e redaktuesit VBA.
  3. Në dritaren që shfaqet "Microsoft Visual Basic për Aplikacione", mund të gjeni dhe klikoni dy herë mbi projektin "ThisOutlookSession" në anën e majtë.
  4. Më pas në dritaren e hapur të projektit "ThisOutlookSession", duhet të kopjoni kodet e mëposhtme VBA në të.
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim SentFolder As Folder
    Dim desFolder As Folder
 
    If TypeName(Item) = "MailItem" And Item.DeleteAfterSubmit = False Then
       'Specify the sent emails
       If InStr(Item.To, "shirley") > 0 Or InStr(LCase(Item.Subject), "test") > 0 Then
          'Specify the folder for saving the sent emails
          'You can change it as per your needs
          Set SentFolder = Application.Session.GetDefaultFolder(olFolderSentMail)
          Set desFolder = SentFolder.Folders("Test")
          Set Item.SaveSentMessageFolder = desFolder
       End If
    End If
End Sub

Kodet VBA - Ruani automatikisht emailet specifike të dërguara në një dosje specifike

  1. Më pas, duhet të nënshkruani këtë kod dhe të rregulloni nivelin tuaj makro të Outlook në të ulët.
  2. Më në fund, mund të dilni nga dritarja aktuale. Tani e tutje, emailet specifike të dërguara do të ruhen automatikisht në dosjen e specifikuar të postës.

Këshillë shtesë: Shfaqni kutinë e dialogut "Zgjidh dosjen" kur dërgoni

Ka disa njerëz që dëshirojnë të zgjedhin manualisht dosjen e postës për të ruajtur emailet e dërguara. Por gjithmonë shkuarja te skeda "Opsioni" për të zgjedhur dosjen do të jetë e çrregullt. Në këtë rast, ata dëshirojnë që Outlook të mund të shfaqë automatikisht kutinë e dialogut "Zgjidh dosjen" kur dërgon. Në përgjigje të kësaj kërkese, këtu janë një kod tjetër VBA. Mund ta kopjoni në projektin "ThisOutlookSession".

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim desFolder As Folder
 
    If TypeName(Item) = "MailItem" And Item.DeleteAfterSubmit = False Then
       'specify the email
       If InStr(Item.To, "shirley") > 0 Or InStr(LCase(Item.Subject), "test") > 0 Then
          'Display the “Select Folder” dialog box
          Set desFolder = Application.Session.PickFolder
          Set Item.SaveSentMessageFolder = desFolder
       End If
    End If
End Sub

Kodet VBA - Shfaq automatikisht kutinë e dialogut "Zgjidh dosjen" kur dërgon

Që tani e tutje, sa herë që përfundoni një email dhe klikoni butonin "Dërguar", kutia e dialogut "Zgjidh dosjen" do të shfaqet automatikisht, si imazhi më poshtë. Në atë pikë, mund të specifikoni dosjen për të ruajtur emailin aktual të dërguar.Zgjidhni kutinë e dialogut të dosjeve

Riparimi i Outlook

Outlook fiton shumë lavdërime për funksionet e tij të shumta. Megjithatë, është për shkak të pasurisë në veçori që Outlook është mjaft i prekshëm. Gjithashtu, emaili me qëllim të keq është një nga most kërcënime të mundshme për të dhënat e Outlook. Prandaj, si përdorues të rregullt të Outlook, do të ishte më mirë të zotëroni një të shquar Mjet i rregullimit të postës së Outlook PST, Si DataNumen Outlook Repair. Kështu, ju mund të zgjidhni shpejt gabime të ndryshme të Outlook dhe t'i mbani të dhënat tuaja të Outlook të mbrojtura mirë.

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ë riparimi i korruptuar SQL Server MDF dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com

Komentet janë të mbyllura.