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

Hogyan küldhetünk ismétlődő e-mail ütemezést az Outlook programban?

A Microsoft Outlook alkalmazásban egyszerűen elküldheti másoknak az ismétlődő találkozó, megbeszélés vagy feladat ütemezését. De ha csak egy ütemezett, ismétlődő e-mailt szeretne küldeni találkozó, megbeszélés vagy feladat nélkül, hogyan teheti meg? Sajnos az Outlook nem nyújt funkciót az ismétlődő ütemezett ütemezések elküldéséhez, de oktatóanyagunkban megmutatjuk, hogyan küldhetünk ismétlődő ütemezést az Outlook programban.

Ismétlődő e-mail ütemezése az Outlook programban VBA kóddal

Egyszerűen küldhet ütemezett ismétlődő e -maileket az Outlook programban egy csodálatos eszközzel


Ismétlődő e-mail ütemezése az Outlook programban VBA kóddal

Ez az oktatóanyag négy részre oszlik, és a részek befejezése után ismétlődő e-mailt fog küldeni. Kérjük, tegye a következőket.

1. rész: Hozzon létre egy új találkozót

1. Kérjük, navigáljon a Naptár megtekintéséhez kattintson Naptár a navigációs ablak, majd a kattintással hozzon létre egy új találkozót Új kinevezés alatt FŐOLDAL Tab.

3. Ban,-ben Kinevezés párbeszédpanel alatt Kinevezés fülre. Neked kell:

V: Írja be a Tárgy B: Írja be a címzettek e-mail címét a Települések
C: Konfigurálja a Kezdés ideje és a Vége idő D: Válassza ki az emlékeztetőt a emlékeztető legördülő listából.
Ha 15 percet választ, akkor ez azt jelenti, hogy 15 perccel korábban emlékezteti Önt az e-mail küldésére.
E: Írja össze kinevezési testületét.

Megjegyzések: A Kinevezés tárgya ismétlődő e-mail tárgy lesz; és a Kinevező testület akkor válik az ismétlődő e-mail törzsgé, amikor a címzettek megkapják az e-mailt.

2. rész: Új kategória létrehozása

Most létre kell hoznia egy új kategóriátIsmétlődő e-mailek ütemezése" alábbiak szerint:

1. Ban,-ben Kinevezés párbeszédpanelen kattintson a gombra Besorolás > Minden kategória a Címkék csoport alatt Kinevezés Tab.

2. Amikor az Színkategóriák megjelenő párbeszédpanel, kattintson a gombra Új gomb. Ban,-ben Új kategória hozzáadása írja be a következőt:Ismétlődő e-mailek ütemezése"A Név terület; majd válasszon egy színt a színek legördülő listából. Ezután kattintson OK.

3. Ekkor látni fogja aIsmétlődő e-mailek ütemezése”Kategória szerepel, kérjük, jelölje be a négyzetet, majd kattintson OK gombot.

3. rész: Állítsa be az ismétlődést

Itt az ideje, hogy beállítsuk a kinevezés ismétlődését.

1. kettyenés Ismétlődés a Opciók csoport alatt Kinevezés fülre. Lásd a képernyőképet:

2. Ban,-ben Kinevezés megismétlődése párbeszédpanelen konfigurálja a Ismétlődés minta. Ha szüksége van befejezési időre, kérjük, állítsa be itt: Megismétlődési tartomány. Kattintson a gombra OK.

3. Amikor visszatér a Kinevezés párbeszédpanelen kattintson a gombra Mentés és bezárás gomb. Lásd a képernyőképet:

4. rész: Használja a VBA kódot a Rendszeres ismétlődő e -mail küldéséhez

1. Kérjük, nyomja meg a gombot más + F11 megnyitni Microsoft Visual Basic for Applications párbeszéd.

2. Kattintson duplán Project1 > Microsoft Outlook objektum > ThisOutlookSession a bal oldali ablaktáblán. Lásd a képernyőképet:

3. Másolja és illessze be a következő VBA kódot a VBA szerkesztőbe. Ezután kattintson Megtakarítás gombot.

VBA: ismétlődő e-mail ütemezése

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. kettyenés Eszközök > Referenciák megnyitni Referenciák - Projekt párbeszéd. A párbeszédpanelen ellenőrizze a Microsoft Word objektumkönyvtár opciót és kattintson a OK gombot.

5. megnyomni a más + Q gombokat egyidejűleg a Microsoft Visual Basic for Applications ablak.

Amikor a emlékeztető felbukkan, az e-mail automatikusan el lesz küldve a címzetteknek, amelyeket az első részben a Hely mezőbe beírt. Ezután kattintson a gombra Elvetése a emlékeztető párbeszéd. És az e-mailt ez idő alatt minden nap ismételten elküldjük. Lásd a képernyőképet:

Megjegyzések: A VBA kódot sikeresen tesztelték az Outlook 2010-ben és a későbbi verziókban.


Egyszerűen küldhet ütemezett ismétlődő e -maileket az Outlook programban egy csodálatos eszközzel

Sok Outlook -felhasználó számára a fenti módszer túl fárasztó ahhoz, hogy helyesen kezeljék. Itt nagyon ajánljuk a Az automatikus küldés ütemezése jellemzője Kutools az Outlook számára. Ezzel a funkcióval könnyedén hozhat létre több ismétlődő e -mailt, és ütemezheti az e -mailek rendszeres elküldését napi, heti, havi vagy éves időközönként. Kérjük, tegye a következőket az elvégzéséhez.

Ugrás töltse le a Kutools for Outlook programot és próbáld ki.

1. kettyenés Kutools > Az automatikus küldés ütemezése > Hozzon létre automatikus küldési ütemtervet.

2. Ezután megnyílik egy üzenetablak, és a következőkre van szüksége:

2.1) Válassza ki az e -mail címzettjeit a Címzett: Cc or Titkos mezőket, majd töltse ki az e -mailt tantárgy;
2.2) Írja össze az e -mail törzsét;
2.3) Kattintson Ismétlődés alatt a Kutools Ismétlődő fülre. Lásd a képernyőképet:

3. Most a E -mailek ismétlődése párbeszédpanel jelenik meg, meg kell adnia a visszatérő idő, visszatérő minta és a ismétlődési tartomány az e -mailhez, majd kattintson a OK gombot.

4. Most visszatér az üzenetablakhoz, kattintson Mentés és bezárás gombot az ismétlődő beállítások mentéséhez és az ablak bezárásához.

Tipp: Ismételheti a fenti 1–4. Lépést, hogy szükség szerint több ismétlődő e -mailt hozzon létre.

5. Most kapcsolja be a funkciót a kattintással Kutools > Az automatikus küldés ütemezése > Engedélyezze.

6. A nyílásban Kutools az Outlook számára párbeszédpanelen kattintson a gombra OK.

A fenti beállítások elvégzése után az ismétlődő e -maileket automatikusan elküldi a megadott dátum és idő elérésekor.

Jegyzet: Az ismétlődő e -maileket egyszerűen kezelheti az alábbiak szerint.

1. kettyenés Kutools > Az automatikus küldés ütemezése > Az automatikus küldési ütemezés kezelése.

2. Ban,-ben Mange automatikus küldési ütemezés ablakban létrehozhat új visszatérő e -mail, szerkesztés, törlés, bekapcsol or kedvezmény szükség szerint meglévő, ismétlődő e -mailt. Vagy rákattinthat a Bejelentkezés ikont az ismétlődő e -mailek küldési előzményeinek megtekintéséhez.

Kattintson, ha többet szeretne megtudni erről a szolgáltatásról.

  Kutools az Outlook számára több mint 100 hatékony funkciót tartalmaz a Microsoft Outlook számára. Kipróbálható korlátozás nélkül 60 nap alatt. Töltse le most!!


Kutools for Outlook - 100 speciális funkciót hoz az Outlookba, és sokkal könnyebbé teszi a munkát!

  • Auto CC / BCC szabályok szerint e-mail küldéskor; Automatikus továbbítás Több e-mail egyedi; Autómatikus válasz csere szerver és további automatikus funkciók nélkül ...
  • BCC figyelmeztetés - üzenet megjelenítése, amikor megpróbál válaszolni az összesre ha az e-mail címed szerepel a BCC listában; Emlékeztessen a hiányzó mellékletekre, és további funkciók emlékeztetnek ...
  • Válasz (minden) az összes melléklettel az e-mail beszélgetésben; Válasz sok e-mailre másodpercek alatt; Automatikus üdvözlet hozzáadása amikor válasz; Dátum hozzáadása a tárgyhoz ...
  • Mellékleteszközök: Az összes levél összes mellékletének kezelése, Automatikus leválasztás, Tömörítsen mindent, Átnevezés, Összes mentése ... Gyorsjelentés, Számolja ki a kiválasztott leveleket...
  • Erőteljes levélszemét szokás szerint; Távolítsa el az ismétlődő leveleket és névjegyeket... Lehetővé teszi, hogy okosabban, gyorsabban és jobban végezze el az Outlook programot.
lövés kutools outlook kutools fül 1180x121
shot kutools outlook kutools plus tab 1180x121
 
A megjegyzések rendezése szerint
Hozzászólások (171)
Még nincs értékelés. Legyen Ön az első, aki értékel!
A weboldal moderátora ezt a megjegyzést minimalizálta
A módszer segített. Működött az első találkozónál, amelyet akkor hoztam létre, amikor teszteltem. De aztán később leállt.
A weboldal moderátora ezt a megjegyzést minimalizálta
Ugyanez a probléma volt, többször megismételtem a lépéseket, de most egyáltalán nem működik, nem küldenek e-maileket vagy bármi. Sikerült kijavítani?
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia, a fenti lépések követésével be tudtam állítani egy ismétlődő e-mailt, de amikor létrehoztam egy hiperhivatkozást egy találkozó törzsében, amikor az esemény elindult és levelet kaptam a levélben, a hiperhivatkozás nyers hivatkozássá alakult. Minden segítséget nagyra értékelünk, köszönöm.
A weboldal moderátora ezt a megjegyzést minimalizálta
Köszönöm! Ez működött. Van mód arra, hogy a kiküldött e-mailben mellékletet helyezzenek el? Megpróbáltam egy tesztet a melléklet hozzáadásával a naptáreseményhez, de nem jön át az e-mailben.
A weboldal moderátora ezt a megjegyzést minimalizálta
kaptál valaha választ a melléklet hozzáadására? Kösz!
A weboldal moderátora ezt a megjegyzést minimalizálta
Működött a teszt e-mailhez, de most már nem csinál semmit, és mindent töröltem, és megismételtem a lépéseket. Van ennél több? Én is a 2013-as kilátásban vagyok
A weboldal moderátora ezt a megjegyzést minimalizálta
Nekem is volt már hasonló problémám. Ez a legelső alkalommal működött, de úgy tűnik, hogy az ismétlődő időpont-emlékeztető nem váltotta ki az e-mailt. Talált valaki megoldást erre a problémára?
A weboldal moderátora ezt a megjegyzést minimalizálta
[quote]A teszt e-mailhez működött, de most már nem csinál semmit, és mindent töröltem, és megismételtem a lépéseket. Van ennél több? Én is a 2013-as kilátásban vagyokÍrta: Wonderful[/quote] Megoldottad ezt valaha? Most állítottam be, és ugyanazt látom, amit te. Elsőre remekül működött, aztán semmi.
A weboldal moderátora ezt a megjegyzést minimalizálta
Végül úgy döntöttem, hogy engedélyeztem a makrókat az Outlookban, amely alapértelmezés szerint ki van kapcsolva. Az egyetlen problémám most az, hogy az e-mail szövege csak sima szöveg, nem jön félkövér, betűméret vagy színváltozás stb. Van mód a fenti kód megváltoztatására, hogy RTF vagy HTML szöveg legyen az e-mailben?
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia Megoldottad ezt? Nekem is ugyanez a problémám Kipróbáltam, de nem működik. Sub SetMailFormat_2002_2003_2007_2010(ByRef mail As Object) Dim mailFormat As System.Int32 mailFormat = Convert.ToInt32(mail.GetType().InvokeMember("BodyFormat", _FOltag,Nothing,Binthingi,BinthingiFormati) = 0 "OlBodyFormat.olFormatPlain = 1" OlBodyFormat.olFormatHTML = 2 Semmi, levél, új objektum() {mailFormat}) End Sub Private Sub Application_Reminder(ByVal Item As Object) Dim MItem As MailItem Set MItem = Application.CreateItem(olMailItem) If Item.MessageClass "IPM.Appointment", majd kilépés a Sub If Item .Kategóriák "Ismétlődő e-mail küldés ütemezése", majd kilépés a Sub-ból MItem.To = Item.Location MItem.Subject = Item.Subject MItem.Body = Item.Body MItem.Send Set MItem = Semmi, vége Sub
A weboldal moderátora ezt a megjegyzést minimalizálta
[quote]Ezt végül úgy oldottam meg, hogy engedélyeztem a makrókat az Outlookban, amely alapértelmezés szerint ki van kapcsolva. Az egyetlen problémám most az, hogy az e-mail szövege csak sima szöveg, nem jön félkövér, betűméret vagy színváltozás stb. Van mód a fenti kód megváltoztatására, hogy RTF vagy HTML szöveg legyen az e-mailben?Kyle készítette[/quote] Szia Találtál erre megoldást. szükségem van rá :) Kim
A weboldal moderátora ezt a megjegyzést minimalizálta
Érdemes lehet a Windows Task Scheduler használatát is megfontolni ilyesmihez. Könnyen használható, és még a tartozékokat is kezeli.
A weboldal moderátora ezt a megjegyzést minimalizálta
Megpróbáltam a feladattal, de nem kapok semmit, mivel a melléklet nem kerül az e-mail törzsébe. Kérem, adja meg, hogyan csinálta.
A weboldal moderátora ezt a megjegyzést minimalizálta
Melyik kódot használod? Nem csatolta az e-mailhez a mellékleteket.
A weboldal moderátora ezt a megjegyzést minimalizálta
hogy kapcsolod ki?
A weboldal moderátora ezt a megjegyzést minimalizálta
Az ismétlődő e-mailek küldésének leállításához a következőket teheti: 1. Törölje teljesen a találkozót. 2. Módosítsa vagy távolítsa el a beállított kategóriát. 3. Alkalmazza a „Befejezési” dátumot a találkozó ismétlődésére.
A weboldal moderátora ezt a megjegyzést minimalizálta
meg kell nyitnia/futnia az Outlook programnak az ismétlődő levelek elküldéséhez?
A weboldal moderátora ezt a megjegyzést minimalizálta
Működik ez a kód az Office 365 – Outlook 2013 programmal? Többször követtem a lépéseket, engedélyeztem a makrókat is. Megkapom az emlékeztetőt, és megnyomom az Elvetés gombot, de az e-maileket soha nem küldik el.
A weboldal moderátora ezt a megjegyzést minimalizálta
Hé, nézd meg ezt a funkciót. Azt hiszem, nagyon fogod szeretni ezt a funkciót. Nincs több heti sablon e-mail
A weboldal moderátora ezt a megjegyzést minimalizálta
Van mód a terjesztési listára küldeni a kapcsolatokban?
A weboldal moderátora ezt a megjegyzést minimalizálta
Igen, Aaron, ezt nekem kellett megcsinálnom. Megpróbáltam hozzáadni egy terjesztési listát (Outlook kapcsolattartó csoport), úgynevezett „Spec Group”. Ezt nem küldte el. A lista nevét azonban „Spec@Group”-ra változtattam (hogy valódi e-mail címnek tűnjön), és ez tökéletesen működött. Szüksége van a „@” jelre, hogy felvegye. Szerencsés tipp! :lol:
A weboldal moderátora ezt a megjegyzést minimalizálta
Ez jól működött. Most ugyanarra az e-mail-címre van szükségem, hogy több csoporthoz is lépjenek. Tud valaki segíteni? 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 Alkalmazások. CreateItem(olMailItem) If Item.MessageClass "IPM.Appointment" then Exit Sub If Item.Categories "Recurring GDL Recert Email" then Exit Sub MItem.To = DLI MItem.Subject = Item.Subject MItem.Body = Item.Body MItem. Send Set MItem = Nothing End Sub
A weboldal moderátora ezt a megjegyzést minimalizálta
Hozzon létre egy másik terjesztési listát, amely tartalmazza a többi terjesztési listát/mutat azokra a terjesztési listákra, amelyeket már beállított, és amelyeket fel szeretne venni.
A weboldal moderátora ezt a megjegyzést minimalizálta
Beütemezhető egy e-mail küldése az outlook-ban, ha a számítógép elment? Például szeretnék emlékeztetőt küldeni egy vasárnapi időpont egyeztetésre a hétfői megbeszélésre, de vasárnap nem vagyok munkában, így hogyan érhetem el, hogy ez az e-mail vasárnap kimenjen, amikor nem vagyok munkában és a számítógépem le van tiltva. ki? Kösz!
A weboldal moderátora ezt a megjegyzést minimalizálta
A VBA kód nem jelent meg, amikor megnyomtam az ALT és az F11 billentyűket. Le tudtam húzni a Microsoft Visual Basic for Applications szoftvert, de nem volt benne kód. Tudnál tanácsot adni? Köszönöm, Raj
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia Raj, nem kell VBA kódnak lennie. Ha követi a fenti útmutatót, ha duplán kattint a „ThisOutlookSession” elemre, annak üresnek kell lennie. Másolja ki és illessze be az útmutatóban látható kódot a „ThisOutlookSession” ablakba, majd mentse el. Remélem ez segít.
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia, amikor követem az összes lépést, elmentem, és írok egy újabb e-mailt – a kód még mindig megvan a legutóbbi alkalomból. A kód a kiválasztott kategóriához van csatolva, így nem kell minden egyes e-mailhez hozzáadni a kódot?
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia Bonnie, a VBA kódot csak egyszer kell hozzáadni (az első ismétlődő e-mailhez). Ha egynél több ismétlődő e-mailt állít be, csak hagyja ki ezt a lépést.
A weboldal moderátora ezt a megjegyzést minimalizálta
Office 2016-om van, és ezt is kipróbáltam, pontosan követve az Ön utasításait. Működött!! Nagyon szépen köszönöm. Módosítanom kellett a makróbiztonsági beállításaimat az Outlook 2016-ban és a VBA-szerkesztőben, hogy működjön, de miután ez megtörtént, az utasítások könnyen lefutottak.
A weboldal moderátora ezt a megjegyzést minimalizálta
Szia! Hogyan változtatta meg a makró biztonsági beállításait az Outlook programban, és mire változtatta?
A weboldal moderátora ezt a megjegyzést minimalizálta
Tehát két dolog, az egyik, hogy nem úgy jelenik meg, ahogy írtam. Az IE-ben nincsenek félkövér karakterek, a másik pedig, hogy hogyan adhatok hozzá aláírást? mert hiperhivatkozásként jelenik meg a szokásos aláírásom helyett. Köszönöm a segítséget.
A weboldal moderátora ezt a megjegyzést minimalizálta
Alex Mine is megjelenik a formázás eltávolításával. Hogyan tartsuk meg?
A weboldal moderátora ezt a megjegyzést minimalizálta
Jól elküldte, de kihagyta az e-mail törzsében található összes díszes formázást. Hogyan tudom megőrizni ezt a formázást???
A weboldal moderátora ezt a megjegyzést minimalizálta
Tudnom kell, hogyan lehet-e csatolni egy excel gyorslapot?
A weboldal moderátora ezt a megjegyzést minimalizálta
Hé srácok. Ez a kód jól működik, de van egy kis problémám. Az e-mail, amelyet el akarok küldeni, két kategória része: Üzenet küldése (a makró használja) és a PROGRAMARI RED-TEAM. A makró jól működik, ha csak az Üzenet küldése kategóriát adom hozzá, de amint bármely más kategória hozzáadásra kerül, a makró leállítja az e-mailek küldését. Itt van az eddigi kód. Kérem, segítsen :P Private Sub Application_Reminder(ByVal Item As Object) Dim objMsg As MailItem Set objMsg = Application.CreateItem(olMailItem) 'IPM.TaskItem, hogy figyelje a feladat emlékeztetőket If Item.MessageClass "IPM.Appointment End If" then Exit Item.Categories "Üzenet küldése", majd kilépés a Sub End If objMsg.To = Item.Location objMsg.BCC = "andrei.buldus@promotor.ws" objMsg.Subject = "Instiintare expirare Autorizatie/Contract Service" objMsg.Body = "Buna ziua," & vbNewLine & vbNewLine & _ "Conform bazei noastre de date, autorizatia/contractul de service, incheiat intre compania nostra si " + Item.Subject + " urmeaza sa expire in 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 Set objMsg = Nothing End Sub
A weboldal moderátora ezt a megjegyzést minimalizálta
a sor miatt leáll.... Ha Item.Categories <> "Idősített e-mail ütemezése" akkor lépjen ki az alból
amikor hozzáadod a másik kategóriát, akkor az exit sub-t idéz elő... esetleg használd, ha instr(1,item.categories,"Send Schedule Recurring Email") =0, akkor exit sub-ból vagy valami hasonló...
Még senki sem írt megjegyzést
Több ingatlan
Hagyja meg észrevételeit
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi