Note: The other languages of the website are Google-translated. Back to English

Jak wysłać cykliczną wiadomość e-mail z harmonogramem w Outlooku?

W programie Microsoft Outlook możesz łatwo wysłać harmonogram cyklicznego terminu, spotkania lub zadania do innych osób. Ale jeśli chcesz po prostu wysłać cykliczną wiadomość e-mail z harmonogramem bez żadnego terminu, spotkania lub zadania, jak możesz to zrobić? Niestety, program Outlook nie zapewnia funkcji wysyłania cyklicznych wiadomości e-mail z harmonogramem, ale w naszym samouczku pokażemy, jak wysłać harmonogram cyklicznych wiadomości e-mail w programie Outlook.

Wysyłaj cykliczne wiadomości e-mail w programie Outlook z kodem VBA

Łatwe wysyłanie cyklicznych wiadomości e-mail w programie Outlook za pomocą niesamowitego narzędzia


Wysyłaj cykliczne wiadomości e-mail w programie Outlook z kodem VBA

Ten samouczek jest podzielony na cztery części, po zakończeniu tych części uda Ci się wysłać cykliczną wiadomość e-mail z harmonogramem. Wykonaj następujące czynności.

Część 1: Utwórz nowe spotkanie

1. Przejdź do Kalendarz wyświetlić, klikając Kalendarz Okienko nawigacji, a następnie utwórz nowe spotkanie, klikając Nowe spotkanie dla Strona Główna patka.

3. w Powołanie okno dialogowe pod Powołanie patka. Musisz:

Odp.: Wpisz Temat B: Wprowadź adresy e-mail odbiorców w Lokalizacja
C: Skonfiguruj Czas zacząć oraz Czas zakończenia D: Wybierz przypomnienie pod Przypomnienie Lista rozwijana.
Jeśli wybierzesz 15 minut, oznacza to, że przypomni Ci się 15 minut wcześniej, kiedy wiadomość e-mail zostanie wysłana.
E: Utwórz treść terminu.

Uwagi: the Temat spotkania stanie się powtarzającym się tematem wiadomości e-mail; i Organ mianujący stanie się powtarzającą się treścią wiadomości e-mail, gdy adresaci otrzymają wiadomość e-mail.

Część 2: Utwórz nową kategorię

Teraz musisz utworzyć nową kategorię o nazwie „Wyślij cykliczny e-mail z harmonogramem”W następujący sposób:

1. w Powołanie kliknij Kategoryzować > Wszystkie kategorie Tagi grupa pod Powołanie patka.

2. Kiedy Kategorie kolorów pojawi się okno dialogowe, kliknij Nowy przycisk. w Dodaj nową kategorię okno dialogowe, wpisz „Wyślij cykliczny e-mail z harmonogramem"W Imię lub Nazwa Firmy pole; a następnie wybierz kolor w Kolor Lista rozwijana. Następnie kliknij OK.

3. Następnie zobaczysz „Wyślij cykliczny e-mail z harmonogramem”, Zaznacz pole, a następnie kliknij OK przycisk.

Część 3: Ustaw powtarzalność

Teraz nadszedł czas, aby ustawić powtarzanie wizyty.

1. kliknij Nawrót Opcje grupa pod Powołanie patka. Zobacz zrzut ekranu:

2. w Powtarzanie spotkania skonfiguruj Nawrót wzór. Jeśli potrzebujesz godziny zakończenia, skonfiguruj ją w sekcji Zakres nawrotów. A następnie kliknij OK.

3. Kiedy wraca do Powołanie kliknij Zapisz i zamknij przycisk. Zobacz zrzut ekranu:

Część 4: Użyj kodu VBA do wysyłania cyklicznego e-maila z harmonogramem

1. Proszę nacisnąć inny + F11 otworzyć Microsoft Visual Basic for Applications dialog.

2. Kliknij dwukrotnie Project1 > Obiekt programu Microsoft Outlook > Ta sesja programu Outlook w lewym okienku. Zobacz zrzut ekranu:

3. Skopiuj i wklej następujący kod VBA do edytora VBA. A następnie kliknij Zapisz przycisk.

VBA: harmonogram wysyłania cyklicznych wiadomości e-mail

Private Sub Application_Reminder(ByVal Item As Object)
'Updated by Extendoffice 20200522
Dim xMailItem As MailItem
Dim xItemDoc As Word.Document
Dim xNewDoc As Word.Document
Dim xFldPath As String
On Error Resume Next
If Item.Class <> OlObjectClass.olAppointment Then Exit Sub
If Item.Categories <> "Send Schedule Recurring Email" Then Exit Sub
Set xMailItem = Outlook.Application.CreateItem(olMailItem)
Set xItemDoc = Item.GetInspector.WordEditor
xFldPath = CStr(Environ("USERPROFILE"))
xFldPath = xFldPath & "\MyReminder"
If Dir(xFldPath, vbDirectory) = "" Then
    MkDir xFldPath
End If
xFldPath = xFldPath & "\AppointmentBody.xml"
xItemDoc.SaveAs2 xFldPath, wdFormatXMLDocument ' wdFormatXML
Set xNewDoc = xMailItem.GetInspector.WordEditor
VBA.DoEvents
xNewDoc.Application.Selection.HomeKey
xNewDoc.Activate
xNewDoc.Application.Selection.InsertFile FileName:=xFldPath, Attachment:=False
With xMailItem
    .To = Item.Location
    .Recipients.ResolveAll
    .Subject = Item.Subject
    .Send
End With
Set xMailItem = Nothing
VBA.Kill xFldPath
End Sub

4. kliknij Narzędzia > Referencje otworzyć Referencje - Projekt dialog. W oknie dialogowym zaznacz plik Biblioteka obiektów programu Microsoft Word opcję i kliknij przycisk OK przycisk.

5. wciśnij inny + Q klucze w tym samym czasie, aby zamknąć Microsoft Visual Basic for Applications okno.

Podczas Przypomnienie pojawi się wiadomość e-mail zostanie automatycznie wysłana do odbiorców, których wpisałeś w polu Lokalizacja w pierwszej części. Następnie kliknij Oddalić Przypomnienie dialog. W tym czasie e-mail będzie wysyłany cyklicznie każdego dnia. Zobacz zrzut ekranu:

Uwagi: Kod VBA został pomyślnie przetestowany w programie Outlook 2010 i nowszych wersjach.


Łatwe wysyłanie cyklicznych wiadomości e-mail w programie Outlook za pomocą niesamowitego narzędzia

Dla wielu użytkowników programu Outlook powyższa metoda jest zbyt żmudna, aby można ją było prawidłowo obsługiwać. Tutaj bardzo polecam Zaplanuj automatyczne wysyłanie cechą Kutools dla programu Outlook. Dzięki tej funkcji możesz łatwo tworzyć wiele cyklicznych wiadomości e-mail i zaplanować ich regularne wysyłanie w odstępach dziennych, tygodniowych, miesięcznych lub rocznych, zgodnie z potrzebami. Aby to zrobić, wykonaj następujące czynności.

Iść do pobierz Kutools dla programu Outlook i spróbuj.

1. kliknij Kutools > Zaplanuj automatyczne wysyłanie > Utwórz harmonogram automatycznego wysyłania.

2. Następnie otwiera się okno wiadomości i musisz:

2.1) Wybierz odbiorców wiadomości e-mail w Do wiadomości or UDW pola według potrzeb, a następnie wypełnij e-mail Przedmiot;
2.2) Utwórz treść wiadomości e-mail;
2.3) Kliknij Nawrót pod Powtarzające się Kutools patka. Zobacz zrzut ekranu:

3. Teraz Powtarzanie wiadomości e-mail pojawi się okno dialogowe, musisz określić powtarzający się czas, powtarzający się wzór oraz zakres nawrotów dla wiadomości e-mail, a następnie kliknij OK przycisk.

4. Teraz wraca do okna wiadomości, kliknij Zapisz i zamknij aby zapisać powtarzające się ustawienia i zamknąć okno.

Porady: Możesz powtórzyć powyższe kroki od 1 do 4, aby utworzyć wiele cyklicznych wiadomości e-mail zgodnie z potrzebami.

5. Teraz włącz funkcję, klikając Kutools > Zaplanuj automatyczne wysyłanie > Włączyć.

6. W otwarciu Kutools dla programu Outlook okno dialogowe, kliknij OK.

Po zakończeniu powyższych ustawień, cykliczne e-maile będą wysyłane automatycznie, gdy nadejdzie określona data i godzina.

Uwaga: Możesz łatwo zarządzać powtarzającymi się wiadomościami e-mail w następujący sposób.

1. kliknij Kutools > Zaplanuj automatyczne wysyłanie > Zarządzaj harmonogramem automatycznego wysyłania.

2. w Zarządzaj harmonogramem automatycznego wysyłania okno, możesz stworzyć Nowy cykliczny e-mail, edytować, usuwać, włączyć or poza istniejący cykliczny e-mail, zgodnie z potrzebami. Lub możesz kliknąć Zaloguj ikonę, aby wyświetlić historię wysyłania cyklicznych wiadomości e-mail.

Kliknij, aby dowiedzieć się więcej o tej funkcji.

  Kutools dla programu Outlook zawiera ponad 100 zaawansowanych funkcji dla programu Microsoft Outlook. Wypróbuj za darmo bez ograniczeń przez 60 dni. Pobierz teraz!


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
 
Sortuj komentarze według
Komentarze (171)
Brak ocen. Oceń jako pierwszy!
Ten komentarz został zminimalizowany przez moderatora na stronie
Metoda pomogła. Zadziałało na pierwszym spotkaniu utworzonym podczas testowania. Ale potem przestało działać.
Ten komentarz został zminimalizowany przez moderatora na stronie
Miałem ten sam problem, wielokrotnie powtarzałem te kroki, a teraz w ogóle nie działa, nie są wysyłane żadne e-maile ani nic. Czy udało Ci się to naprawić?
Ten komentarz został zminimalizowany przez moderatora na stronie
Cześć, udało mi się skonfigurować cykliczną wiadomość e-mail, wykonując powyższe kroki, ale po utworzeniu hiperłącza w treści spotkania, po wyzwoleniu zdarzenia i otrzymaniu wiadomości e-mail w poczcie hiperłącze zostało przekonwertowane na łącze surowe. Każda pomoc jest mile widziana, dzięki.
Ten komentarz został zminimalizowany przez moderatora na stronie
Dziękuję Ci! To zadziałało. Czy istnieje sposób na dołączenie załącznika do wysyłanej wiadomości e-mail? Wypróbowałem test z dodaniem załącznika do wydarzenia w kalendarzu, ale nie dotarł on do e-maila.
Ten komentarz został zminimalizowany przez moderatora na stronie
czy kiedykolwiek otrzymałeś odpowiedź, jak dodać załącznik? Dzięki!
Ten komentarz został zminimalizowany przez moderatora na stronie
Udało mi się to w przypadku testowego e-maila, ale teraz nic już nie robi, usunąłem wszystko i powtórzyłem kroki, czy jest coś więcej? Jestem też na Outlooku 2013
Ten komentarz został zminimalizowany przez moderatora na stronie
Miałem ten sam problem. To zadziałało za pierwszym razem, ale przypomnienie o cyklicznym spotkaniu nie spowodowało wysłania wiadomości e-mail. Czy ktoś znalazł rozwiązanie tego problemu?
Ten komentarz został zminimalizowany przez moderatora na stronie
[cytat]Zrobiłem to w przypadku testowego e-maila, ale teraz nic już nie robi, usunąłem wszystko i powtórzyłem kroki, czy jest coś więcej? Jestem też na Outlooku 2013Przez Wspaniały[/cytat] Czy kiedykolwiek rozwiązałeś ten problem? Właśnie to ustawiłem i widzę to samo, co ty. Działało świetnie za pierwszym razem, potem nic.
Ten komentarz został zminimalizowany przez moderatora na stronie
W końcu rozwiązałem to, włączając makra w Outlooku, który domyślnie jest wyłączony. Jedynym problemem, jaki mam teraz, jest to, że tekst w e-mailu jest tylko zwykłym tekstem, nie pojawia się pogrubienie, zmiana rozmiaru czcionki, koloru itp. Czy jest jakiś sposób na zmianę powyższego kodu, aby w wiadomości e-mail był tekst RTF lub HTML?
Ten komentarz został zminimalizowany przez moderatora na stronie
Cześć Czy rozwiązałeś to. Mam ten sam problem Próbowałem tego, ale nie działa. Sub SetMailFormat_2002_2003_2007_2010(ByRef mail As Object) Dim mailFormat As System.Int32 mailFormat = Convert.ToInt32(mail.GetType().InvokeMember("BodyFormat", _ Reflection.BindingFlags.GetProperty, Nothing, mail, Nothing)) = 0 'OlBodyFormat.olFormatPlain = 1 'OlBodyFormat.olFormatHTML = 2 'OlBodyFormat.olFormatRichText = 3 If (mailFormat = 1) Then mailFormat = 2 mail.GetType().InvokeMember("BodyFormat", _ Reflection.SetBindingFlags. Nic, poczta, New Object() {mailFormat}) End Sub Private Sub Application_Reminder(ByVal Item As Object) Dim MItem As MailItem Ustaw MItem = Application.CreateItem(olMailItem) If Item.MessageClass "IPM.Appointment" Następnie wyjdź z Sub If Item .Categories "Wyślij cykliczny e-mail z harmonogramem" Następnie wyjdź z Sub MItem.To = Pozycja.Lokalizacja MItem.Subject = Item.Subject MItem.Body = Item.Body MItem.Send Set MItem = Nic Koniec Sub
Ten komentarz został zminimalizowany przez moderatora na stronie
[cytat] W końcu rozwiązałem to, włączając makra w Outlooku, który domyślnie jest wyłączony. Jedynym problemem, jaki mam teraz, jest to, że tekst w e-mailu jest tylko zwykłym tekstem, nie pojawia się pogrubienie, zmiana rozmiaru czcionki, koloru itp. Czy jest jakiś sposób na zmianę powyższego kodu, aby w wiadomości e-mail był tekst RTF lub HTML?Kyle[/quote] Cześć Czy znalazłeś rozwiązanie tego problemu. Potrzebuję tego :) Kim
Ten komentarz został zminimalizowany przez moderatora na stronie
Możesz także rozważyć użycie Harmonogramu zadań systemu Windows do czegoś takiego. Jest łatwy w użyciu i może obsługiwać nawet załączniki.
Ten komentarz został zminimalizowany przez moderatora na stronie
Próbowałem z taskiem, ale nic nie zyskuję, ponieważ załącznik nie trafia do treści e-maila. Proszę doradzić, jak to zrobiłeś.
Ten komentarz został zminimalizowany przez moderatora na stronie
Jakiego kodu używasz? Nie dołączył do e-maila załączników.
Ten komentarz został zminimalizowany przez moderatora na stronie
jak to wyłączyć?
Ten komentarz został zminimalizowany przez moderatora na stronie
Z góry, aby przestać wysyłać powtarzające się e-maile, możesz: 1. Całkowicie usunąć spotkanie. 2. Zmień lub usuń ustawioną kategorię. 3. Zastosuj datę zakończenia do powtórnego spotkania.
Ten komentarz został zminimalizowany przez moderatora na stronie
czy musisz mieć otwarty/działający program Outlook, aby wysyłać cykliczne wiadomości e-mail?
Ten komentarz został zminimalizowany przez moderatora na stronie
Czy ten kod działa z Office 365 — Outlook 2013? Kilka razy wykonałem te kroki, włączyłem też makra. Otrzymuję przypomnienie i wciskam odrzucenie, ale e-maile nigdy nie są wysyłane.
Ten komentarz został zminimalizowany przez moderatora na stronie
Hej, sprawdź to – myślę, że pokochasz tę funkcję.. Nigdy więcej cotygodniowych szablonów e-maili
Ten komentarz został zminimalizowany przez moderatora na stronie
Czy istnieje sposób na wysłanie do listy dystrybucyjnej w kontaktach?
Ten komentarz został zminimalizowany przez moderatora na stronie
Tak Aaron, musiałem to zrobić sam. Próbowałem dodać listę dystrybucyjną (Grupa kontaktów programu Outlook) o nazwie „Grupa Spec”. Tego nie wysłałem. Jednak zmieniłem nazwę listy na „Spec@Group” (aby wyglądała jak rzeczywisty adres e-mail) i zadziałało to idealnie. Musi potrzebować znaku „@”, aby zostać odebranym. Szczęśliwy traf! :kupa śmiechu:
Ten komentarz został zminimalizowany przez moderatora na stronie
To działało dobrze. Teraz potrzebuję tego samego e-maila, aby przejść do wielu grup. Czy ktoś może pomóc? Private Sub Application_Reminder(ByVal Item As Object) Dim CF As Folder Set CF = Application.Session.GetDefaultFolder(olFolderContacts) Dim DLI As DistListItem Set DLI = CF.Items("GDL Group 1") Dim MItem As MailItem Ustaw MItem = Application. CreateItem(olMailItem) Jeśli Item.MessageClass "IPM.Appointment" Następnie wyjdź z Sub Jeśli Item.Categories "Recurring GDL Recert Email" Następnie wyjdź z Sub MItem.To = DLI MItem.Subject = Item.Subject MItem.Body = Item.Body MItem. Wyślij zestaw MItem = Nic Koniec Sub
Ten komentarz został zminimalizowany przez moderatora na stronie
Utwórz inną listę dystrybucyjną, która zawiera/wskazuje inne listy dystrybucyjne, które masz już skonfigurowane, które chcesz uwzględnić.
Ten komentarz został zminimalizowany przez moderatora na stronie
Czy można zaplanować wysłanie wiadomości e-mail w programie Outlook, gdy komputer zniknie. Na przykład chciałbym wysłać przypomnienie o spotkaniu w niedzielę w poniedziałek, ale nie jestem w pracy w niedziele. wyłączony? Dzięki!
Ten komentarz został zminimalizowany przez moderatora na stronie
Kod VBA nie pojawił się po naciśnięciu ALT & F11. Udało mi się uruchomić Microsoft Visual Basic for Applications, ale nie było żadnego kodu. Proszę, czy możesz mi doradzić? Dziękuję, Raju
Ten komentarz został zminimalizowany przez moderatora na stronie
Cześć Raj, nie powinien być obecny żaden kod VBA. Jeśli postępujesz zgodnie z powyższym przewodnikiem, po dwukrotnym kliknięciu „ThisOutlookSession” powinien być pusty. Musisz skopiować i wkleić kod pokazany w przewodniku do okna „ThisOutlookSession”, a następnie go zapisać. Mam nadzieję że to pomoże.
Ten komentarz został zminimalizowany przez moderatora na stronie
Cześć, kiedy wykonuję wszystkie kroki, zapisuję i idę zrobić kolejnego e-maila - kod nadal tam jest od ostatniego razu. Czy kod jest dołączony do wybranej kategorii, więc nie ma potrzeby dodawania kodu do każdego e-maila?
Ten komentarz został zminimalizowany przez moderatora na stronie
Cześć Bonnie, kod VBA wystarczy dodać tylko raz (dla pierwszego cyklicznego e-maila). Jeśli konfigurujesz więcej niż jeden powtarzający się e-mail, po prostu pomiń ten krok.
Ten komentarz został zminimalizowany przez moderatora na stronie
Mam biuro 2016 i spróbowałem tego dokładnie postępując zgodnie z twoimi instrukcjami. Zadziałało!! Dziękuję bardzo. Musiałem zmienić ustawienia zabezpieczeń makr w Outlook 2016 i edytorze VBA, aby działały, ale kiedy to zostało zrobione, instrukcje płynęły z łatwością.
Ten komentarz został zminimalizowany przez moderatora na stronie
Cześć, Jak zmieniłeś ustawienia zabezpieczeń makr w programie Outlook i na co je zmieniłeś?
Ten komentarz został zminimalizowany przez moderatora na stronie
Więc dwie rzeczy, jedna nie pokazuje się tak, jak to napisałem, tzn. Nie ma pogrubionych znaków i dwie, jak dodać podpis? ponieważ pojawia się jako hiperłącze zamiast mojego zwykłego podpisu. Dzięki za pomoc.
Ten komentarz został zminimalizowany przez moderatora na stronie
Pojawia się Alex Mine z usuniętym formatowaniem. Jak to trzymamy?
Ten komentarz został zminimalizowany przez moderatora na stronie
Wysłano dobrze, ale porzuciło wszystkie fantazyjne formatowanie, które mam w treści wiadomości e-mail. Jak mogę to zrobić, aby zachować to formatowanie???
Ten komentarz został zminimalizowany przez moderatora na stronie
Muszę wiedzieć, jak\jeśli możesz dołączyć arkusz kalkulacyjny programu Excel?
Ten komentarz został zminimalizowany przez moderatora na stronie
Cześć ludzie. Ten kod działa świetnie, ale mam mały problem. E-mail, który próbuję wysłać, należy do dwóch kategorii: Wyślij wiadomość (używa makro) i PROGRAMARI RED-TEAM. Makro działa dobrze, gdy dodaję tylko kategorię Wyślij wiadomość, ale gdy tylko zostanie dodana jakakolwiek inna kategoria, makro przestaje wysyłać wiadomości e-mail. Oto kod do tej pory. Proszę o pomoc :P Private Sub Application_Reminder(ByVal Item As Object) Dim objMsg As MailItem Set objMsg = Application.CreateItem(olMailItem) 'IPM.TaskItem, aby obserwować przypomnienia o zadaniach If Item.MessageClass "IPM.Appointment" Następnie wyjdź z Sub End If If Item.Categories "Wyślij wiadomość", a następnie zakończ Sub End If objMsg.To = Item.Location objMsg.BCC = "andrei.buldus@promotor.ws" objMsg.Subject = "Zainicjuj wygaśnięcie usługi autoryzacyjnej/kontraktowej" objMsg.Body = "Buna ziua", & vbNewLine & vbNewLine & _ "Conform bazei noastre de date, autorizatia/contractul de service, incheiat intre compania nostra si" + Item.Subject + "urmeaza sa wygasa w termen de 14 zile." & vbNewLine & _ "Acest lucru este in atentia departamentului nostru Service, si urmeaza sa fiti contactati in cel mai scurt timp posibil pentru a stabili cursul actiunilor viitoare." & vbNewLine & vbNewLine & _ "Va multumim pentru increderea acordata." & vbNewLine & _ "Promotor Import Export SRL" & vbNewLine & vbNewLine & vbNewLine & _ "Acesta este un mesaj automat." objMsg.Send Ustaw objMsg = Nic Koniec Sub
Ten komentarz został zminimalizowany przez moderatora na stronie
zatrzymuje się z powodu linii.... Jeśli Item.Categories <> „Wyślij cykliczny e-mail z harmonogramem”, a następnie wyjdź z podrzędu
kiedy dodajesz inną kategorię, powoduje to wyjśc z sub.... może użyj if instr(1,item.categories,"Send Schedule Recurring Email") =0 then exit sub lub coś w tym stylu...
Nie ma tu jeszcze żadnych komentarzy
Pokaż więcej

Bądż na bieżąco

Prawa autorskie © 2009 - www.extendoffice.com. | Wszelkie prawa zastrzeżone. Zasilany przez ExtendOffice, | Mapa strony
Microsoft i logo Office są znakami towarowymi lub zastrzeżonymi znakami towarowymi Microsoft Corporation w Stanach Zjednoczonych i / lub innych krajach.
Chronione przez Sectigo SSL