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

Hur skickar jag ett schema återkommande e-post i Outlook?

I Microsoft Outlook kan du enkelt skicka ett schema återkommande möte, möte eller uppgift till andra. Men om du bara vill skicka ett återkommande e-postschema utan något möte, möte eller uppgift, hur kan du göra det? Tyvärr erbjuder Outlook ingen funktion för att skicka återkommande e-postmeddelanden, men i vår handledning visar vi dig hur du skickar ett schema återkommande e-post i Outlook.

Skicka ett schema återkommande e-post i Outlook med VBA-kod

Skicka enkelt återkommande e -postmeddelanden i Outlook med ett fantastiskt verktyg


Skicka ett schema återkommande e-post i Outlook med VBA-kod

Denna handledning är uppdelad i fyra delar, du kommer att lyckas skicka ett schema återkommande e-post efter att du har avslutat dessa delar. Gör så här.

Del 1: Skapa ett nytt möte

1. Navigera till Kalender visa genom att klicka Kalender i Navigeringsfönstretoch skapa sedan ett nytt möte genom att klicka Ny möte under Start fliken.

3. I Tidsbeställning dialogrutan under Tidsbeställning flik. Du behöver:

A: Skriv in Ämne B: Ange mottagarnas e-postadresser i Plats
C: Konfigurera Starttid och Stopptid D: Välj påminnelsen under påminnelse listrutan.
Om du väljer 15 minuter betyder det att det kommer att påminna dig 15 minuter tidigt när e-postmeddelandet skickas.
E: Komponera din mötesdel.

Anmärkningar: Den Utnämningsämne kommer att bli det återkommande e-postämnet; och den Utnämningsorgan blir det återkommande e-postmeddelandet när mottagarna fick e-postmeddelandet.

Del 2: Skapa en ny kategori

Nu måste du skapa en ny kategori med namnet “Skicka återkommande e-postschema" som följer:

1. I Tidsbeställning Klicka på dialogrutan kategori~~POS=TRUNC > alla kategorier i Tags grupp under Tidsbeställning fliken.

2. När Färgkategorier dialogruta dyker upp, klicka Ny knapp. I Lägg till ny kategori dialogruta, skriv “Skicka återkommande e-postschema"I Namn fält; och välj sedan en färg i Färg listrutan. Klicka sedan OK.

3. Då ser du “Skicka återkommande e-postschemaKategorin visas, markera rutan och klicka sedan på OK knapp.

Del 3: Ställ in återkommande

Nu är det dags att ställa in återkomst för mötet.

1. klick Upprepning i Tillbehör grupp under Tidsbeställning flik. Se skärmdump:

2. I Återkommande av möten dialogrutan, konfigurera din Upprepning mönster. Om du behöver en sluttid, konfigurera den under Återkommande intervall. Och klicka sedan på OK.

3. När den återgår till Tidsbeställning Klicka på dialogrutan Spara och stäng knapp. Se skärmdump:

Del 4: Använd VBA -koden för att skicka återkommande e -postmeddelande

1. Vänligen tryck andra + F11 att öppna Microsoft Visual Basic för applikationer dialog.

2. Dubbelklicka på Project1 > Microsoft Outlook-objekt > ThisOutlookSession i den vänstra rutan. Se skärmdump:

3. Kopiera och klistra in följande VBA-kod till VBA-redigeraren. Och klicka sedan på Save knapp.

VBA: skickar återkommande e-postschema

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. klick verktyg > Referenser att öppna Referenser - Projekt dialog. Kontrollera i dialogrutan Microsoft Word -objektbibliotek alternativet och klicka på OK knapp.

5. tryck på andra + Q samtidigt för att stänga Microsoft Visual Basic för applikationer fönster.

När påminnelse poppar upp kommer e-postmeddelandet automatiskt att skickas till de mottagare som du har skrivit i fältet Plats i den första delen. Klicka sedan Avfärda i påminnelse dialog. Och e-postmeddelandet skickas återkommande varje dag under denna tid. Se skärmdump:

Anmärkningar: VBA-koden testades framgångsrikt i Outlook 2010 och senare versioner.


Skicka enkelt återkommande e -postmeddelanden i Outlook med ett fantastiskt verktyg

För många Outlook -användare är metoden ovan för tråkig för att hanteras korrekt. Här rekommenderar starkt Schemalägg automatisk skicka egenskap av Kutools för Outlook. Med den här funktionen kan du enkelt skapa flera återkommande e -postmeddelanden och schemalägga dessa e -postmeddelanden för att skicka regelbundet med dagliga, veckovisa, månatliga eller årliga intervaller efter behov. Gör så här för att få det gjort.

Gå till ladda ner Kutools för Outlook och prova.

1. klick Kutools > Schemalägg automatisk skicka > Skapa schema för automatisk sändning.

2. Då öppnas ett meddelandefönster och du måste:

2.1) Välj e -postmottagare i Till, Cc or bcc fält som du behöver och fyll i e -postmeddelandet ämne;
2.2) Skapa e -postkroppen;
2.3) Klicka Upprepning under Kutools återkommande flik. Se skärmdump:

3. Nu är E -post återkommande dialogrutan dyker upp måste du ange återkommande tid, återkommande mönster och intervall av återfall för e -postmeddelandet och klicka sedan på OK knapp.

4. Nu återgår det till meddelandefönstret, klicka Spara och stäng knappen för att spara de återkommande inställningarna och stänga fönstret.

Tips: Du kan upprepa steg 1 till 4 ovan för att skapa flera återkommande e -postmeddelanden efter behov.

5. Aktivera nu funktionen genom att klicka Kutools > Schemalägg automatisk skicka > Gör det möjligt.

6. I öppningen Kutools för Outlook dialogrutan, klicka OK.

När du har slutfört ovanstående inställningar skickas de återkommande e -postmeddelandena automatiskt när det angivna datumet och den angivna tiden når.

Notera: Du kan enkelt hantera dina återkommande mejl enligt följande.

1. klick Kutools > Schemalägg automatisk skicka > Hantera schemat för automatisk sändning.

2. I Schema för många autosändningar fönster kan du skapa ny återkommande mejl, redigera radera, sätta på or sänkt ett befintligt återkommande e -postmeddelande som du behöver. Eller så kan du klicka på Logga ikon för att visa sändningshistoriken för de återkommande e -postmeddelandena.

Klicka för att veta mer om den här funktionen.

  Kutools för Outlook innehåller 100+ kraftfulla funktioner för Microsoft Outlook. Gratis att prova utan begränsning på 60 dagar. Ladda ner nu!


Kutools for Outlook - ger 100 avancerade funktioner till Outlook och gör arbetet mycket enklare!

  • Auto CC / BCC enligt regler när du skickar e-post; Automatisk vidarebefordran Flera e-postmeddelanden efter anpassning; Auto-svar utan växelserver och mer automatiska funktioner ...
  • BCC-varning - visa meddelande när du försöker svara på alla om din e-postadress finns i BCC-listan; Påminn när du saknar bilagor, och mer påminna om funktioner ...
  • Svara (alla) med alla bilagor i e-postkonversationen; Svara många e-postmeddelanden inom sekunder; Lägg automatiskt till hälsning när svar Lägg till datum i ämnet ...
  • Bilagverktyg: Hantera alla bilagor i alla e-postmeddelanden, Auto Lossa, Komprimera alla, Byt namn på alla, Spara alla ... Snabbrapport, Räkna valda mejl...
  • Kraftfulla skräppost efter anpassning; Ta bort duplicerade e-postmeddelanden och kontakter... Gör det möjligt för dig att göra smartare, snabbare och bättre i Outlook.
shot kutools outlook kutools flik 1180x121
shot kutools outlook kutools plus flik 1180x121
 
Sortera kommentarer efter
Kommentarer (171)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Metoden hjälpte. Det fungerade för det första mötet som skapades när jag testade det. Men sen slutade det fungera senare.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag hade samma problem, jag har upprepat stegen flera gånger och nu fungerar det inte alls, inga e-postmeddelanden skickas eller något. Har du kunnat fixa det?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, jag kunde konfigurera ett återkommande e-postmeddelande genom att följa stegen ovan, men när jag skapade en hyperlänk i brödtexten på ett möte, när händelsen utlöstes och jag fick ett e-postmeddelande med posten konverterades hyperlänken till en rålänk. All hjälp uppskattas, tack.
Denna kommentar minimerades av moderatoren på webbplatsen
Tack! Detta fungerade. Finns det något sätt att inkludera en bilaga i e-postmeddelandet som skickas ut? Jag försökte ett test med att lägga till bilagan till kalenderhändelsen men det kommer inte fram i e-postmeddelandet.
Denna kommentar minimerades av moderatoren på webbplatsen
har du någonsin fått svar på hur man lägger till en bilaga? Tack!
Denna kommentar minimerades av moderatoren på webbplatsen
Jag fick det här att fungera för testmejlet, men nu gör det inget längre, och jag har raderat allt och upprepat stegen, är det mer med detta? Jag är på outlook 2013 också
Denna kommentar minimerades av moderatoren på webbplatsen
Jag har haft samma problem. Detta fungerade allra första gången men den återkommande mötespåminnelsen verkar inte ha utlöst mejlet. Har någon hittat en lösning på detta problem?
Denna kommentar minimerades av moderatoren på webbplatsen
[quote]Jag fick det här att fungera för testmejlet, men nu gör det inte längre någonting, och jag har tagit bort allt och upprepade steg, finns det mer i detta? Jag är på outlook 2013 ocksåAv Wonderful[/quote] Har du någonsin löst detta? Jag har precis ställt in det här och ser samma sak som du gjorde. Fungerade utmärkt första gången sedan ingenting.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag löste detta så småningom genom att aktivera makron i Outlook som som standard är avstängt. Det enda problemet jag har nu är att texten i e-postmeddelandet endast är ren text, ingen fetstil, teckenstorlek eller färgförändringar etc. dyker upp. Finns det något sätt att ändra koden ovan så att du har RTF eller HTML-text i e-postmeddelandet?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Löste du detta. Jag har samma problem Provade detta, men det fungerar inte. 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.OlFormat,BodyFormat,No,BodyFormat) = 0 'OlBodyFormat.olFormatPlain = 1 'OlBodyFormat.olFormatHTML = 2 'OlBodyFormat.olFormatRichText = 3 If (mailFormat = 1) Then mailFormat = 2 mail.GetType().InvokeMember("BodyFormat,Binding_Reflections.Binding_Reflections. Ingenting, mail, Nytt Objekt() {mailFormat}) Slut Sub Privat Sub Application_Reminder(ByVal Item As Object) Dim MItem As MailItem Set MItem = Application.CreateItem(olMailItem) If Item.MessageClass "IPM.Appointment" Avsluta Sub If Item .Kategorier "Skicka schema för återkommande e-post" Avslut sedan Sub MItem.To = Item.Location MItem.Subject = Item.Subject MItem.Body = Item.Body MItem.Send Set MItem = Ingenting Slut Sub
Denna kommentar minimerades av moderatoren på webbplatsen
[quote]Jag löste detta så småningom genom att aktivera makron i Outlook som som standard är avstängt. Det enda problemet jag har nu är att texten i e-postmeddelandet endast är ren text, ingen fetstil, teckenstorlek eller färgförändringar etc. dyker upp. Finns det något sätt att ändra koden ovan så att du har RTF eller HTML-text i e-postmeddelandet?Av Kyle[/quote] Hej Hittade du en lösning på detta. Jag behöver det :) Kim
Denna kommentar minimerades av moderatoren på webbplatsen
Du kan också överväga att använda Windows Task Scheduler för något liknande. Den är lätt att använda och kan till och med hantera tillbehör.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag försökte med uppgift men jag får ingenting eftersom bilagan inte går till e-postmeddelandets brödtext. Tipsa gärna hur du har gjort.
Denna kommentar minimerades av moderatoren på webbplatsen
Vilken kod använder du? Den bifogade inte bilagorna till e-postmeddelandet.
Denna kommentar minimerades av moderatoren på webbplatsen
hur stänger du av det?
Denna kommentar minimerades av moderatoren på webbplatsen
För att sluta skicka det återkommande e-postmeddelandet kan du antingen: 1. Radera mötet helt och hållet. 2. Ändra eller ta bort den inställda kategorin. 3. Ange ett slutdatum för återkommande möte.
Denna kommentar minimerades av moderatoren på webbplatsen
behöver du ha outlook öppet/kört för att skicka det återkommande mailet?
Denna kommentar minimerades av moderatoren på webbplatsen
Fungerar den här koden med Office 365 - Outlook 2013? Jag har följt stegen flera gånger, aktiverat makron också. Jag får påminnelsen och trycker på avvisa men mejlen skickas aldrig.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, kolla in det här - jag tror att du absolut kommer att älska den här funktionen... Inga fler veckovisa mallar
Denna kommentar minimerades av moderatoren på webbplatsen
Finns det något sätt att skicka till distributionslistan i kontakter?
Denna kommentar minimerades av moderatoren på webbplatsen
Ja Aaron, jag behövde göra det här själv. Jag försökte lägga till en distributionslista (Outlook Contact Group) som heter 'Spec Group'. Detta skickade inte. Jag ändrade dock listans namn till 'Spec@Group' (för att det ska se ut som en riktig e-postadress) och detta fungerade perfekt. Den måste behöva '@' för att hämtas. Lycklig gissning! :LOL:
Denna kommentar minimerades av moderatoren på webbplatsen
Detta fungerade bra. Nu behöver jag samma e-post för att gå till flera grupper. Kan någon hjälpa? 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. Skicka Set MItem = Ingenting End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
Gör en annan distributionslista som innehåller/pekar på de andra distributionslistorna som du redan har konfigurerat som du vill inkludera.
Denna kommentar minimerades av moderatoren på webbplatsen
Är det möjligt att schemalägga ett mail som ska skickas i outlook när datorn är borta. Jag skulle till exempel vilja skicka en mötespåminnelse på söndag för ett möte på måndag, men jag är inte på jobbet på söndagar, så hur får jag det mailet att gå ut på söndagen när jag inte är på jobbet och min dator är av? Tack!
Denna kommentar minimerades av moderatoren på webbplatsen
VBA-koden dök inte upp när jag tryckte på ALT & F11. Jag kunde hämta Microsoft Visual Basic for Applications, men ingen kod fanns. Kan du ge råd? Tack, Raj
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Raj, ingen VBA-kod ska finnas. Om du följer guiden ovan, när du dubbelklickar på "ThisOutlookSession" ska den vara tom. Du måste kopiera och klistra in koden som visas i guiden i fönstret "ThisOutlookSession" och sedan spara den. Hoppas det här hjälper.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej när jag följer alla steg och sparar och gör ett nytt e-postmeddelande - koden finns kvar från förra gången. Är koden kopplad till den valda kategorin så du behöver inte lägga till koden för varje e-postmeddelande?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej Bonnie, VBA-koden behöver bara läggas till en gång (för det första återkommande e-postmeddelandet). Om du ställer in mer än ett återkommande e-postmeddelande, missa bara det steget.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag har office 2016 och jag provade detta, efter dina instruktioner exakt. Det fungerade!! Tack så mycket. Jag var tvungen att ändra mina makrosäkerhetsinställningar i Outlook 2016 och VBA-redigeraren för att få det att fungera, men när det väl var gjort flödade instruktionerna lätt.
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, Hur ändrade du makrosäkerhetsinställningarna i outlook och vad ändrade du det till?
Denna kommentar minimerades av moderatoren på webbplatsen
Så två saker, en det visas inte som jag har skrivit det IE det finns inga feta tecken och två hur lägger jag till en signatur? eftersom det dyker upp som en hyperlänk istället för min vanliga signatur. Tack för hjälpen.
Denna kommentar minimerades av moderatoren på webbplatsen
Alex Mine dyker upp med formateringen borttagen också. Hur behåller vi det?
Denna kommentar minimerades av moderatoren på webbplatsen
Det skickade bra, men det tappade all den snygga formateringen jag har i min e-posttext. Hur får jag det att behålla den här formateringen???
Denna kommentar minimerades av moderatoren på webbplatsen
Jag behöver veta hur\om du kan bifoga ett excel-spread-ark?
Denna kommentar minimerades av moderatoren på webbplatsen
Hej killar. Den här koden fungerar utmärkt men jag har ett litet problem. E-postmeddelandet jag försöker skicka är en del av två kategorier: Skicka meddelande (makrot använder) och PROGRAMARI RED-TEAM. Makrot fungerar bra när jag bara lägger till kategorin Skicka meddelande, men så snart någon annan kategori läggs till slutar makrot att skicka e-post. Här är koden hittills. Snälla hjälp :P Private Sub Application_Reminder(ByVal Item As Object) Dim objMsg As MailItem Set objMsg = Application.CreateItem(olMailItem) 'IPM.TaskItem att se efter uppgiftspåminnelser If Item.MessageClass "IPM.Appointment" Avsluta Sub End If If Item.Categories "Send Message" Avsluta sedan 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 & _ "Konforma utgångspunkten för datum, auktoriserad/kontrakt för tjänsten, incheiat intre compania nostra si " + Item.Subject + " urmeaza ska löpa ut i 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 = Ingenting End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
den stannar på grund av linjen.... Om Artikel.Kategorier <> "Skicka schema för återkommande e-post" Avsluta Sub
när du lägger till den andra kategorin orsakar det utgångsunderlaget... kanske använd om instr(1,item.categories,"Skicka schema för återkommande e-post") =0 och sedan avsluta under eller något liknande...
Det finns inga kommentarer här ännu
Ladda fler
Lämna dina kommentarer
Postar som gäst
×
Betygsätt detta inlägg:
0   Tecken
Föreslagna platser

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL