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

Hvordan sender jeg en tidsplan for tilbagevendende e-mail i Outlook?

I Microsoft Outlook kan du nemt sende en tidsplan for tilbagevendende aftale, møde eller opgave til andre. Men hvis du bare vil sende en tidsplan med tilbagevendende e-mail uden nogen aftale, møde eller opgave, hvordan kan du gøre det? Desværre giver Outlook ingen funktion til afsendelse af planlægende tilbagevendende e-mail, men i vores vejledning viser vi dig, hvordan du sender en tidsplan, der gentager e-mail i Outlook.

Send en tidsplan for tilbagevendende e-mail i Outlook med VBA-kode

Send nemt planlagte tilbagevendende e -mails i Outlook med et fantastisk værktøj


Send en tidsplan for tilbagevendende e-mail i Outlook med VBA-kode

Denne vejledning er opdelt i fire dele, og det lykkes dig at sende en tilbagevendende e-mail efter afslutning af disse dele. Gør som følger.

Del 1: Opret en ny aftale

1. Naviger til Kalender visning ved at klikke Kalender i Navigationsrude, og opret derefter en ny aftale ved at klikke på Ny Aftale under Forside fane.

3. i Tid dialog under Tid fanen. Du skal:

A: Indtast Emne B: Indtast modtagerens e-mail-adresser i Placering
C: Konfigurer Start tid og Sluttidspunkt D: Vælg påmindelsen under Påmindelse rulleliste.
Hvis du vælger 15 minutter, betyder det, at det minder dig 15 minutter tidligt, når e-mailen sendes.
E: Komponer din ansættelsesorgan.

Bemærk: The Udnævnelsesemne bliver det tilbagevendende e-mail-emne; og Udnævnelsesorgan bliver det tilbagevendende e-mail-organ, når modtagerne modtog e-mailen.

Del 2: Opret en ny kategori

Nu skal du oprette en ny kategori med navnet “Send tidsplan tilbagevendende e-mail" som følger:

1. i Tid dialog, klik venligst Kategoriser > alle kategorier i Tags gruppe under Tid fane.

2. Når Farvekategorier dialog vises, skal du klikke Ny knap. I Tilføj ny kategori dialog, skriv “Send tidsplan tilbagevendende e-mail"I Navn Mark; og vælg derefter en farve i Farve rulleliste. Klik derefter på OK.

3. Så vil du se “Send tidsplan tilbagevendende e-mail”Kategori er angivet, bedes du markere afkrydsningsfeltet og derefter klikke på OK .

Del 3: Indstil gentagelsen

Nu er det tid til at indstille gentagelsen af ​​aftalen.

1. klik Gentagelse i Indstillinger gruppe under Tid fanen. Se skærmbillede:

2. i Udnævnelse gentagelse dialog, skal du konfigurere din Gentagelse mønster. Hvis du har brug for en sluttid, skal du konfigurere den under Omfang af gentagelse. Og klik derefter på OK.

3. Når det vender tilbage til Tid dialog, klik venligst Gem og luk knap. Se skærmbillede:

Del 4: Brug VBA -koden til at sende den planlagte tilbagevendende e -mail

1. Tryk venligst andre + F11 at åbne Microsoft Visual Basic til applikationer dialogen.

2. Dobbeltklik på Project1 > Microsoft Outlook-objekt > Denne OutlookSession i venstre rude. Se skærmbillede:

3. Kopier og indsæt følgende VBA-kode til VBA-editoren. Og klik derefter på Gem .

VBA: afsendelse af en plan for tilbagevendende 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. klik Værktøj > Referencer at åbne Referencer - Projekt dialog. Kontroller i dialogboksen Microsoft Word-objektbibliotek valg og klik på OK .

5. Tryk på andre + Q taster på samme tid for at lukke Microsoft Visual Basic til applikationer vindue.

Når Påmindelse dukker op, sendes e-mailen automatisk til de modtagere, som du har skrevet i feltet Placering i første del. Klik derefter på Luk i Påmindelse dialog. Og e-mailen sendes tilbagevendende hver dag i denne tid. Se skærmbillede:

Bemærk: VBA-koden blev testet med succes i Outlook 2010 og de senere versioner.


Send nemt planlagte tilbagevendende e -mails i Outlook med et fantastisk værktøj

For mange Outlook -brugere er ovenstående metode for kedelig til at blive håndteret korrekt. Her kan varmt anbefales Planlæg automatisk afsendelse træk ved Kutools til Outlook. Med denne funktion kan du nemt oprette flere tilbagevendende e -mails og planlægge, at disse e -mails skal sendes regelmæssigt med daglige, ugentlige, månedlige eller årlige intervaller, som du har brug for. Gør venligst følgende for at få det gjort.

Gå til download Kutools til Outlook og prøv.

1. klik Kutools > Planlæg automatisk afsendelse > Opret tidsplan for automatisk afsendelse.

2. Derefter åbnes et meddelelsesvindue, og du skal:

2.1) Vælg e -mail -modtagere i Til, Cc or Bcc felter, som du har brug for, og udfyld derefter e -mailen emne;
2.2) Skriv e -mail -brødteksten;
2.3) Klik Gentagelse under Kutools Tilbagevendende fanen. Se skærmbillede:

3. Nu er Gentagelse af e -mails dialogboksen dukker op, skal du angive tilbagevendende tid, tilbagevendende mønster og rækkevidde af tilbagefald for e -mailen, og klik derefter på OK .

4. Nu vender den tilbage til meddelelsesvinduet, klik Gem og luk knappen for at gemme de tilbagevendende indstillinger og lukke vinduet.

tips: Du kan gentage ovenstående trin 1 til 4 for at oprette flere tilbagevendende e -mails, som du har brug for.

5. Tænd nu for funktionen ved at klikke Kutools > Planlæg automatisk afsendelse > Aktiver.

6. I åbningen Kutools til Outlook dialogboksen, klik OK.

Når ovenstående indstillinger er afsluttet, sendes de tilbagevendende e -mails automatisk, når den angivne dato og klokkeslæt når.

Bemærk: Du kan nemt administrere dine tilbagevendende e -mails som følger.

1. klik Kutools > Planlæg automatisk afsendelse > Administrer tidsplan for automatisk afsendelse.

2. i Mange auto send tidsplan vindue, kan du oprette ny tilbagevendende e -mail, rediger, slet, tænde for or off en eksisterende tilbagevendende e -mail efter behov. Eller du kan klikke på Log ikon for at se afsendelseshistorikken for de tilbagevendende e -mails.

Klik for at vide mere om denne funktion.

  Kutools til Outlook indeholder 100+ kraftfulde funktioner til Microsoft Outlook. Gratis at prøve uden begrænsning i 60 dage. Download nu!


Kutools til Outlook - bringer 100 avancerede funktioner til Outlook, og gør arbejdet meget nemmere!

  • Auto CC / BCC ved regler, når du sender e-mail; Automatisk videresendelse Flere e-mails efter brugerdefineret; Auto svar uden udvekslingsserver og flere automatiske funktioner ...
  • BCC Advarsel - vis besked, når du prøver at besvare alle hvis din e-mail-adresse er på BCC-listen; Påmind, når du mangler vedhæftede filer, og mere minder funktioner ...
  • Svar (alle) med alle vedhæftede filer i mailsamtalen; Besvar mange e-mails på få sekunder Tilføj automatisk hilsen når svar Tilføj dato til emne ...
  • Vedhæftningsværktøjer: Administrer alle vedhæftede filer i alle mails, Automatisk afmontering, Komprimer alle, Omdøb alt, Gem alle ... Hurtig rapport, Tæl valgte mails...
  • Kraftige uønskede e-mails efter skik; Fjern duplikerede mails og kontakter... Gør dig i stand til at gøre smartere, hurtigere og bedre i Outlook.
shot kutools outlook kutools fane 1180x121
shot kutools outlook kutools plus fane 1180x121
 
Sorter kommentarer efter
Kommentarer (171)
Ingen vurderinger endnu. Vær den første til at bedømme!
Denne kommentar blev minimeret af moderatoren på webstedet
Metoden hjalp. Det virkede til den første aftale, der blev oprettet, da jeg testede den. Men så holdt det op med at virke senere.
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg havde det samme problem, jeg har gentaget trinene flere gange, og nu virker det slet ikke, der sendes ingen e-mails eller noget. Har du været i stand til at rette det?
Denne kommentar blev minimeret af moderatoren på webstedet
Hej, jeg var i stand til at oprette en tilbagevendende e-mail ved at følge ovenstående trin, men da jeg oprettede et hyperlink i brødteksten af ​​en aftale, da begivenheden blev udløst, og jeg fik en mail med posten, blev hyperlinket konverteret til et rå-link. Enhver hjælp er værdsat, tak.
Denne kommentar blev minimeret af moderatoren på webstedet
Tak skal du have! Dette virkede. Er der en måde at inkludere en vedhæftet fil i den e-mail, der sendes ud? Jeg prøvede en test med at tilføje den vedhæftede fil til kalenderbegivenheden, men den kommer ikke igennem i e-mailen.
Denne kommentar blev minimeret af moderatoren på webstedet
har du nogensinde fået svar på, hvordan du tilføjer en vedhæftet fil? Tak!
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg fik dette til at virke for test-e-mailen, men nu gør det ikke længere noget, og jeg har slettet alt og gentagne trin, er der mere i dette? Jeg er også på outlook 2013
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg har haft samme problem. Dette virkede allerførste gang, men den tilbagevendende aftalepåmindelse ser ikke ud til at have udløst e-mailen. Har nogen fundet en løsning på dette problem?
Denne kommentar blev minimeret af moderatoren på webstedet
[quote]Jeg fik dette til at virke for test-e-mailen, men nu gør det ikke længere noget, og jeg har slettet alt og gentagne trin, er der mere i dette? Jeg er også på outlook 2013Af Wonderful[/quote] Har du nogensinde løst dette? Jeg har lige oprettet dette og ser det samme, som du gjorde. Fungerede fantastisk første gang og derefter ingenting.
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg ordnede dette til sidst ved at aktivere makroer i Outlook, som som standard er slået fra. Det eneste problem jeg har nu er, at teksten i e-mailen kun er almindelig tekst, ingen fed skrift, skriftstørrelse eller farveændringer osv. støder på. Er der nogen måde at ændre koden ovenfor, så du har RTF- eller HTML-tekst i e-mailen?
Denne kommentar blev minimeret af moderatoren på webstedet
Hej Har du løst dette. Jeg har det samme problem Prøvede dette, men det virker ikke. Sub SetMailFormat_2002_2003_2007_2010(ByRef mail As Object) Dim mailFormat As System.Int32 mailFormat = Convert.ToInt32(mail.GetType().InvokeMember("BodyFormat", _ Reflection.BindingFlags.Get) 'mail.Oproperty,BodyFormat,BodyFormat)No,Bodyn = 0 'OlBodyFormat.olFormatPlain = 1 'OlBodyFormat.olFormatHTML = 2 'OlBodyFormat.olFormatRichText = 3 If (mailFormat = 1) Then mailFormat = 2 mail.GetType().InvokeMember("BodyFormat,Binding_Reflection.Binding_Reflection. Intet, mail, nyt objekt() {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" Afslut Sub If Item .Kategorier "Send planlæg tilbagevendende e-mail" Afslut derefter Sub MItem.To = Item.Location MItem.Subject = Item.Subject MItem.Body = Item.Body MItem.Send Sæt MItem = Intet End Sub
Denne kommentar blev minimeret af moderatoren på webstedet
[quote]Jeg ordnede dette til sidst ved at aktivere makroer i Outlook, som som standard er slået fra. Det eneste problem jeg har nu er, at teksten i e-mailen kun er almindelig tekst, ingen fed skrift, skriftstørrelse eller farveændringer osv. støder på. Er der nogen måde at ændre koden ovenfor, så du har RTF- eller HTML-tekst i e-mailen?Af Kyle[/quote] Hej Fandt du en løsning på dette. Jeg har brug for det :) Kim
Denne kommentar blev minimeret af moderatoren på webstedet
Du kan også overveje at bruge Windows Task Scheduler til noget som dette. Den er nem at bruge og kan endda håndtere vedhæftede filer.
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg prøvede med opgave, men jeg opnår ikke noget, da den vedhæftede fil ikke går til e-mailens brødtekst. Fortæl venligst hvordan du har gjort det.
Denne kommentar blev minimeret af moderatoren på webstedet
Hvilken kode bruger du? Den vedhæftede ikke de vedhæftede filer til e-mailen.
Denne kommentar blev minimeret af moderatoren på webstedet
hvordan slår man det fra?
Denne kommentar blev minimeret af moderatoren på webstedet
For at stoppe med at sende den tilbagevendende e-mail kan du enten: 1. Slette aftalen helt. 2. Skift eller fjern den indstillede kategori. 3. Anvend en 'Slut ved'-dato på gentagelsen af ​​aftalen.
Denne kommentar blev minimeret af moderatoren på webstedet
skal du have outlook åben/kørende for at sende den tilbagevendende mail?
Denne kommentar blev minimeret af moderatoren på webstedet
Virker denne kode med Office 365 - Outlook 2013? Jeg har fulgt trinene flere gange, også aktiveret makroerne. Jeg får påmindelsen og trykker på afvis, men e-mails sendes aldrig.
Denne kommentar blev minimeret af moderatoren på webstedet
Hej, tjek dette ud - jeg tror, ​​du vil helt vil elske denne funktion.. Ikke flere ugentlige skabelon-e-mails
Denne kommentar blev minimeret af moderatoren på webstedet
Er der en måde at sende til distributionsliste i kontakter?
Denne kommentar blev minimeret af moderatoren på webstedet
Ja Aaron, jeg var nødt til at gøre dette selv. Jeg prøvede at tilføje en distributionsliste (Outlook Contact Group) kaldet 'Spec Group'. Dette sendte ikke. Jeg ændrede dog listenavnet til 'Spec@Group' (for at få det til at ligne en egentlig e-mail-adresse), og det fungerede perfekt. Den skal bruge '@' for at blive afhentet. Heldigt gæt! :lol:
Denne kommentar blev minimeret af moderatoren på webstedet
Dette fungerede godt. Nu har jeg brug for den samme e-mail for at gå til flere grupper. Kan nogen hjælpe? 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 Set MItem = Application. 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 Sæt MItem = Intet Slut Sub
Denne kommentar blev minimeret af moderatoren på webstedet
Lav en anden distributionsliste, der indeholder/peger på de andre distributionslister, som du allerede har opsat, som du vil inkludere.
Denne kommentar blev minimeret af moderatoren på webstedet
Er det muligt at planlægge en mail, der skal sendes i outlook, når computeren er væk. For eksempel vil jeg gerne sende en påmindelse om en aftale om søndagen til et møde om mandagen, men jeg er ikke på arbejde om søndagen, så hvordan får jeg den mail til at gå ud om søndagen, når jeg ikke er på arbejde og min computer er af? Tak!
Denne kommentar blev minimeret af moderatoren på webstedet
VBA-koden dukkede ikke op, da jeg trykkede på ALT & F11. Jeg var i stand til at hente Microsoft Visual Basic for Applications, men der var ingen kode til stede. Kan du rådgive? Tak, Raj
Denne kommentar blev minimeret af moderatoren på webstedet
Hej Raj, der skal ikke være nogen VBA-kode. Hvis du følger vejledningen ovenfor, når du dobbeltklikker på "ThisOutlookSession", formodes den at være tom. Du skal kopiere og indsætte koden vist i vejledningen i "ThisOutlookSession" vinduet og derefter gemme den. Håber dette hjælper.
Denne kommentar blev minimeret af moderatoren på webstedet
Hej, når jeg følger alle trin og gemmer og laver endnu en e-mail - koden er der stadig fra sidste gang. Er koden knyttet til den valgte kategori, så det er ikke nødvendigt at tilføje koden for hver e-mail?
Denne kommentar blev minimeret af moderatoren på webstedet
Hej Bonnie, VBA-koden skal kun tilføjes én gang (for den første tilbagevendende e-mail). Hvis du konfigurerer mere end én tilbagevendende e-mail, går du bare glip af det trin.
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg har office 2016, og jeg prøvede dette ved at følge dine instruktioner nøjagtigt. Det virkede!! Mange tak. Jeg var nødt til at ændre mine makrosikkerhedsindstillinger i Outlook 2016 og VBA-editor for at få det til at fungere, men når det var gjort, løb instruktionerne nemt.
Denne kommentar blev minimeret af moderatoren på webstedet
Hej, Hvordan ændrede du makrosikkerhedsindstillingerne i outlook, og hvad ændrede du det til?
Denne kommentar blev minimeret af moderatoren på webstedet
Så to ting, en det vises ikke som jeg har skrevet det IE der er ingen fede tegn og to hvordan tilføjer jeg en signatur? fordi det vises som et hyperlink i stedet for min almindelige signatur. Tak for hjælpen.
Denne kommentar blev minimeret af moderatoren på webstedet
Alex Mine dukker også op med formateringen fjernet. Hvordan holder vi det?
Denne kommentar blev minimeret af moderatoren på webstedet
Det sendte fint, men det droppede al den smarte formatering, jeg har i min e-mail-brødtekst. Hvordan får jeg det til at beholde denne formatering???
Denne kommentar blev minimeret af moderatoren på webstedet
Jeg har brug for at vide, hvordan\hvis du kan vedhæfte et excel-regneark?
Denne kommentar blev minimeret af moderatoren på webstedet
Hej gutter. Denne kode fungerer godt, men jeg har et lille problem. Den e-mail, jeg prøver at sende, er en del af to kategorier: Send besked (makroen bruger) og PROGRAMARI RED-TEAM. Makroen fungerer fint, når jeg kun tilføjer kategorien Send besked, men så snart en anden kategori tilføjes, stopper makroen med at sende e-mails. Her er koden indtil videre. Venligst hjælp :P Private Sub Application_Reminder(ByVal Item As Object) Dim objMsg As MailItem Set objMsg = Application.CreateItem(olMailItem) 'IPM.TaskItem at holde øje med for opgavepåmindelser Hvis Item.MessageClass "IPM.Appointment" Afslut Sub End hvis hvis hvis Item.Categories "Send Message" Then Exit Sub End If objMsg.To = Item.Location objMsg.BCC = "andrei.buldus@promomotor.ws" objMsg.Subject = "Instiintare expirate Autorizatie/Contract Service" objMsg.Body = "Buna ziua," & vbNewLine & vbNewLine & _ "Konform bazei noastre de date, autorizatia/contractul de service, incheiat intre compania nostra si " + Item.Subject + " urmeaza a 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 Sæt objMsg = Intet Slut Sub
Denne kommentar blev minimeret af moderatoren på webstedet
den stopper på grund af linjen.... Hvis Vare.Kategorier <> "Send planlæg tilbagevendende e-mail" Afslut Sub
når du tilføjer den anden kategori, forårsager det exit-underlaget... måske brug hvis instr(1,item.categories,"Send Schedule Recurring Email") =0, så exit sub eller noget i den stil...
Der er endnu ingen kommentarer her
Load More
Efterlad dine kommentarer
Sender som gæst
×
Bedøm dette indlæg:
0   Tegn
Foreslåede steder

Følg os

Copyright © 2009 - www.extendoffice.com. | Alle rettigheder forbeholdes. Drevet af ExtendOffice. | | Sitemap
Microsoft og Office-logoet er varemærker eller registrerede varemærker tilhørende Microsoft Corporation i USA og / eller andre lande.
Beskyttet af Sectigo SSL