Деякі користувачі вважають за краще видалити оригінальний електронний лист після відповіді на нього, оскільки відповідь містила інформацію про оригінальний електронний лист. Ця стаття поділиться 2 швидкими способами реалізувати це автоматично.
За замовчуванням Outlook налаштовано на автоматичне включення вихідного повідомлення у відповідь. У цьому випадку багато користувачів хочуть видалити оригінальне повідомлення, лише залишивши відповідь у своїй поштовій скриньці. Це не тільки може утримувати їхню поштову скриньку в невеликому розмірі, але й може впорядковувати їх електронні листи. Якщо ви не бажаєте видаляти оригінальні електронні листи вручну, ви можете використати наступні 2 прийоми для автоматизації.
Порада 1. Використовуйте швидкий крок
Outlook постачається з рідним швидким кроком "Відповісти та видалити", як показано на малюнку нижче. Цей швидкий крок може автоматично видалити вихідне повідомлення та відобразити відповідь, коли ви натискаєте на нього.
Якщо ви не можете знайти цей швидкий крок, дуже ймовірно, що ви раніше його випадково видалили. Ви також можете заново створити його, виконавши наведені нижче дії.
- Спочатку натисніть кнопку «Створити нову» в групі «Швидкі кроки».
- Потім у діалоговому вікні, що з’явиться, призначте йому ім’я, наприклад “Відповісти та видалити”.
- Далі, у розділі «Дії» виберіть «Відповісти».
- Згодом натисніть кнопку «Додати дію».
- А потім додайте дію «Видалити повідомлення».
- Нарешті натисніть кнопку «Зберегти».
Таким чином, ви завжди повинні використовувати цей швидкий крок, щоб відповісти на електронні листи. Якщо ви все ж хочете використовувати стандартну кнопку "Відповісти" у групі "Відповісти", щоб досягти "Відповісти та видалити", ви можете звернутися до таких засобів.
Порада 2. Використовуйте Outlook VBA
- Перш за все, натисніть кнопку Alt + F11 в Outlook.
- Потім у наступному вікні редактора VBA відкрийте проект “ThisOutlookSession”.
- Далі скопіюйте та вставте в нього такі коди VBA.
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
- Після цього підпишіть цей код цифровим способом.
- Крім того, не забудьте змінити налаштування макросів Outlook, щоб дозволити макроси з цифровим підписом.
- Нарешті перезапустіть Outlook, щоб активувати новий проект VBA. Відтепер, коли ви відповідаєте на електронний лист натисканням стандартної кнопки «Відповісти», оригінальний електронний лист буде автоматично видалено.
Відновіть свої компрометовані дані Outlook
Якщо ви стикаєтесь раптово Пошкодження Outlook несподівано, вам доведеться докласти всіх зусиль, щоб відновити дані Outlook. Як завжди, найкращим і найпростішим підходом є відновлення з резервних копій. Але якщо у вас немає поточної резервної копії даних, ви також можете звернутися до досвідченого інструменту відновлення, такого як DataNumen Outlook Repair.
Вступ автора:
Ширлі Чжан - експерт із відновлення даних у DataNumen, Inc., яка є світовим лідером у галузі технологій відновлення даних, в тому числі відновлення mdf та перспективні програмні продукти для ремонту. Для отримання додаткової інформації відвідайте WWW.datanumen.com