Gdy próbujesz odpowiedzieć lub przesłać dalej e-maile, naciskając przycisk „Odpowiedz”, „Odpowiedz wszystkim” lub „Przekaż dalej”, na początku tematu wiadomości e-mail musi znajdować się prefiks „RE” lub „FW”. W tym artykule dowiesz się, jak zezwolić programowi Outlook na automatyczne usuwanie ich za pomocą VBA.
W naszym poprzednim artykule - „2 Metody przesyłania dalej wiadomości e-mail programu Outlook bez prefiksu „FW” w temacie”, Możesz zastosować dwa sposoby obejścia tego problemu, aby przekazywać wiadomości e-mail bez„ FW ”. Ponownie wysyłają e-maile i odpowiednio tworzą szybki krok „Przekaż dalej”. Jest oczywiste, że oba z nich nie pozwalają na automatyczne usuwanie „FW”, jeśli używasz zwykłego przycisku „Naprzód” w grupie „Odpowiedz”.
Dlatego też domyślnie, jeśli chcesz usunąć prefiks „RE” lub „FW” w temacie po kliknięciu przycisku „Odpowiedz”, „Odpowiedz wszystkim” lub „Przekaż dalej”, za każdym razem musisz usunąć je ręcznie. Będzie to dość kłopotliwe. Na szczęście możesz użyć Outlook VBA do automatycznego usuwania określonych słów w temacie wiadomości. Czytaj dalej, aby uzyskać szczegółowe kody i kroki.
Automatyczne usuwanie prefiksu „FW” lub „RE” podczas przekazywania lub odpowiadania na wiadomości e-mail
- Na początek uruchom program Outlook i przejdź do zakładki „Deweloper”.
- Następnie możesz znaleźć i kliknąć przycisk „Visual Basic”.
- Następnie w nowym oknie należy dwukrotnie kliknąć projekt „ThisOutlookSession”.
- Następnie musisz skopiować i wkleić do niego następujące kody VBA.
Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim strSubject As String
If InStr(Item.Subject, "RE") > 0 Then
'If you don't want the prompt,
'You can remove the MsgBox line and its correspoding "Else … End If" lines.
If MsgBox("Do you want to remove the prefix 'RE'?", vbYesNo) = vbYes Then
strSubject = Replace(Item.Subject, "RE:", "", vbTextCompare)
Else
strSubject = Item.Subject
End If
End If
If InStr(Item.Subject, "FW") > 0 Then
If MsgBox("Do you want to remove the prefix 'FW'?", vbYesNo) = vbYes Then
strSubject = Replace(Item.Subject, "FW:", "", vbTextCompare)
Else
strSubject = Item.Subject
End If
End If
Item.Subject = Trim(strSubject)
Item.Save
End Sub
- Następnie należy podpisać certyfikat cyfrowy do tego makra.
- Później możesz zamknąć okno „Visual Basic” i skonfigurować Outlooka tak, aby włączał tylko makra podpisane cyfrowo.
- Wreszcie możesz spróbować.
- Najpierw wybierz e-mail i naciśnij przycisk „Odpowiedz”, „Odpowiedz wszystkim” lub „Przekaż dalej”
- Następnie otworzy się wiadomość odpowiadająca lub przekazująca. Możesz jak zwykle zredagować wiadomość.
- Po kliknięciu przycisku „Wyślij”, otrzymasz wiadomość, jak na poniższym zrzucie ekranu:
- Jeśli wybierzesz „Tak”, przedrostek „RE” lub „FW” zostanie automatycznie usunięty. Jeśli wybierzesz „Nie”, prefiks nie zostanie usunięty.
Czego nie robić w przypadku wiadomości e-mail programu Outlook
Outlook jest podatny na ataki, dlatego należy zachować ostrożność podczas obsługi wiadomości e-mail programu Outlook. Na przykład, jeśli otrzymujesz e-maile z nieznanych źródeł, lepiej ich nie otwieraj, nie wspominając o klikaniu osadzonych linków lub pobieraniu załączonych plików. Tego rodzaju wiadomości e-mail mogą zawierać złośliwe makra, wirusy lub złośliwe oprogramowanie, które mogą błyskawicznie zrujnować dane programu Outlook. To znaczy, że będziesz cierpieć Uszkodzenie pliku programu Outlook. W tym momencie Twoim wyjątkowym rozwiązaniem jest zastosowanie potężnego i renomowanego narzędzia naprawczego, takiego jak DataNumen Outlook Repair.
Wprowadzenie autora:
Shirley Zhang jest ekspertem w dziedzinie odzyskiwania danych w DataNumen, Inc., która jest światowym liderem w technologiach odzyskiwania danych, w tym napraw uszkodzony mdf db i oprogramowanie do naprawy programu Outlook. po więcej informacji odwiedź www.datanumen.com