Bỏ qua nội dung chính

Làm cách nào để gửi một email định kỳ theo lịch trong Outlook?

Trong Microsoft Outlook, bạn có thể dễ dàng gửi lịch hẹn, cuộc họp hoặc nhiệm vụ định kỳ cho người khác. Nhưng nếu bạn chỉ muốn gửi một email định kỳ mà không có bất kỳ cuộc hẹn, cuộc họp hay nhiệm vụ nào, bạn có thể làm thế nào? Rất tiếc, Outlook không cung cấp tính năng gửi email định kỳ theo lịch, nhưng trong hướng dẫn của chúng tôi, chúng tôi sẽ chỉ cho bạn cách gửi email định kỳ theo lịch trong Outlook.

Gửi email định kỳ theo lịch trong Outlook với mã VBA

Dễ dàng gửi email định kỳ theo lịch trong Outlook với một công cụ tuyệt vời


Gửi email định kỳ theo lịch trong Outlook với mã VBA

Hướng dẫn này được chia thành bốn phần, bạn sẽ thành công khi gửi một email định kỳ sau khi hoàn thành các phần này. Hãy làm như sau.

Phần 1: Tạo một cuộc hẹn mới

1. Vui lòng điều hướng đến Xem Lịch xem bằng cách nhấp vào Xem Lịch trong Navigation Pane, rồi tạo một cuộc hẹn mới bằng cách nhấp vào Bổ nhiệm mới Dưới Trang Chủ tab.

3. bên trong Bổ nhiệm hộp thoại dưới Bổ nhiệm chuyển hướng. Bạn cần phải:

A: Nhập vào Tiêu Đề B: Nhập địa chỉ email của người nhận vào Địa Chỉ
C: Định cấu hình Thời gian bắt đầuThời gian kết thúc D: Chọn lời nhắc bên dưới Reminder danh sách thả xuống.
Nếu bạn chọn 15 phút, có nghĩa là nó sẽ nhắc bạn sớm 15 phút khi email được gửi.
E: Soạn nội dung Cuộc hẹn của bạn.

Chú thích: Các Chủ đề cuộc hẹn sẽ trở thành chủ đề email định kỳ; và Cơ quan bổ nhiệm sẽ trở thành nội dung email định kỳ khi người nhận nhận được email.

Phần 2: Tạo một danh mục mới

Bây giờ bạn cần tạo một danh mục mới có tên “Gửi email định kỳ theo lịch trình" như sau:

1. bên trong Bổ nhiệm hộp thoại, vui lòng nhấp vào Phân loại > Tất cả danh mục trong Tag nhóm dưới Bổ nhiệm tab.

2. Khi mà Danh mục màu sắc hộp thoại bật lên, vui lòng nhấp vào Mới nút. bên trong Thêm danh mục mới hộp thoại, nhập “Gửi email định kỳ theo lịch trình" trong Họ tên cánh đồng; và sau đó chọn một màu trong Màu danh sách thả xuống. Sau đó nhấp vào OK.

3. Sau đó, bạn sẽ thấy “Gửi email định kỳ theo lịch trình”Danh mục được liệt kê, vui lòng chọn hộp, sau đó nhấp vào OK .

Phần 3: Đặt thời gian lặp lại

Bây giờ, đã đến lúc thiết lập thời gian lặp lại cho cuộc hẹn.

1. nhấp chuột Tái phát trong Các lựa chọn nhóm dưới Bổ nhiệm chuyển hướng. Xem ảnh chụp màn hình:

2. bên trong Cuộc hẹn lặp lại hộp thoại, cấu hình của bạn Tái phát mẫu. Nếu bạn cần thời gian kết thúc, vui lòng định cấu hình nó theo Phạm vi lặp lại. Và sau đó nhấp vào OK.

3. Khi nó trở về Bổ nhiệm hộp thoại, vui lòng nhấp vào Lưu & Đóng cái nút. Xem ảnh chụp màn hình:

Phần 4: Sử dụng mã VBA để gửi Email Định kỳ theo lịch trình

1. Vui lòng nhấn Khác + F11 để mở Microsoft Visual Basic cho các ứng dụng thoại.

2. Nhấp đúp vào Project1 > Đối tượng Microsoft Outlook > ĐâyOutlookSession trong ngăn bên trái. Xem ảnh chụp màn hình:

3. Sao chép và dán mã VBA sau vào trình chỉnh sửa VBA. Và sau đó nhấp vào Lưu .

VBA: lịch gửi email định kỳ

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. nhấp chuột CÔNG CỤ > dự án để mở dự án - Dự án hộp thoại. Trong hộp thoại, chọn Thư viện đối tượng Microsoft Word và nhấp vào OK .

5. Nhấn nút Khác + Q cùng một lúc để đóng Microsoft Visual Basic cho các ứng dụng cửa sổ.

Khi Reminder bật lên, email sẽ tự động được gửi đến người nhận mà bạn đã nhập vào trường Vị trí ở phần đầu tiên. Sau đó nhấp vào Bỏ qua trong Reminder hộp thoại. Và email sẽ được gửi định kỳ hàng ngày trong thời gian này. Xem ảnh chụp màn hình:

Chú thích: Mã VBA đã được kiểm tra thành công trong Outlook 2010 và các phiên bản mới hơn.


Dễ dàng gửi email định kỳ theo lịch trong Outlook với một công cụ tuyệt vời

Đối với nhiều người dùng Outlook, phương pháp trên quá tẻ nhạt để có thể xử lý chính xác. Ở đây rất khuyên bạn nên Lên lịch gửi tự động tính năng của Kutools cho Outlook. Với tính năng này, bạn có thể dễ dàng tạo nhiều email định kỳ và lên lịch gửi các email này đều đặn hàng ngày, hàng tuần, hàng tháng hoặc hàng năm nếu bạn cần. Hãy làm như sau để hoàn thành.

Truy cập tải xuống Kutools cho Outlook và có một thử.

1. nhấp chuột Kutools > Lên lịch gửi tự động > Tạo lịch gửi tự động.

2. Sau đó, một cửa sổ thông báo đang mở và bạn cần:

2.1) Chọn người nhận email trong Tới, Cc or bcc trường như bạn cần, sau đó điền vào email môn học;
2.2) Soạn nội dung email;
2.3) Nhấp Tái phát theo Kutools định kỳ chuyển hướng. Xem ảnh chụp màn hình:

3. Bây giờ Email lặp lại hộp thoại bật lên, bạn cần chỉ định thời gian định kỳ, mô hình định kỳphạm vi tái phát cho email, và sau đó nhấp vào OK .

4. Bây giờ nó trở lại cửa sổ tin nhắn, nhấp vào Lưu & Đóng để lưu cài đặt định kỳ và đóng cửa sổ.

Lời khuyên: Bạn có thể lặp lại bước từ 1 đến 4 ở trên để tạo nhiều email định kỳ khi cần.

5. Bây giờ hãy bật tính năng này bằng cách nhấp vào Kutools > Lên lịch gửi tự động > Bật.

6. Trong phần mở đầu Kutools cho Outlook hộp thoại, nhấn OK.

Sau khi hoàn tất các cài đặt trên, các email định kỳ sẽ được gửi tự động khi đến ngày và giờ được chỉ định.

Lưu ý: Bạn có thể dễ dàng quản lý các email định kỳ của mình như sau.

1. nhấp chuột Kutools > Lên lịch gửi tự động > Quản lý lịch gửi tự động.

2. bên trong Mange lịch gửi tự động cửa sổ, bạn có thể tạo mới email định kỳ, chỉnh sửa, xóa, bật or off một email định kỳ hiện có khi bạn cần. Hoặc bạn có thể nhấp vào Khúc gỗ biểu tượng để xem lịch sử gửi của các email định kỳ.

Nhấp để biết thêm về tính năng này.

  Kutools cho Outlook bao gồm hơn 100 tính năng mạnh mẽ cho Microsoft Outlook. Dùng thử miễn phí không giới hạn trong 60 ngày. Tải về!


Công cụ năng suất văn phòng tốt nhất

Kutools cho Outlook - Hơn 100 tính năng mạnh mẽ để tăng cường Outlook của bạn

🤖 Trợ lý thư AI: Email chuyên nghiệp tức thì với phép thuật AI--một cú nhấp chuột để có câu trả lời xuất sắc, giọng điệu hoàn hảo, khả năng thông thạo đa ngôn ngữ. Chuyển đổi email một cách dễ dàng! ...

📧 Tự động hoá email: Vắng Mặt (Có sẵn cho POP và IMAP)  /  Lên lịch gửi email  /  Tự động CC/BCC theo quy định khi gửi Email  /  Tự động chuyển tiếp (Quy tắc nâng cao)   /  Tự động thêm lời chào   /  Tự động chia email nhiều người nhận thành các tin nhắn riêng lẻ hữu ích. Cảm ơn !

📨 Quản lý email: Dễ dàng thu hồi email  /  Chặn email lừa đảo theo chủ đề và những người khác  /  Xóa các email trùng lặp  /  Tìm Kiếm Nâng Cao  /  Hợp nhất các thư mục hữu ích. Cảm ơn !

📁 Tệp đính kèm chuyên nghiệpLưu hàng loạt  /  Tách hàng loạt  /  Nén hàng loạt  /  Tự động lưu   /  Tự động tách  /  Tự động nén hữu ích. Cảm ơn !

🌟 Giao diện ma thuật: 😊Thêm nhiều biểu tượng cảm xúc đẹp và thú vị hơn   /  Tăng năng suất Outlook của bạn với chế độ xem theo thẻ  /  Thu nhỏ Outlook thay vì đóng hữu ích. Cảm ơn !

👍 Kỳ quan chỉ bằng một cú nhấp chuột: Trả lời tất cả bằng tệp đính kèm đến  /   Email chống lừa đảo  /  🕘Hiển thị múi giờ của người gửi hữu ích. Cảm ơn !

👩🏼‍🤝‍👩🏻 Danh bạ & Lịch: Thêm hàng loạt liên hệ từ các email đã chọn  /  Chia nhóm liên hệ thành các nhóm riêng lẻ  /  Xóa lời nhắc sinh nhật hữu ích. Cảm ơn !

Trên 100 tính năng Chờ đợi sự khám phá của bạn! Bấm vào đây để khám phá thêm.

 

 

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