Note: The other languages of the website are Google-translated. Back to English
登入  \/ 
x
or
x
註冊  \/ 
x

or

如何在Outlook中發送定期計劃電子郵件?

在Microsoft Outlook中,您可以輕鬆地將日程安排定期約會,會議或任務發送給其他人。 但是,如果您只想發送定期重複的電子郵件而沒有任何約會,會議或任務,該怎麼辦? 不幸的是,Outlook沒有提供用於發送計劃重複電子郵件的功能,但是在我們的教程中,我們將向您展示如何在Outlook中發送計劃重複電子郵件。

使用VBA代碼在Outlook中發送定期計劃電子郵件


使用VBA代碼在Outlook中發送定期計劃電子郵件

本教程分為四個部分,完成這些部分後,您將成功發送計劃重複執行的電子郵件。 請執行以下操作。

第一部分:創建新約會

1.請瀏覽至 日曆 點擊查看 日曆導航窗格,然後通過單擊創建新約會 新任命主頁 標籤。

3。 在裡面 任命 對話框下 任命 標籤。 你需要:

答:輸入 主旨 B:在“收件人”中輸入收件人的電子郵件地址 地區
C:配置 開始時間時間結束 D:在下方選擇提醒 提醒 下拉列表。
如果您選擇15分鐘,則表示它將在發送電子郵件的15分鐘前提醒您。
E:撰寫您的約會內容。

備註:“ 預約主題 將成為重複出現的電子郵件主題; 和 預約機構 收件人收到電子郵件後,它將成為重複出現的電子郵件正文。

第二部分:創建新類別

現在,您需要創建一個名為“發送計劃定期電子郵件“ 如下:

1。 在裡面 任命 對話框,請點擊 分類 > 所有類別標籤 組下 任命 標籤。

2。 當。。。的時候 顏色分類 彈出對話框,請點擊 新產品 按鈕。 在裡面 添加新類別 對話框中,輸入“發送計劃定期電子郵件“在 姓名 領域; 然後在 顏色 下拉列表。 然後點擊 OK.

3.然後,您將看到“發送計劃定期電子郵件”類別已列出,請選中該框,然後單擊 OK 按鈕。

第三部分:設置重複週期

現在,該設置約會的重複時間了。

1。 點擊 循環 選項 組下 任命 標籤。 看截圖:

2。 在裡面 預約定期 對話框中,配置您的 循環 模式。 如果您需要結束時間,請在下面進行配置 復發範圍。 然後點擊 OK.

3.返回到 任命 對話框,請點擊 保存並關閉 按鈕。 看截圖:

最後:使用VBA代碼發送計劃定期電子郵件

1.請按 其他 + F11 打開 Microsoft Visual Basic for Applications 對話。

2。 雙擊 Project1 > Microsoft Outlook對象 > ThisOutlookSession 在左窗格中。 看截圖:

3.將以下VBA代碼複製並粘貼到VBA編輯器中。 然後點擊 慳了 按鈕。

VBA:發送計劃定期電子郵件

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。 點擊 工具 > 參考 打開 參考 -項目 對話。 在對話框中,檢查 Microsoft Word對像庫 選項,然後單擊 OK 按鈕。

5。 按 其他 + Q 按鍵同時關閉 Microsoft Visual Basic for Applications 窗口。

提醒 彈出後,電子郵件將自動發送給您在第一部分的“位置”字段中鍵入的收件人。 然後點擊 別再顯示此信息提醒 對話。 並且電子郵件將在此時間每天重複發送。 看截圖:

備註:VBA代碼已在Outlook 2010和更高版本中成功測試。


Kutools for Outlook-為Outlook帶來100個高級功能,並使工作更加輕鬆!

  • 自動CC / BCC 根據規則發送電子郵件; 自動前進 自定義多封電子郵件; 自動回复 沒有交換服務器,還有更多自動功能...
  • BCC警告 -當您嘗試全部答复時顯示消息 如果您的郵件地址在“密件抄送”列表中; 缺少附件時提醒,還有更多提醒功能...
  • 在郵件對話中回复(全部)帶有所有附件; 回复許多電子郵件 片刻之間; 自動添加問候語 回复時將日期添加到主題中...
  • 附件工具:管理所有郵件中的所有附件, 自動分離, 全部壓縮,重命名全部,保存全部...快速報告, 計算選定的郵件...
  • 強大的垃圾郵件 習俗 刪除重複的郵件和聯繫人... 使您能夠在Outlook中做得更聰明,更快和更好。
拍攝kutools前景kutools選項卡1180x121
拍攝kutools前景kutools加標籤1180x121
 
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Raj · 21 days ago
    I am facing issue with Email Body. in my received email it completely blank. what could be wrong
  • To post as a guest, your comment is unpublished.
    Marcio Filho · 1 months ago
    @Tony Fecteau Thank you very much Tony, you helped me a lot :D
  • To post as a guest, your comment is unpublished.
    JayPie · 1 months ago
    Is there a way to modify the code to only send the email if you hit "dismiss" and don't send the email if you "dismiss all" or some other button?
    I want to be able to chose each day if I send the email, but still want to be reminded each day.
  • To post as a guest, your comment is unpublished.
    rayray4105 · 2 months ago
    For me the VBA halted on 'CStr(Environ("USERPROFILE"))'.

    I have moved both lines starting with 'xFldPth' just below 'On Error Resume Next' which resulted in the code to be fully executed
  • To post as a guest, your comment is unpublished.
    Fishy · 4 months ago
    @katie Same here. Have you found what make it stop working?
  • To post as a guest, your comment is unpublished.
    FishyD · 4 months ago
    @katie Same here, it was working great and over the last day or so, just broke.
  • To post as a guest, your comment is unpublished.
    katie · 4 months ago
    This was working for me for several months. All of the sudden, the reminders are still appearing, but the emails are no longer being sent. Any ideas?
  • To post as a guest, your comment is unpublished.
    Sohail · 5 months ago
    I am using Office 2016. I am unable to click on CATEGORIZE when doing through NEW APPOINTMENT but Categorize function properly when using NEW EMAIL.
  • To post as a guest, your comment is unpublished.
    Julia · 5 months ago
    Hi. How do I add attachments? I need to pull specific files each month and attach to the email. Is there a way to do this?
  • To post as a guest, your comment is unpublished.
    Phoebe · 6 months ago
    The emails are being generated but are going to draft folder and not being sent out automatically. How would I fix this?
  • To post as a guest, your comment is unpublished.
    Tellett · 8 months ago
    This didn't work for me until I realized that naming the category "Send Scheduled Recurring Email" instead of "Send Schedule Recurring Email" mattered. It was a comment below that brought it to my attention. Thanks!
  • To post as a guest, your comment is unpublished.
    yang · 9 months ago
    Doesn't work for Outlook 2016
  • To post as a guest, your comment is unpublished.
    Tony · 9 months ago
    I followed the instructions, but I get a .dll error when I check microsoft word 16.0 object library. I don't know if it matters, but the other object libraries show up as 14.0
  • To post as a guest, your comment is unpublished.
    Nicola · 10 months ago
    @Jon This worked for me thank you

  • To post as a guest, your comment is unpublished.
    Ricky · 10 months ago
    @odhinto@gmail.com I can't get it to work either in Outlook 2016
  • To post as a guest, your comment is unpublished.
    Vinodh Kumar · 10 months ago
    @GP Hi,

    I am getting syntax error. Help me pls.
  • To post as a guest, your comment is unpublished.
    Vinodh Kumar · 10 months ago
    @crystal Hi,
    I am facing the same issue. can you please post the updated code.

    Also is there any way to include email address as CC ?

  • To post as a guest, your comment is unpublished.
    Terri · 10 months ago
    often the location bar is unable to contain all of the email addresses for me, I can certainly use a distribution list or group contact but how do I unpack it so the resulting email shows the addresses individually?
  • To post as a guest, your comment is unpublished.
    Tony Fecteau · 10 months ago
    @Jarrett I have same issue, where on the code we have to adding
    ".Body = Item.Body" under the line ".Subject = Item.Subject"
  • To post as a guest, your comment is unpublished.
    sangeeta · 11 months ago
    It worked very well with MS Office 365 -outlook but then stopped working. I cant figure out what changed. Did anyone else run into similar problem? Any suggestion on how to debug what is going on?
  • To post as a guest, your comment is unpublished.
    ofek · 11 months ago
    I can confirm it works on Outlook 2019 as well
  • To post as a guest, your comment is unpublished.
    Kristen · 11 months ago
    Hi, been using this without issue for a few years. Suddenly in the last couple of months, it stopped sending the email. Reminder still goes out to me at least. I came here and and see the code has been updated, which I did and now I get "userdefined type not identified" error that others seem to have gotten. Is there a fix for this or no?
  • To post as a guest, your comment is unpublished.
    odhinto@gmail.com · 1 years ago
    I have followed all the instructions: I enabled Macros; I configured the appointment as instructed and added the VBA Macro....I checked all the references as instructed.
    The email is not being sent, and I'm not getting any compiler errors. What could be the problem? I'm using Outlook 2016.
  • To post as a guest, your comment is unpublished.
    Andrey · 1 years ago
    Is there a way to send the email from certain different e-mail (SendAs or SendOnBehalfOfName)?
  • To post as a guest, your comment is unpublished.
    Jon · 1 years ago
    @Scott Pardon me if this is something you already know, but without having other details besides what you posted, I suggest you make sure both microsoft office 16.0 object library AND microsoft word 16.0 object library are selected from step 4 above.
  • To post as a guest, your comment is unpublished.
    Jarrett · 1 years ago
    @Marjorie Try adding ".Body = Item.Body" under the line ".Subject = Item.Subject" in the VBA Code mentioned in this article.
  • To post as a guest, your comment is unpublished.
    Scott · 1 years ago
    @Ron Same issue here
  • To post as a guest, your comment is unpublished.
    Scott · 1 years ago
    Every time any reminder pops up, i am getting a VBA error of "userdefined type not identified".
  • To post as a guest, your comment is unpublished.
    joaquimlmpires@gmail.com · 1 years ago
    Hi. I know this is an old post but I'm trying to use it to send a periodic email.

    I'm able to complete all the steps but the code line:
    Dim xItemDoc As Word.Document
    prompts a compile error: "userdeffined type not defined "

    I replaced with:
    Dim xItemDoc As DocumentItem

    compiles ok but emai does not get sent.

    anyone can help?

    thank you
  • To post as a guest, your comment is unpublished.
    Ron · 1 years ago
    I get the reminder but no email, ideas?
  • To post as a guest, your comment is unpublished.
    Sol Roberts-Lieb · 1 years ago
    @Mads I had the same error as well.
  • To post as a guest, your comment is unpublished.
    Mads · 1 years ago
    @Katie I get the same error. What's the solution here?
  • To post as a guest, your comment is unpublished.
    Marjorie · 1 years ago
    I received the email, however the body of the email is blank. I have put text and a signature in the body but when the email comes the body of the email is blank.
  • To post as a guest, your comment is unpublished.
    Katie · 1 years ago
    I have followed all instructions and made sure the object library was checked etc but get the error 'compile error user type not defined' when it's time for the reminder.
    Any solutions to this?

    Thanks!
  • To post as a guest, your comment is unpublished.
    Vinay · 1 years ago
    It worked for me on Testing but when I made the changes to send it actually it didn't worked. Is there any specific modifications I needed to make? I see my Macro is disabled but it's on office system so I can't change it but assuming it worked for the first time it should work alright again; right?
  • To post as a guest, your comment is unpublished.
    OrionStar · 1 years ago
    @tricia If they change every week then it's not able to work really. What changes? if it's an attached file that should be fine because it grabs the file each time.
  • To post as a guest, your comment is unpublished.
    crystal · 1 years ago
    @Sai Swaroop Hi,
    Sorry for the inconvenience. The code has been updated to solve the problem. Please have a try and thank you for your comment.
  • To post as a guest, your comment is unpublished.
    tricia · 1 years ago
    how can this be sent to emails that change on a weekly basis?
  • To post as a guest, your comment is unpublished.
    anne · 1 years ago
    this is not working for me
  • To post as a guest, your comment is unpublished.
    Sai Swaroop · 1 years ago
    I Tried using the above code it works very fine. But the problem is in the body of the email I am including Pictures, text and Hyperlinks to that. By the time mail reaching to the receiver everything is converting as a Text. Can anyone help me on this
  • To post as a guest, your comment is unpublished.
    Aarti · 1 years ago
    superb works for me thanks yaa
  • To post as a guest, your comment is unpublished.
    Priyank · 1 years ago
    It did work on my laptop before. I somewhat messed up my VBA. now it's not working..
    How do I restart of clear my VBA?

    I am not a programmer. I just wanted automatic email generated and googled it. Tried various things and then came across this post.

    It really worked well before. Please help
  • To post as a guest, your comment is unpublished.
    aerin.melvin@gmail.com · 1 years ago
    How do you add an attachment to go with the email that is sent?
  • To post as a guest, your comment is unpublished.
    Aerin · 1 years ago
    Is there a way to make this BCC?
  • To post as a guest, your comment is unpublished.
    crystal · 1 years ago
    @Jan Hi Jan,
    Please go to the Sent Items folder to check for the sending email.
  • To post as a guest, your comment is unpublished.
    Daniele · 1 years ago
    @Kevin Good, now it works!
    I've just one problem. If my Outlook client application is close, it don't work ...any solutions?
  • To post as a guest, your comment is unpublished.
    Jan · 2 years ago
    I got to the VBA code copied, pasted, and saved fine. But no reminder popped up for me to dismiss. Will this still send?
  • To post as a guest, your comment is unpublished.
    Rebeccah · 2 years ago
    @SS It's in the location field rather than in an invitee field, so, no - no invite goes out to the location address(es). No reminders to the location address(es) normally, either. This code is triggered by the application_reminder event for this appointment and adds functionality to it, to

    - create an e-mail message

    - put the appointment location address(es) in the To field of the e-mail message.

    - put the appointment subject line in the Subject field of the e-mail message.

    - put the appointment body in the Body field of the e-mail message.

    - send the e-mail message.
  • To post as a guest, your comment is unpublished.
    Rebeccah · 2 years ago
    @Johan Replace
    If Item.Categories <> "Send Schedule Recurring Email" Then Exit Sub
    with
    If Left(Item.Categories,29) <> "Send Schedule Recurring Email" Then Exit Sub


    Or, if your category names are all different, then
    If Item.Categories <> "First category name" AND Item.Categories <> "Second category name" AND Item.Categories <> "something completely different" Then Exit Sub
  • To post as a guest, your comment is unpublished.
    Tomy · 2 years ago
    It's great work, tks