2 lühinäpunäidet algse meili automaatseks kustutamiseks pärast sellele Outlookis vastamist

Outlooki lahendused September 29, 2025

Mõned kasutajad eelistavad algse meili kustutada pärast sellele vastamist, kuna vastus sisaldab algse meili teavet. Selles artiklis jagatakse 2 kiiret viisi selle automaatseks realiseerimiseks.

Vaikimisi on Outlook seatud algsõnumi automaatselt vastusesse kaasama. Sel juhul sooviksid paljud kasutajad algse kirja kustutada, jättes vastuse vaid postkasti. See mitte ainult ei hoia nende postkasti väiksena, vaid võimaldab ka nende e-kirju korrastada. Kui te ei soovi algseid e-kirju käsitsi kustutada, saate selle automatiseerimiseks kasutada kahte järgmist nippi.

Pärast sellele vastamist kustutage algne e-kiri automaatselt

1. nõuanne: kasutage Quick Step

Outlook sisaldab natiivset kiirsammu „Vasta ja kustuta”, nagu järgmine pilt. See kiire samm võib algse sõnumi automaatselt kustutada ja kuvada vastuse, kui sellel klõpsate.

Vasta Kustuta Kiire samm

Kui te ei leia seda kiiret sammu, on väga tõenäoline, et olete selle varem kogemata kustutanud. Samuti saate selle uuesti luua, järgides alltoodud samme.

  1. Esiteks klõpsake rühmas "Kiired sammud" nuppu "Loo uus".
  2. Seejärel määrake hüpikaknas sellele nimi, näiteks "Vasta ja kustuta".
  3. Järgmisena valige jaotises "Toimingud" "Vasta".
  4. Seejärel klõpsake nuppu "Lisa toiming".
  5. Ja seejärel lisage toiming "Kustuta sõnum".
  6. Lõpuks vajutage nuppu "Salvesta".Loo uuesti Vastus Kustuta Kiire samm

Seetõttu peate meilidele vastamiseks alati kasutama seda kiiret sammu. Kui soovite endiselt kasutada rühmas "Vasta" tavalist nuppu "Vasta", et saavutada "Vasta ja kustuta", võite viidata järgmistele vahenditele.

2. nõuanne. Kasutage Outlook VBA-d

  1. Esiteks vajutage Outlookis klahvikombinatsiooni Alt + F11.
  2. Seejärel avage järgmises VBA redaktori aknas projekt "ThisOutlookSession".
  3. Järgmisena kopeerige ja kleepige sinna järgmised VBA-koodid.
Public WithEvents objExplorer As Outlook.Explorer
Public WithEvents objInspectors As Outlook.Inspectors
Public WithEvents objMail As Outlook.MailItem

Private Sub Application_Startup()
    Set objExplorer = Outlook.Application.ActiveExplorer
    Set objInspectors = Outlook.Application.Inspectors
End Sub

Private Sub objExplorer_SelectionChange()
    On Error Resume Next
    If TypeOf Application.ActiveExplorer.Selection.Item(1) Is MailItem Then
       Set objMail = Application.ActiveExplorer.Selection.Item(1)
    End If
End Sub

Private Sub objInspectors_NewInspector(ByVal Inspector As Inspector)
    If TypeOf Inspector.CurrentItem Is MailItem Then
       Set objMail = Inspector.CurrentItem
    End If
End Sub

Private Sub objMail_Reply(ByVal Response As Object, Cancel As Boolean)
    objMail.Delete
    'If you want to only delete the specific email when replying it
    'You can specify the condition of the email as per your needs
    'like the following lines
    'If (InStr(LCase(objMail.Subject), "test") > 0) Then
    ' objMail.Delete
    'End If
End Sub

VBA koodid – algse meili automaatne kustutamine pärast sellele vastamist

  1. Pärast seda allkirjastage see kood digitaalselt.
  2. Lisaks ärge unustage muuta oma Outlooki makro sätteid, et lubada digitaalselt allkirjastatud makrosid.
  3. Lõpuks taaskäivitage Outlook uue VBA projekti aktiveerimiseks. Nüüdsest alates, kui vastate e-kirjale tavapärase nupu „Vasta“ vajutamisega, kustutatakse algne e-kiri automaatselt.

Taastage oma ohustatud Outlooki andmed

Kui teil tekib ootamatu Väljavaadete kahjustused ootamatult peate proovima oma Outlooki andmeid taastada. Nagu tavaliselt, on parim ja lihtsaim viis varukoopiatest taastamine. Aga kui teil pole ajakohast varukoopiat, võite pöörduda ka kogenud parandustööriista poole, näiteks DataNumen Outlook Repair.

Autori sissejuhatus:

Shirley Zhang on andmete taastamise ekspert DataNumen, Inc., mis on maailmas juhtiv andmete taastamise tehnoloogiate, sealhulgas mdf taastamine ja Outlooki remonditarkvaratooted. Lisateabe saamiseks külastage www.datanumenCom

Kommentaarid on suletud.