Vai al contenuto principale

Come inviare una pianificazione e-mail ricorrente in Outlook?

In Microsoft Outlook, puoi inviare facilmente un appuntamento, una riunione o un'attività ricorrente programmata ad altri. Ma se vuoi semplicemente inviare un'e-mail periodica programmata senza alcun appuntamento, riunione o attività, come puoi fare? Sfortunatamente, Outlook non fornisce alcuna funzionalità per l'invio di email ricorrenti di pianificazione, ma nel nostro tutorial ti mostreremo come inviare una email ricorrente di pianificazione in Outlook.

Invia una pianificazione e-mail ricorrente in Outlook con codice VBA

Invia facilmente e-mail ricorrenti pianificate in Outlook con uno strumento straordinario


Invia una pianificazione e-mail ricorrente in Outlook con codice VBA

Questo tutorial è diviso in quattro parti, dopo aver terminato queste parti riuscirai a inviare un'e-mail ricorrente di pianificazione. Si prega di fare quanto segue.

Parte 1: Crea un nuovo appuntamento

1. Vai al file Calendario visualizzare facendo clic Calendario nel Riquadro di spostamento, quindi crea un nuovo appuntamento facendo clic su Nuovo appuntamento per Casa scheda.

3. Nel Appuntamento dialogo sotto Appuntamento tab. Devi:

A: Digita il file Oggetto B: inserisci gli indirizzi email dei destinatari nel file Località
C: Configura il file Ora di inizio e la Ora fine D: Seleziona il promemoria sotto Promemoria menu `A tendina.
Se scegli 15 minuti, significa che ti ricorderà 15 minuti prima quando l'email viene inviata.
E: Componi il corpo dell'appuntamento.

Note:: Il Oggetto dell'appuntamento diventerà l'oggetto ricorrente dell'email; e il Organo di nomina diventerà il corpo dell'email ricorrente quando i destinatari hanno ricevuto l'email.

Parte 2: Crea una nuova categoria

Ora devi creare una nuova categoria denominata "Invia pianificazione e-mail ricorrente" come segue:

1. Nel Appuntamento finestra di dialogo, fare clic Classificare > Categorie nel tag gruppo sotto Appuntamento scheda.

2. Quando il Categorie di colore finestra di dialogo che si apre, fare clic New pulsante. Nel Aggiungi Nuova Categoria finestra di dialogo, digita "Invia pianificazione e-mail ricorrente"Nel Nome campo; e quindi scegli un colore nel file Colore menu `A tendina. Quindi fare clic OK.

3. Quindi vedrai il "Invia pianificazione e-mail ricorrente"È elencata la categoria, selezionare la casella, quindi fare clic su OK pulsante.

Parte 3: imposta la ricorrenza

Ora è il momento di impostare la ricorrenza dell'appuntamento.

1. Clic Ricorrenza nel Opzioni gruppo sotto Appuntamento tab. Vedi screenshot:

2. Nel Ricorrenza dell'appuntamento finestra di dialogo, configura il tuo Ricorrenza modello. Se hai bisogno di un'ora di fine, configurala in Gamma di recidiva. E poi clicca OK.

3. Quando ritorna al file Appuntamento finestra di dialogo, fare clic Salva e chiudi pulsante. Vedi screenshot:

Parte 4: utilizzare il codice VBA per inviare l'e-mail ricorrente di pianificazione

1. Premere altro + F11 per aprire il Microsoft Visual Basic, Applications Edition dialogo.

2. Fare doppio clic su Project1 > Oggetto Microsoft Outlook > Questa sessione di Outlook nel riquadro di sinistra. Vedi screenshot:

3. Copia e incolla il seguente codice VBA nell'editor VBA. Quindi fare clic su Risparmi pulsante.

VBA: invio di messaggi di posta elettronica ricorrenti

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. Clic Strumenti > Riferimenti per aprire il Riferimenti - Progetto dialogo. Nella finestra di dialogo, seleziona il file Libreria di oggetti di Microsoft Word opzione e fare clic su OK pulsante.

5. premi il altro + Q contemporaneamente i tasti per chiudere il file Microsoft Visual Basic, Applications Edition finestra.

Quando il Promemoria spuntando, l'email verrà automaticamente inviata ai destinatari che hai digitato nella prima parte nel campo Ubicazione. Quindi fare clic su Nascondi nel Promemoria dialogo. E l'e-mail verrà inviata ricorrendo ogni giorno in questo periodo. Vedi screenshot:

Note:: Il codice VBA è stato testato con successo in Outlook 2010 e nelle versioni successive.


Invia facilmente e-mail ricorrenti pianificate in Outlook con uno strumento straordinario

Per molti utenti di Outlook, il metodo sopra è troppo noioso per essere gestito correttamente. Qui consiglio vivamente il Pianifica invio automatico caratteristica di Kutools for Outlook. Con questa funzione, puoi facilmente creare più e-mail ricorrenti e pianificare queste e-mail da inviare regolarmente a intervalli giornalieri, settimanali, mensili o annuali di cui hai bisogno. Si prega di fare quanto segue per farlo fare.

Vai su scarica Kutools per Outlook e provare.

1. Clic Kutools > Pianifica invio automatico > Crea un programma di invio automatico.

2. Quindi si apre una finestra di messaggio e devi:

2.1) Selezionare i destinatari dell'e-mail nel A, Cc or bcc campi di cui hai bisogno, quindi compila l'e-mail soggetto;
2.2) Comporre il corpo dell'email;
2.3) Fare clic Ricorrenza sotto il Kutools ricorrenti tab. Vedi screenshot:

3. Ora il file Ricorrenza delle email viene visualizzata la finestra di dialogo, è necessario specificare il tempo ricorrente, modello ricorrente e la gamma di recidiva per l'e-mail, quindi fare clic su OK pulsante.

4. Ora torna alla finestra del messaggio, fai clic su Salva e chiudi pulsante per salvare le impostazioni ricorrenti e chiudere la finestra.

Suggerimenti: Puoi ripetere i passaggi precedenti da 1 a 4 per creare più email ricorrenti di cui hai bisogno.

5. Ora attiva la funzione facendo clic su Kutools > Pianifica invio automatico > Abilitare.

6. In apertura Kutools for Outlook finestra di dialogo, fare clic OK.

Dopo aver terminato le impostazioni di cui sopra, le e-mail ricorrenti verranno inviate automaticamente al raggiungimento della data e dell'ora specificate.

Nota: Puoi gestire facilmente le tue email ricorrenti come segue.

1. Clic Kutools > Pianifica invio automatico > Gestisci la pianificazione dell'invio automatico.

2. Nel Gestisci la pianificazione dell'invio automatico finestra, puoi creare nuovi e-mail ricorrenti, modificare, eliminare, accendere or MENO un'e-mail ricorrente esistente di cui hai bisogno. Oppure puoi fare clic su Log icona per visualizzare la cronologia di invio delle email ricorrenti.

Clicca per saperne di più su questa funzione.

  Kutools for Outlook include oltre 100 potenti funzionalità per Microsoft Outlook. Prova gratuita senza limitazioni per 60 giorni. Scarica ora!


I migliori strumenti per la produttività in ufficio

Kutools for Outlook - Oltre 100 potenti funzionalità per potenziare il tuo Outlook

🤖 Assistente di posta AI: E-mail istantanee professionali con la magia dell'intelligenza artificiale: risposte geniali con un solo clic, tono perfetto, padronanza multilingue. Trasforma l'e-mail senza sforzo! ...

???? Automazione di posta elettronica: Fuori sede (disponibile per POP e IMAP)  /  Pianifica l'invio di e-mail  /  CC/BCC automatico in base alle regole durante l'invio di e-mail  /  Inoltro automatico (regole avanzate)   /  Aggiunta automatica di saluto   /  Suddividi automaticamente le email con più destinatari in singoli messaggi ...

📨 gestione e-mail: Richiama facilmente le email  /  Blocca le email truffe per soggetto e altri  /  Elimina email duplicate  /  Ricerca avanzata  /  Consolidare cartelle ...

📁 Allegati ProSalvataggio in batch  /  Stacca batch  /  Comprimi in lotti  /  Salvataggio automatico   /  Scollegamento automatico  /  Comprimi automaticamente ...

🌟 Magia dell'interfaccia: 😊Più emoji carini e fantastici   /  Aumenta la tua produttività in Outlook con le visualizzazioni a schede  /  Riduci a icona Outlook invece di chiuderlo ...

👍 Meraviglie con un clic: Rispondi a tutti con gli allegati in arrivo  /   E-mail anti-phishing  /  🕘Mostra il fuso orario del mittente ...

👩🏼‍🤝‍👩🏻 Contatti e calendario: Aggiungi in batch contatti dalle email selezionate  /  Dividere un gruppo di contatti in singoli gruppi  /  Rimuovi promemoria compleanno ...

Al di sopra Caratteristiche 100 Attendi la tua esplorazione! Clicca qui per scoprire di più.

 

 

Comments (171)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Bonjour,
J'utilise outlook depuis peu, et j'ai découvert cette manipulation pour envoyer un mail récurrent. Cela a très bien fonctionné la première fois, mais je ne comprends pas, ça ne fonctionne plus. Cela a peut-être de l'importance, mais comme je travaille sur 2 ordinateurs différents, le code VBA a aussi été intégré sur ma deuxième session outlook. Auriez-vous une explication je vous prie ?
Merci d'avance
This comment was minimized by the moderator on the site
Hi Pink,
Which Outlook version are you using? Is there a reminder dialog box popping up afterwards?
This comment was minimized by the moderator on the site
This feature does not work for me no matter what I do and from the above thread, it doesn't look like they are attempting to fix it much less address it--I don't see any responses from the developer.

It's too bad because everything else with this product works very well.
This comment was minimized by the moderator on the site
Hi Rhonda Corn,
Can you provide the emails under the following folder path?
You can compress it and send it to
C:\Users\User Name\AppData\Roaming\ExtendOffice\OutlookKutools\KTORecurringEmail
This comment was minimized by the moderator on the site
How do I get this to run 2 different scheduled emails?
This comment was minimized by the moderator on the site
Hi, 
When I put recipients names into "location" it changes "appointment" to "meeting" invite, is this working as intended? It doesn't allow me to "save and close", but rather "send" the invite now which is not what I want to do.
This comment was minimized by the moderator on the site
Hi,Appointments are not changed to meetings when entering content into the Location field. 
This comment was minimized by the moderator on the site
I scheduled the reoccurring email however instead of sending email on the 30th it sent it today. I checked the settings and is set to send email on 30th at 10 am. Instead it sent the email on the 17th at 5:45 PM
This comment was minimized by the moderator on the site
Hi Leah,Sorry for the trouble, the problem you described cannot be reproduced. Here suggest using the relevant function of KTO to send a schedule recurring email.
This comment was minimized by the moderator on the site
I’m trying to set up a recurring email to be sent. However, it’s not working for some reason. It acts like it’s trying, but I get this error message:
This comment was minimized by the moderator on the site
Hi,You need to enable the Microsoft Word Object Library mentioned in step 4 of the post to avoid this error.
This comment was minimized by the moderator on the site
It is enabled
This comment was minimized by the moderator on the site
It is enabled already
This comment was minimized by the moderator on the site
I had the same problem.  I had a look in the available references list and found a second Microsoft Word 16.0 Object Library that was not enabled. Once I enabled that one, it solved the problem for me!
This comment was minimized by the moderator on the site
Hello, 
Several errors to easily solve if the mail stays in "draft" : 
-> Add .Save juste before .Send
-> Don't close everything too fast or the script wouldn't have the time to send the mail that it has been cleaned... so find a way to delay those 2 rows 
Set xMailItem = Nothing
VBA.Kill xFldPath
Maybe with a thread sleep/wait ? Is the killing mandatory ? wouldn't this be killed when outlook is closed ? For my usecase, it was ok to remove them
This comment was minimized by the moderator on the site
I followed the instruction in this article "How to send a schedule recurring email in Outlook" multiple times, to no avail. I get the popup reminder box but, the e-mail is never sent. I've tried with Kutools for Outlook installed and uninstalled. Still no success in sending a scheduled recurring email in Outlook.

Thanx,
RLB
This comment was minimized by the moderator on the site
I have had the same situation. It was working fine for almost a year and then suddenly stopped working. I've tried recopying the code, delete it completely and start over. Same results- popup reminder box happens, I click ok, and the email is never sent.
This comment was minimized by the moderator on the site
Hi tarnold,Make sure that the category name you created in step 2 is the same as the name specified in the code.
Can you try the VBA below and give me feedback on error you encountered later? Because this problem needs to be reproduced in my case. Or you can also try the third party tool mentioned in the post. Sorry for the inconvenience.

<div data-tag="code">Private Sub Application_Reminder(ByVal Item As Object)
'Updated by Extendoffice 20220114
Dim xMailItem As MailItem
Dim xItemDoc As Word.Document
Dim xNewDoc As Word.Document
Dim xFldPath As String
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
This comment was minimized by the moderator on the site
Crystal,
Sorry for the delay.  I copied your script into VBA.  My category is "Recurring Email", so I made it match in your script.  I set up a recurring email to test it.  The reminder window pops up at the correct time.  I waited a couple of minutes and then clicked 'dismiss'.  The window closes.  No errors.  No email sent.
This comment was minimized by the moderator on the site
Hi Crystal, when using the code above I have this error: 
Erreur de compilation: Type défini par l'utilisateur non défini
it's concerning this lineDim xItemDoc As Word.Document

any ideas?
This comment was minimized by the moderator on the site
Hi Marie-Eve Noel,You need to enable the Microsoft Word Object Library mentioned in step 4 of the post to avoid this error.
This comment was minimized by the moderator on the site
At least yours work for a while. Mine never worked. Contacted Support and was told to post here. I suppose we'll have to wait on the author to respond.
This comment was minimized by the moderator on the site
Hi RodmanB,
Can neither of the two methods described in the article solve the problem?
VBA code and Kutools for Outlook are two different ways to handle the task.I need to know more specific about your issue, such as your Excel version.
This comment was minimized by the moderator on the site
Hi Crystal,
I am using MSOffice 365 for all of the Office products- Outlook, Excel, etc. As I posted 6month ago, it was working fine with my previous MSOffice desktop software.  When I switched to Office 365, it stopped working and I am having the same/similar situation as RodmanB.  The reminder popup occurs, I dismiss it and nothing happens.  The email is not in the draft folder, not in the sent folder, nothing.
This comment was minimized by the moderator on the site
Crystal,   Thanks for help. I replaced the VBCode and made a different test email. It preformed just as the other; reminder pops up, .wav file plays but the email is not sent. I'll install Kutools for Outlook and try that way tomorrow and, will respond with results.
This comment was minimized by the moderator on the site
Crystal,   Unable to install Kutool for outlook, demo license expired. Not willing to buy  just to debug this feature. So, have a great day and thanks for the help.
Thanx,RLB
This comment was minimized by the moderator on the site
Hi have implemented this and there's a couple of issues.1 - if i don't have Outlook opened, the email is not sent --> i guess this is normal, not a big deal anyway.2 - even the appointment appears just once a day and the email sent properly then, i see that the email is sent randomly other extra times during the day. For example, my schedule is daily at 9:00 and this is sent at 9:00 (OK) and also at 17:13 (NOK). I am not being able to identify why, any idea?
thanks.
This comment was minimized by the moderator on the site
What would the VBA code be for this but sending from the recipients of the appointment, not the "location" of the appointment as coded above? I need to send to 20+ people and cannot add enough names as the location fields is limited on characters. Many thanks
This comment was minimized by the moderator on the site
Hi J,You can try the second method "the Schedule auto send feature of Kutools for Outlook" mentioned in the post.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations