Sebilangan pengguna lebih suka menghapus e-mel asal setelah membalasnya kerana balasan tersebut mengandungi maklumat e-mel asal. Artikel ini akan berkongsi 2 kaedah pantas untuk merealisasikannya secara automatik.
Secara lalai, Outlook diatur untuk memasukkan mesej asli secara automatik dalam balasan. Dalam kes ini, banyak pengguna ingin menghapus mesej asal, hanya meninggalkan balasan di peti mel mereka. Ini bukan sahaja dapat menyimpan kotak surat mereka dalam ukuran yang kecil, tetapi juga dapat membiarkan e-mel mereka teratur. Sekiranya anda enggan memadamkan e-mel asal secara manual, anda boleh menggunakan 2 helah berikut untuk mengautomasikannya secara automatik.
Petua 1: Gunakan Langkah Pantas
Outlook dilengkapi dengan langkah cepat asli "Balas & Padam", seperti gambar berikut. Langkah cepat ini secara automatik dapat menghapus mesej asal dan menampilkan balasan ketika anda mengkliknya.
Sekiranya anda tidak dapat menemui langkah pantas ini, kemungkinan besar anda telah menghapusnya sebelum ini secara tidak sengaja. Anda juga boleh membuatnya semula dengan mengikuti langkah-langkah di bawah.
- Pertama, klik butang "Buat Baru" dalam kumpulan "Langkah Cepat".
- Kemudian di kotak dialog pop timbul, berikan nama kepadanya, seperti "Balas & Padam".
- Selanjutnya, di bahagian "Tindakan", pilih "Balas".
- Selepas itu, klik butang "Tambah Tindakan".
- Dan kemudian tambahkan tindakan "Padam Mesej".
- Akhirnya tekan butang "Simpan".
Dengan ini, anda mesti selalu menggunakan langkah pantas ini untuk membalas e-mel. Jika anda masih ingin menggunakan butang "Balas" standar dalam kelompok "Balas" untuk mencapai "Balas dan Hapus", Anda dapat merujuk cara berikut.
Petua 2: Gunakan Outlook VBA
- Pertama, tekan butang kekunci "Alt + F11" di Outlook.
- Kemudian di tetingkap editor VBA berikutnya, buka projek "ThisOutlookSession".
- Selanjutnya salin dan tampal kod VBA berikut ke dalamnya.
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
- Selepas itu, tandatangani kod ini secara digital.
- Selain itu, ingat untuk mengubah tetapan makro Outlook anda, untuk membenarkan makro yang ditandatangani secara digital.
- Akhir sekali, mulakan semula Outlook untuk mengaktifkan projek VBA baharu. Mulai sekarang, apabila anda membalas e-mel dengan menekan butang "Balas" standard, e-mel asal akan dipadamkan secara automatik.
Pulihkan Data Outlook Anda yang Berkompromi
Sekiranya anda bertemu secara tiba-tiba Kerosakan Outlook Secara tidak dijangka, anda mesti berusaha sedaya upaya untuk memulihkan data Outlook anda. Seperti biasa, pendekatan terbaik dan paling mudah adalah dengan mendapatkan semula daripada sandaran. Tetapi jika anda tidak mempunyai sandaran data semasa, anda juga boleh menggunakan alat pembaikan yang berpengalaman, seperti DataNumen Outlook Repair.
Pengenalan Pengarang:
Shirley Zhang adalah pakar pemulihan data di DataNumen, Inc., yang merupakan pemimpin dunia dalam teknologi pemulihan data, termasuk pemulihan mdf dan produk perisian pembaikan prospek. Untuk maklumat lebih lanjut, lawati www.datanumen.com