Unii utilizatori preferă să șteargă e-mailul inițial după ce i-au răspuns, deoarece răspunsul conține informațiile e-mailului original. Acest articol vă va împărtăși 2 mijloace rapide pentru a le realiza automat.
În mod implicit, Outlook este setat să includă automat mesajul original în răspuns. În acest caz, mulți utilizatori ar dori să ștergă mesajul original, lăsând doar răspunsul în căsuța lor poștală. Acest lucru nu numai că le poate menține căsuța poștală în dimensiuni mici, dar le poate lăsa și e-mailurile în ordine. Dacă sunteți reticent să ștergeți manual e-mailurile originale, puteți utiliza următoarele 2 trucuri pentru a le automatiza.
Sfat 1: Folosiți Quick Step
Outlook vine cu un pas rapid nativ „Răspunde și șterge”, ca în imaginea următoare. Acest pas rapid poate șterge automat mesajul original și poate afișa un răspuns când faceți clic pe el.
Dacă nu găsiți acest pas rapid, este foarte probabil să l-ați șters înainte din greșeală. De asemenea, îl puteți re-crea urmând pașii de mai jos.
- În primul rând, faceți clic pe butonul „Creați nou” din grupul „Pași rapidi”.
- Apoi, în caseta de dialog pop-up, atribuiți-i un nume, cum ar fi „Răspunde și șterge”.
- Apoi, în secțiunea „Acțiuni”, selectați „Răspuns”.
- Ulterior, faceți clic pe butonul „Adăugați o acțiune”.
- Apoi adăugați acțiunea „Ștergeți mesajul”.
- În cele din urmă apăsați butonul „Salvare”.
Prin acest mijloc, trebuie să utilizați întotdeauna acest pas rapid pentru a răspunde la e-mailuri. Dacă încă doriți să utilizați butonul standard „Răspunde” din grupul „Răspuns” pentru a obține „Răspunde și șterge”, puteți consulta următoarele mijloace.
Sfat 2: Utilizați Outlook VBA
- În primul rând, apăsați butoanele tastei „Alt + F11” în Outlook.
- Apoi, în fereastra ulterioară a editorului VBA, deschideți proiectul „ThisOutlookSession”.
- Apoi copiați și inserați următoarele coduri VBA în el.
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
- După aceea, semnați acest cod digital.
- În plus, nu uitați să modificați setările macrocomenzilor Outlook, pentru a permite macrocomenzile semnate digital.
- În cele din urmă, reporniți Outlook pentru a activa noul proiect VBA. De acum înainte, când răspundeți la un e-mail apăsând butonul standard „Răspundeți”, e-mailul original va fi șters automat.
Recuperați datele Outlook compromise
Dacă întâlnești brusc Daune Outlook În mod neașteptat, trebuie să încercați să recuperați datele Outlook. Ca de obicei, cea mai bună și mai simplă abordare este recuperarea din copii de rezervă. Dar dacă nu aveți o copie de rezervă actualizată a datelor, puteți apela și la un instrument de reparare experimentat, cum ar fi DataNumen Outlook Repair.
Introducerea autorului:
Shirley Zhang este expertă în recuperarea datelor DataNumen, Inc., care este lider mondial în tehnologiile de recuperare a datelor, inclusiv recuperare mdf și produse software de reparații Outlook. Pentru mai multe informații vizitați www.datanumen.com