By default, the reminder date of task will automatically be set equal to the due date. Thus, in this article, we will teach how to use Outlook VBA to keep task reminder date same as the start date instead of due date.
Perhaps you must have notice that when you create a task whose start date and due date aren’t in the same day, its reminder date will automatically be specified equal to the due date. Moreover, every time you change the due date, reminder date will be changed as well. However, most of the time, what you exactly want is to get a reminder as soon as a task starts instead of when it tend to end in that the reminder on due date will be too late. Therefore, you must long for a method which can keep the task reminder date same as start date. Outlook doesn’t have such a feature natively. You need to seek other means, such as VBA. So here we’ll share you how to get it with Outlook VBA.
Auto Set the Reminder Date to Start Date Instead of Due Date
- To start with, launch your Outlook program as normal.
- Then turn to “Developer” tab and click on the “Visual Basic” button. If cannot find such a tab, you can also press “Alt + F11” keys.
- Next you will enter the VBA editor window.
- Then you need to open the “ThisOutlookSession” project window and copy the VBA codes below into it.
Public WithEvents objTasks As Outlook.Items Public objTask As Outlook.TaskItem Public dStartDate As Date Public dReminderTime As Date Private Sub Application_Startup() Set objTasks = Outlook.Application.Session.GetDefaultFolder(olFolderTasks).Items End Sub Private Sub objTasks_ItemAdd(ByVal Item As Object) KeepReminderSameasStartDate Item End Sub Private Sub objTasks_ItemChange(ByVal Item As Object) KeepReminderSameasStartDate Item End Sub Public Sub KeepReminderSameasStartDate(ByVal Item As Object) If Item.Class = olTask Then Set objTask = Item dStartDate = objTask.StartDate 'You can change the concrete reminder date as per your actual needs dReminderRTime = dStartDate & " 8:00:00 AM" If objTask.ReminderSet = True Then objTask.ReminderTime = dReminderRTime objTask.Save End If End If End Sub
- After that, you have to sign this macro.
- Later change your Outlook macro settings to only permit the digitally signed macros.
- Eventually restart your Outlook to activate the new macros.
- When you create a new task, in the currently opened task, the reminder date will still display same as the due date. But after you save it and re-check its reminder, you will find it same as the start date.
- When you change the due date in an existing task, the reminder date will still change. But after you save it and recheck the reminder, you will see that it is still equal to start date.
Salvage Your Valuable PST Data
Many users have been plagued by PST vulnerabilities for a long time. You may keep worried about the health of your PST file and fear it gets corrupted one day. Thus, the best way to get rid of such panics is to make a consistent and up-to-date data backup for the PST files. Besides, you can prepare a proven Outlook repair tool in advance, like DataNumen Outlook Repair, such that you can get immediate rescue when suffering PST crashes.
Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including corrupted sql and outlook repair software products. For more information visit www.datanumen.com