Néhány felhasználó inkább törölni szeretné az eredeti e-mailt, miután válaszolt rá, mivel a válasz tartalmazza az eredeti e-mail információit. Ez a cikk 2 gyors módot oszt meg az automatikus megvalósításhoz.
Alapértelmezés szerint az Outlook úgy van beállítva, hogy automatikusan belefoglalja az eredeti üzenetet a válaszba. Ebben az esetben sok felhasználó szeretné törölni az eredeti üzenetet, csak a választ a postafiókjában hagyja. Ezzel nem csak a postaládájukat lehet kis méretben tartani, hanem az e-mailjeikben is a rendet. Ha nem hajlandó kézzel törölni az eredeti e-maileket, az alábbi 2 trükk segítségével automatizálhatja azt.

1. tipp: Használja a Gyors lépést
Az Outlook egy natív „Válasz és törlés” gyors lépéssel érkezik, mint az alábbi képen. Ezzel a gyors lépéssel automatikusan törölheti az eredeti üzenetet, és amikor rákattint, megjelenik egy válasz.
Ha nem találja ezt a gyors lépést, akkor nagyon valószínű, hogy korábban véletlenül törölte. Az alábbi lépések végrehajtásával újra létrehozhatja.
- Először kattintson az „Új létrehozása” gombra a „Gyors lépések” csoportban.
- Ezután a felugró párbeszédpanelen adjon hozzá egy nevet, például „Válasz és törlés”.
- Ezután a „Műveletek” részben válassza a „Válasz” lehetőséget.
- Ezt követően kattintson a „Művelet hozzáadása” gombra.
- Ezután adja hozzá az „Üzenet törlése” műveletet.
- Végül nyomja meg a „Mentés” gombot.
Ezáltal mindig ezt a gyors lépést kell használnia az e-mailek megválaszolásához. Ha továbbra is használni szeretné a „Válasz” csoportban található szabványos „Válasz” gombot a „Válasz és törlés” eléréséhez, akkor a következő módszerekre hivatkozhat.
2. tipp: Használja az Outlook VBA-t
- Először is nyomja meg az „Alt + F11” billentyűket az Outlookban.
- Ezután a következő VBA-szerkesztő ablakban nyissa meg a „ThisOutlookSession” projektet.
- Ezután másolja ki és illessze be a következő VBA-kódokat.
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
- Ezt követően írja alá ezt a kódot digitálisan.
- Ezenkívül ne felejtse el módosítani az Outlook makró beállításait, hogy engedélyezze a digitálisan aláírt makrókat.
- Végül indítsa újra az Outlookot az új VBA-projekt aktiválásához. Mostantól, amikor a szokásos „Válasz” gombra kattintva válaszol egy e-mailre, az eredeti e-mail automatikusan törlődik.
Helyezze vissza a veszélyeztetett Outlook-adatait
Ha hirtelen találkozik Kilátás károk váratlanul meg kell próbálnia visszaállítani az Outlook adatait. Mint általában, a legjobb és legegyszerűbb módszer a biztonsági mentésekből való visszaállítás. De ha nincs aktuális adatmentése, akkor egy tapasztalt javítóeszközhöz is fordulhat, például DataNumen Outlook Repair.
Szerző Bevezetés:
Shirley Zhang adat-helyreállítási szakértő DataNumen, Inc., amely világelső az adat-helyreállítási technológiák területén, beleértve mdf helyreállítás és outlook javítószoftver termékek. További információért látogasson el www.datanumen.com


