Uwaga: inne języki witryny są przetłumaczone przez Google. Powrót do angielskiego
Zaloguj Się  \/ 
x
or
x
Zarejestruj się  \/ 
x

or

Jak automatycznie odpowiedzieć oryginalną wiadomością e-mail w Outlooku?

Zwykle, gdy tworzymy regułę, aby automatycznie polegać na e-mailu poza biurem, ale oryginalna wiadomość w treści nie zostanie uwzględniona. Jak możesz automatycznie polegać na e-mailach z oryginalną wiadomością w Outlooku? W tym artykule omówię kod VBA, który pomoże Ci jak najszybciej zakończyć tę pracę w Outlooku.

Automatyczna odpowiedź na e-maile z oryginalną wiadomością w programie Outlook z kodem VBA


Automatyczna odpowiedź na e-maile z oryginalną wiadomością w programie Outlook z kodem VBA

Normalna reguła Outlooka nie może pomóc w radzeniu sobie z pracą, ale za pomocą następującego kodu VBA możesz to szybko i łatwo zakończyć. Zrób tak:

1. Przytrzymaj ALT + F11 klawisze, aby otworzyć Microsoft Visual Basic for Applications okno.

2, w Microsoft Visual Basic for Applications kliknij dwukrotnie ThisOutlookSession z Project1 (VbaProject.OTM) okienko, aby otworzyć tryb, a następnie skopiuj i wklej następujący kod do pustego modułu.

Kod VBA: Automatyczne odpowiedzi na e-maile z oryginalną wiadomością:

Public WithEvents xlItems As Outlook.Items
Private Sub Application_Startup()
    Set xlItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub
Private Sub xlItems_ItemAdd(ByVal objItem As Object)
Dim xlReply As MailItem
Dim xStr As String
If objItem.Class <> olMail Then Exit Sub
Set xlReply = objItem.Reply
With xlReply
     xStr = "<p>" & "Hi, Your email has been received. Thank you!" & "</p>"
     .HTMLBody = xStr & .HTMLBody
     .Send
End With
End Sub 

3. Następnie zapisz i zamknij okno kodu, zamknij lub uruchom ponownie Outlooka, aby kod VBA zaczął obowiązywać. Teraz, gdy otrzymasz wiadomości e-mail, program Outlook wyśle ​​automatyczną odpowiedź z oryginalną wiadomością, jak pokazano na poniższym zrzucie ekranu:


Kutools dla programu Outlook - wprowadza 100 zaawansowanych funkcji do programu Outlook i znacznie ułatwia pracę!

  • Auto CC / BCC według zasad podczas wysyłania wiadomości e-mail; Auto Forward Wiele e-maili na zamówienie; Automatyczna odpowiedź bez serwera Exchange i więcej funkcji automatycznych ...
  • Ostrzeżenie BCC - pokaż wiadomość, gdy spróbujesz odpowiedzieć wszystkim jeśli Twój adres e-mail znajduje się na liście BCC; Przypomnij o braku załącznikówi więcej funkcji przypominających ...
  • Odpowiedz (wszystkie) ze wszystkimi załącznikami w rozmowie pocztowej; Odpowiedz na wiele e-maili w sekundy; Automatyczne dodawanie powitania kiedy odpowiedz; Dodaj datę do tematu ...
  • Narzędzia załączników: Zarządzaj wszystkimi załącznikami we wszystkich wiadomościach e-mail, Automatyczne odłączanie, Kompresuj wszystko, Zmień nazwę wszystkiego, Zapisz wszystko ... Szybki raport, Policz wybrane wiadomości...
  • Potężne wiadomości-śmieci na zamówienie; Usuń zduplikowane wiadomości e-mail i kontakty... Umożliwiają inteligentniejsze, szybsze i lepsze działanie w programie Outlook.
strzał Kutools Outlook Kutools tab 1180x121
shot Kutools Outlook Kutools Plus Tab 1180x121
 

Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.